SET SAFETY &lcMySafetySetting>Hi Gurus...
> SAFETYSETTING = "" > > PROCEDURE Init > > *-- Set the HorizonFolder property to m0sysdr (private variable from outside the class) > STORE SET("SAFETY") TO THIS.SafetySetting > SET SAFETY OFF > > This.HorizonFolder = m0sysdr > *-- Set the SettingsFolder to be (HorizonFolder)\settings > This.SettingsFolder = This.PathAppend(m0sysdr,"\settings") > ENDPROC >>
> PROCEDURE Destroy > LOCAL lcMySafetySetting > lcMySafetySetting = THIS.SafetySetting > SET SAFETY &MySafetySetting > ENDPROC >>