That was how I solved it but it seemed redundant to enter:
DEFINE CLASS xx AS Custom
MyProp = .NULL.
PROCEDURE Init
This.MyProp = NEWOBJECT('Custom')
ENDPROC
When I thought I should be able to just:
DEFINE CLASS xx AS Custom
MyProp = NEWOBJECT('Custom')
Thanx,
Bill Elvin