>>>>Thanks Marcia! That should do the trick. I'm still confused as to why PEMSTATUS() says there's a Width property on my page when everything else says there isn't. Have you seen that behaviour before?
>>>
>>>This classes have hidden properties:
>>>

>>>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
>>>

>>>
>>>A more general way ( slow )
>>>

>>>IF !PEMSTATUS(m.oControl,"nOrigWidth",5) AND TYPE("m.oControl.Width")=='N'
>>>....
>>>

>>>Fabio
>>
>>hi Fabio,
>>
>>I think this is a lot faster
>>
>>

>>IF !PEMSTATUS(m.oControl,"nOrigWidth",5) AND vartype(m.oControl.Width)=='N'
>>....
>>

>
>
>Hi Gregory,
>unfortunally this is not usable cause a bug,
>if the property it is not readable VARTYPE() fire a error.
>try
>

>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
>

>
>Fabio

You're right Fabio,
If fires an error if protected or hidden, but not if the property does not exist

obj= CREATEOBJECT('aaa')
? VARTYPE(m.obj.width)



DEFINE CLASS aaa as Relation
	
ENDDEFINE