Which is how I do it. In my custom form baseclass, I have a property called oCaller to hold a reference to the calling program. In the init I have this code:

If Type([_screen.activeform.name]) = [C]
   This.oCaller = _Screen.ActiveForm
Endif

>in the init of the childform the current active form is still in _VFP.activeform
>so you can add formproperty to all forms and in init set it to _VFP.ActiveForm
>
>
>Peter
>
>>Hi,
>>
>>I have a property nlineno in the parent form, and I pass the form to the child form as follow
>>
>>

>>do childrorm with thisform
>>

>>the child form init method
>>

>>lparameters opform
>>

>>I can display out the value of the opform.nlineno in the child form's init method,
>>

>>Messagebox(opform.nlineno)
>>

>>but I can't display out the value in the Button object in the child form's click method,
>>it prompt me an error message, "object opform is not found", when I click the button in the child form.
>>
>>Why ?
>>Please advise
>>
>>Derek Yim