Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
How to show form if it is already loaded
Message
 
À
23/01/2008 08:30:05
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Versions des environnements
Visual FoxPro:
VFP 9 SP1
OS:
Windows XP SP2
Network:
Windows 2000 Server
Database:
Visual FoxPro
Divers
Thread ID:
01284403
Message ID:
01284617
Vues:
17
My solution,

1-first you must fill of the form name property i prefer with scx name
2-add a property to the form which is name isSingleRun value with .t.
3-put below codes to load event of the form
LOCAL x,nFormCount
nFormCount=0
IF this.isSingleRun
	FOR x=1 TO _screen.formcount
		IF _screen.forms(x).name==this.Name
			nFormCount=nFormCount+1
		ENDIF
		IF nFormCount>1
			_screen.forms(x).show() 
			RETURN .f.
		ENDIF
	NEXT
ENDIF
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform