MEMVARBLOCK() Return a set-get code block for a given memory variable ------------------------------------------------------------------------------ Syntax MEMVARBLOCK(<cMemvarName>) --> bMemvarBlock Arguments <cMemvarName> is the name of the variable referred to by the set-get block, specified as a character string. Returns MEMVARBLOCK() returns a code block that when evaluated sets (assigns) or gets (retrieves) the value of the given memory variable. If <cMemvarName> does not exist, MEMVARBLOCK() returns NIL. Description The code block created by MEMVARBLOCK() has two operations depending on whether an argument is passed to the code block when it is evaluated. If evaluated with an argument, it assigns the value of the argument to <cMemvarName>. If evaluated without an argument, the code block retrieves the value of <cMemvarName>. Notes . MEMVARBLOCK() creates set-get blocks only for variables whose names are known at runtime. MEMVARBLOCK(), therefore, cannot be used to create set-get blocks for local or static variables. The same restriction applies to creating blocks using the macro operator (&). Examples . This example compares MEMVARBLOCK() to a code block created using the macro operator (&). Note that using MEMVARBLOCK() allows you to avoid the speed and size overhead of the macro operator: PRIVATE var := "This is a string" // // Set-Get block defined using macro operator bSetGet := &( "{ |setVal|; IF( setVal == NIL, var, var := setVal ) }" ) // Set-Get block defined using MEMVARBLOCK() // bSetGet created here is the functional // equivalent of bSetGet above bSetGet := MEMVARBLOCK("var") Files Library is CLIPPER.LIB.
See Also: FIELDBLOCK() FIELDWBLOCK()