Tester fermeture form filleRésolu

Question

Bonjour

Je développe en ce moment une application de gestion en MDI. J'ai plusieurs formulaires filles et je voudrais tester avant de fermer mon application que tous les formulaires filles sont fermés. Comment puis-je faire ? 

Merci

ptitelili059 · Accepted Answer

C'est bon j'ai trouvé merci de ton aide

Pour ceux que ça intéresse voici le code : 
Dim ret As DialogResult
        ret = MessageBox.Show("Etes-vous sûr de vouloir fermer cette application ?", "Fermeture ...", MessageBoxButtons.YesNo)
        If ret = vbYes Then
            Dim xxx As Form
            For Each xxx In Me.MdiChildren
                If xxx.IsMdiChild Then
                    If xxx.Enabled Then
                        MsgBox("Veuillez d'abord fermer toutes les fenêtres ! ", MsgBoxStyle.Information, "Attention")
                        e.Cancel = True
                    End If
                End If
            Next
        Else
            e.Cancel = True
        End If

cs_Jack · Answer

Salut
En VB6, ça donnerait ça :
    Dim xxx As Form
    For Each xxx In Forms
        If Not TypeOf xxx Is MDIForm Then
            If xxx.MDIChild = True Then
                Debug.Print xxx.Name
            End If
        End If
    Next
Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés

Le savoir est la seule matière qui s'accroit quand on la partage (Socrate)

ptitelili059 · Answer

merci mais j'ai oublié de préciser que je développe en VB.NET

cs_Jack · Answer

Oui oui, la catégorie le disait pour toi, mais n'ayant pas le temps de lancer .Net pour trouver la syntaxe exacte, je te laisse ce code VB6 surement transposable en .Net
Ca te donne une piste ...

ptitelili059 · Answer

Merci. J'ai essayé mais je ne sais pas à quoi correspond le "Forms"

cs_Jack · Answer

Oui, tellement différent en .Net :
        Dim xxx As Form
        For Each xxx In MdiChildren
            Debug.Print(xxx.Text)
        Next

Tester fermeture form fille

6 réponses

Votre réponse

Discussions similaires