SCATTER NAME oDataObject>how can I add funtionality to that object, like
oDataObject.ADDPROPERTY("NewField")>Or, in other words, how can I create a data object like the above without the SCATTER NAME command?
*How to use the class: Public oData oData=CreateObject('parameterX') oData.MyVar1=1 oData.MyVar2='some text' ?oData.Myvar1
define class ParameterX as custom function This_Access(tcMember) if type('This.' + tcMember) = 'U' This.AddProperty(tcMember) endif return This EndFunc function AddVar(tcMember,tcData) AddProperty(this,tcMember,tcData) return This endfunc EndDefine