Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Catch 22
Message
 
To
20/05/1999 16:15:13
General information
Forum:
Visual FoxPro
Category:
Forms & Form designer
Title:
Miscellaneous
Thread ID:
00221090
Message ID:
00221161
Views:
13
Erik,
I deal with this in my app by passing the current form as
a reference to my configuration form.

IF lSetupMode
ThisForm.CancelMode = .F.
=CREATEOBJECT('SETUPFORM',THISFORM)
READ EVENTS
IF THISFORM.CancelMode
QUIT
ENDIF
ENDIF

SETUPFORM.INIT()
Parameters oParentObject
ThisForm.ParentObject = oParentObject

* Cancel by:
ThisForm.ParentObject.CancelMode = .T.
CLEAR EVENTS
RETURN .F.
Previous
Reply
Map
View

Click here to load this message in the networking platform