Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Trying to automate an app...can't get it to end properly
Message
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Environment versions
Visual FoxPro:
VFP 8 SP1
OS:
Windows XP SP2
Network:
Windows 2003 Server
Database:
Visual FoxPro
Miscellaneous
Thread ID:
01108106
Message ID:
01108124
Views:
11
This message has been marked as the solution to the initial question of the thread.
>I have an app that does something like this:
>
>I have a main.prg, and a top-level form. All the main.prg does is run the top level form.
>
>What I want to do is have the main.prg accept a paramamter, run the screen, click a button on the screen, then exit the screen and application.
>
>So main.prg:
>
>lparamters tcYesNo
>If tcYesNo = 'YES'
> Do form myForm with tcYesNo
>EndIf
>
>Then in the init() of myForm I have something like this....
>
>lparameters tcYesNo
>If tcYesNo = 'YES'
> ThisForm.cmdRunButton.Click()
> ThisForm.Release()
>EndIf
>
>...and I have a CLEAR EVENTS in the destory() of myForm. Problem is that it doesn't really release the form...any ideas?

Victor,

The problem was discussed few days ago. If you want to relase form in Init, you should return .f. from Init. Don't call button's Click event.
If it's not broken, fix it until it is.


My Blog
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform