Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Stop a form from releasing
Message
 
 
To
25/09/2011 20:47:41
General information
Forum:
Visual FoxPro
Category:
Forms & Form designer
Environment versions
Visual FoxPro:
VFP 9 SP2
OS:
Windows 7
Miscellaneous
Thread ID:
01524681
Message ID:
01524684
Views:
64
You will need to put NODEFAULT in the QueryUnload method.

>Hi All:
>
>How do you stop a form from releasing? I've tried returning .f. in the DESTROY and UNLOAD, but to no avail.
>
>(Since I could destroy the form by xing out OR by pressing the 'Close' button, I don't want to put the code in the close button.)
>
>Here's the code:
>
>
>LPARAMETERS tlError
>
>retparm = .t.
>
>IF tlError
>	lnResponse = MESSAGEBOX('At least 1 item has no labels! Are You Sure?', 52, 'No Labels')
>	IF lnResponse = 7  &&No
>		retparm = .f.
>	ENDIF
>ENDIF
>
>IF retparm
>	DODEFAULT()
>ENDIF
>
>RETURN retparm
>
>
>Thanks,
>
>Yossi
If it's not broken, fix it until it is.


My Blog
Previous
Reply
Map
View

Click here to load this message in the networking platform