Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Stop a form from releasing
Message
De
25/09/2011 20:47:41
 
 
À
Tous
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Titre:
Stop a form from releasing
Versions des environnements
Visual FoxPro:
VFP 9 SP2
OS:
Windows 7
Divers
Thread ID:
01524681
Message ID:
01524681
Vues:
105
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
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform