Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Completly shutting down an app with a top level form
Message
De
09/12/1997 14:10:38
 
 
À
09/12/1997 13:54:51
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Divers
Thread ID:
00064692
Message ID:
00064741
Vues:
37
>>>>How do I completely shutdown an application with a top-level form?
>>>>I'm just closing the form, but the application stays running (per NT Task Manager).
>>>>I've tried moving the CLEAR EVENTS and the QUIT to different places with no luck.
>>>
>>>Have you tried an external prg ON SHUTDOWN? That's what I use...
>>
>>
>>I tried ON SHUTDOWN QUIT, but will look into calling an external program.
>
>Where have tried issuing QUIT? Have you verified that QUIT gets executed?
>
>'ON SHUTDOWN QUIT' is like saying 'when quitting, quit'
>ON SHUTDOWN specifies what happens when you issue QUIT.

It might be helpful, I take it from one prototype project:
PROCEDURE Footer && it fires on app start
**** many other settings
on shutdown do quitapp
return

procedure quitapp
oApp.quitflag=.t.
if type("frsMain.frmData")=="O"
frsMain.frmData.release()
endif
if type("frsMain.frmConfig")=="O"
frsMain.frmConfig.release()
endif
if type("frsMain.frmList")=="O"
frsMain.frmList.release()
endif
clear events
if wexist("frsmain")
release window frsmain
endif
return
endproc
Edward Pikman
Independent Consultant
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform