set step on yoyo = createobject('obj1') *!* do form temp with yoyo.lottatext set classlib to temp.vcx xoxo = createobject('temp', yoyo.lottatext ) xoxo.show(1) on error define class obj1 as custom lottatext = replicate( 'fubar', 100 ) enddefine ************************************************** *-- Class: temp (d:\nec\temp.vcx) *-- ParentClass: form *-- BaseClass: form * DEFINE CLASS temp AS form Top = 0 Left = 0 Height = 293 Width = 625 DoCreate = .T. Caption = "Form1" Name = "Form1" ADD OBJECT label1 AS label WITH ; WordWrap = .T., ; Caption = "Label1", ; Height = 286, ; Left = 2, ; Top = 1, ; Width = 618, ; Name = "Label1" PROCEDURE Init lparameter tctext this.label1.caption = tctext ENDPROC ENDDEFINE * *-- EndDefine: temp **************************************************With the result that CREATEOBJECT passed the property just fine.