Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Form won't release
Message
De
20/04/1999 15:27:08
 
 
À
Tous
Information générale
Forum:
Visual FoxPro
Catégorie:
Problèmes
Titre:
Form won't release
Divers
Thread ID:
00210262
Message ID:
00210262
Vues:
57
Could someone please explain why this code work inside VFP and not from a EXE?

This code is from the File|Exit menu to close all open forms before quitting the application. For a reason I can't catch, it will loop indefinitly, refusing to release the form. There's no message and the Release() method is called (I placed a WAIT WINDOW inside the IF to check it).

I'm using VFP 5.0
llExitOK = .T.

DO WHILE llExitOK AND (Type("_Screen.ActiveForm") = "O")
	WITH _Screen.ActiveForm
		IF .QueryUnload()
			.Release()
		ELSE
			llExitOK = .F.
		ENDIF
	ENDWITH
ENDDO
TIA
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform