Yes :o(((
I don't know what this means, where I must put this to write the method in some class (may be in builder?).
Unfortunately i try it AFTER i post the message.
>I get:
>
>"Feature is only available if the object is in design mode"
>
>when it hits the writemethod line when I run:
>
>oSysInfo = NEWOBJECT('SysInfo', 'ATISysInfo.vcx')
>SELE sysinfobld
>SCAN
> IF !EMPTY(sysinfobld.csubitem) .and. LEN(ALLTRIM(sysinfobld.csubitem)) > 0
> mvalue = ALLTRIM(STRTRAN(sysinfobld.csubitem,CHR(32),''))
> IF !PEMSTATUS(oSysInfo,mvalue,5)
> ADDPROPERTY(oSysInfo,mvalue,'')
> ENDIF
> IF PEMSTATUS(oSysInfo,mvalue,5)
> oSysInfo.WRITEMETHOD(mvalue,sysinfobld.mmethod)
> ENDIF
> ENDIF
>ENDSCAN
>
Against Stupidity the Gods themselves Contend in Vain - Johann Christoph Friedrich von Schiller
The only thing normal about database guys is their tables.