extractallproperties Method
Object: frmbehindsc
Expand/Collapse source code of procedure extractallproperties Source Code
LPARAMETERS tnFileHandle
LOCAL lnLine

IF EMPTY(showmeth.properties)
  RETURN ""
ENDIF

FOR lnLine = 1 TO MEMLINES(showmeth.properties)
  =FPUTS(tnFileHandle, TAB + MLINE(showmeth.properties, lnLine))
ENDFOR