stipe
Messages postés33Date d'inscriptionjeudi 10 avril 2003StatutMembreDernière intervention30 décembre 2004
-
26 nov. 2004 à 11:10
alias666
Messages postés308Date d'inscriptionmardi 1 juin 2004StatutMembreDernière intervention23 mars 2010
-
26 nov. 2004 à 11:24
bonjour,
j'ai une MDI avec 3 boutons, chacun ouvrant une Frm (frm1, frm2 et frm3) dans ma MDI.
qd je clique sur un bouton, j'ouvre la fenetre correspondante (avec load frm..) mais je veux aussi fermer toutes les autres fenetres qui etaient ouvertes dans ma MDI
comment faire?
alias666
Messages postés308Date d'inscriptionmardi 1 juin 2004StatutMembreDernière intervention23 mars 2010 26 nov. 2004 à 11:22
Tu fais cela avec une fonction que tu appelles "EstChargee" par exemple et tu fais en sorte qu'elle te renvoies "True" ou "False" en fonction des fenêtres chargée. Et après sur l'évenement click de tes boutons tu fais une boucle sur les 2 autres fenêtres si cela renvoie "True" sur les autres forms ba tu les ferme.
alias666
Messages postés308Date d'inscriptionmardi 1 juin 2004StatutMembreDernière intervention23 mars 2010 26 nov. 2004 à 11:24
J'ai ca si cela peut t'aider.
Public Function IsLoaded(ByVal Nom As String)
Dim T As Form
For Each T In Forms
If T.Name = Nom Then
IsLoaded = True
Exit Function
End If
Next T
IsLoaded = False
End Function