ADDPROPERTY(_VFP, "MyForm", .NULL.)In the Init event of the form add the following:
IF PEMSTATUS(_VFP, "MyForm", 5) IF ISNULL(_VFP.MyForm) _VFP.MyForm = thisform ELSE _VFP.MyForm.Show() RETURN .F. ENDIF ELSE ADDPROPERTY(_VFP, "MyForm", thisform) ENDIFNow in the Destroy event of the form add the following:
_VFP.MyForm = .NULL.