Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
How to Quit an Application
Message
 
À
11/01/2003 15:57:08
John Tomblin
Service Station Systems, Inc.
San Jose, Californie, États-Unis
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Divers
Thread ID:
00740696
Message ID:
00740946
Vues:
23
>Like most applications, I begin with a prg that displays a splash screen, sets up the environment, opens the database, checks the user's permissions, and finally calls the menu.
>
>Before the database is opened, I issue the following command:
> on error do GiveUp
> open database MyData shared
>
> *------------------------------------------------
> procedure GiveUp
>
> =MessageBox("Helpful Hints ...")
> close all
> clear all
> quit
> cancel
> return
>
>All I want to do is to display a message and terminate.When the database cannot be opened, the messagebox does appear but, the application continues to run and produce error after error. Also, making this a function and returning .F. won't work either.
>
>Is it possible to force the termination of an application. If so. How?

If you are using read events you should issue a clear events after displaying the messagebox

Einar
Semper ubi sub ubi.
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform