Because Parent is not usable, expected a Hidden or Protected setting

* Expected no errors
=CREATEOBJECT("myForm1")

DEFINE CLASS myForm1 AS Form
	PROCEDURE Load
		IF	PEMSTATUS(m.this,"Parent",5)	;	&& Expected .F.
		AND NOT PEMSTATUS(m.this,"Parent",2)		&& Expected .T.
			? GETPEM(m.this,"Parent")		&& Then : Error 1924
		ENDIF
		RETURN .F.
		
	PROCEDURE eRROR
		LPARAMETERS nError, cMethod, nLine
		? nError,MESSAGE()
ENDDEFINE

Same for ActiveForm,ActiveControl ....