Gestion des MDI

stipe Messages postés 33 Date d'inscription jeudi 10 avril 2003 Statut Membre Dernière intervention 30 décembre 2004 - 26 nov. 2004 à 11:10
alias666 Messages postés 308 Date d'inscription mardi 1 juin 2004 Statut Membre Dernière intervention 23 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?

merci

2 réponses

alias666 Messages postés 308 Date d'inscription mardi 1 juin 2004 Statut Membre Dernière intervention 23 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.

_______________________
4L!@$ >>>>
0
alias666 Messages postés 308 Date d'inscription mardi 1 juin 2004 Statut Membre Dernière intervention 23 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


_______________________
4L!@$ >>>>
0
Rejoignez-nous