>>>>DataEnv : it have all the container's PEMs >>>> >>>>* hidden methods for a future VCX support >>>>Writemethod,SaveAsClass : >>>>Header,Session,Column >>>> >>>>* hidden Class Designer positioning >>>>Left,Top,Height,Width : >>>>Hyperlink,Relation,Cursor,CursorAdapter,Collection >>>>XmlField,XMLTable,XMLAdapter,ProjectHook >>>>>>>>
>>>>IF !PEMSTATUS(m.oControl,"nOrigWidth",5) AND TYPE("m.oControl.Width")=='N' >>>>.... >>>>>>>>Fabio
>>>IF !PEMSTATUS(m.oControl,"nOrigWidth",5) AND vartype(m.oControl.Width)=='N' >>>.... >>>>>
>>WITH CREATEOBJECT('aaa') >>? VARTYPE(.hprop) >>? VARTYPE(.pprop) >>? VARTYPE(.prop) >>ENDWITH >> >>DEFINE CLASS aaa as Custom >> HIDDEN hprop >> PROTECTED pprop >> hprop = .T. >> pprop = .T. >> prop = .T. >>ENDDEFINE >>>>
>obj= CREATEOBJECT('aaa') >? VARTYPE(m.obj.width) > > > >DEFINE CLASS aaa as Relation > >ENDDEFINE >Thanks Gregory, this small, but important, detail were escaped to me.