CLEAR CLEAR ALL goINSTANCE1 = CREATEOBJECT('Form') ADDPROPERTY(_SCREEN,"INSTANCE2",CREATEOBJECT('Form')) && HIDDEN WITH CREATEOBJECT('Form') && HIDDEN FOR K=1 TO AINSTANCE(gaMyArray, 'Form') ? gaMyArray[m.k] NEXT RELEASE gaMyArray ENDWITH REMOVEPROPERTY(_SCREEN,"INSTANCE2")Then:
AINSTANCE(ArrayName, cClassName, [allInstance]) * fill ArrayName with all object values for the cClassNameit is very usefull.
AREFERENCE(ArrayName, object ) * Return all variable names (m.XXXX) or the property (path\property) * that reference to an object. * then EVAL(ArrayName[k]) is the object reference to object. WITHSTACK(widthLevel) and WITHSTACKLEVEL() * return the current WITH stack status * WITHSTACK(N) for N>WITHSTACKLEVEL() return a NULL object * WITHSTACK() return the current with valueFabio