Click above to get retro games delivered to your door ever month!

MEMVARBLOCK()

Returns a codeblock that sets/gets a value of memvar variable
---------------------------------------------------------------------------------

 Syntax

        MEMVARBLOCK( <cMemvarName> ) --> <bBlock>  

 Arguments

        <cMemvarName>   - a string that contains the name of variable   

 Returns

        <bBlock>   a codeblock that sets/get the value of variable    

 Description

      This function returns a codeblock that sets/gets the value of
      PRIVATE or PUBLIC variable. When this codeblock is evaluated
      without any parameters passed then it returns the current value  of
      given variable. If the second parameter is passed for  the codeblock
      evaluation then its value is used to set the new  value of given
      variable - the passed value is also returned  as a value of the
      codeblock evaluation.

 Examples

      PROCEDURE MAIN()
      LOCAL cbSetGet
      PUBLIC xPublic

      cbSetGet = MEMVARBLOCK( "xPublic" )
      EVAL( cbSetGet, "new value" )
      ? "Value of xPublic variable", EVAL( cbSetGet )

      RETURN
  

Status

      Ready

 Compliance

      This function is Ca-Clipper compatible

 Files

      Library is rtl