Discussion :

[LoEuF1709]

Bonjour à tous,

Je suis actuellement en train de développer une application et j'aimerai créer un affichage dynamique des menus qui ont été enregistrer dans un BD.

Mais je rencontre un petit problème et j'espère que quelqu'un aura une solution à me proposé :

lors de ma gestion de création des menus, je dois récupérer tout les menus de n'importequelle niveau, ce qui donne :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
For Each mnu As ToolStripMenuItem In mnuPrincipal.Items
   If mnu.Tag = idParent Then
      ...
   Else
      For Each mnuEnfant As ToolStripMenuItem In mnu.DropDownItems
         If mnuEnfant.Tag = idParent Then
            ...
         End If
      Next
   End If
Next

Le problème est que si je rajoute un niveau de menu, ce code ne marche plus.

Donc je voudrais savoir si je pouvais parcourir tout les menus en une seule boucle.

Merci.

[tomlev]

Il faut faire un traitement récursif :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
Sub ParcoursMenu(ByVal items As ToolStripItemCollection)
 
    For Each mnu As ToolStripMenuItem In items
        If mnu.Tag = idParent Then
            ...
        Else
            ParcoursMenu(mnu.Items)
        End If
    Next
 
End Sub

Et tu commences en appelant ParcoursMenu(mnuPrincipal.Items)

[LoEuF1709]

ça marche très bien en ajoutant quelques modifications.

Le pire c'est que j'avais déja fait une fonction récursive du côté SQL pour récupérer les menus dans l'ordre mais la j'y avais pas pensé!

Merci !!