Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Automate application exit
Message
 
À
Tous
Information générale
Forum:
Visual FoxPro
Catégorie:
Autre
Titre:
Automate application exit
Versions des environnements
Visual FoxPro:
VFP 9 SP1
Database:
Visual FoxPro
Divers
Thread ID:
01105551
Message ID:
01105551
Vues:
81
I'm having trouble automating the exiting of a program when run with startup parameters.

The problem is with the final closing of the app.

Here's the pertinant part of the startup prg:
DO FORM MakeBackups WITH lcAutoRun
READ EVENTS
CLEAR EVENTS

ON ERROR  && Restores system error handler.

QUIT
In my form's SHOW I have:
LPARAMETERS nStyle
DODEFAULT()
IF thisform.lAutostart = .T.
	THISFORM.CmdProcess.Click()
	WAIT WINDOW [Waiting 10 seconds] TIMEOUT 10
	THISFORM.CmdExit.Click()
ENDIF
I get the wait window, but the click event is not closing the form. If I manually click CmdExit, the application closes and quits VFP

Here's the CmdExit Click:
thisform.release
The form's RELEASE:
DODEFAULT()
CLOSE DATABASES
CLEAR EVENTS
TIA
Kogo Michael Hogan

"Pinky, are you pondering what I'm pondering?"
I think so Brain, but "Snowball for Windows"?

Ideate Web Site
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform