création de sous-menu dynamique

Question

Bonjour,

j'ai crée une appli qui prend en charge le changement de langue (fichier .lng ). J'ai crée un menu dynamique qui liste les langues disponibles (nom des fichier .lng present dans le dossier "lang" ).
Le menu se presente comme ceci:

Préférence
    >Impression
    >Langues
            >
            >(liste des langues dispo)
            >

Voici le code:
 CODE#
Private Sub PréférencesToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles PréférencesToolStripMenuItem.Click
        Dim dir As IO.DirectoryInfo = New IO.DirectoryInfo(Application.StartupPath & "\lang")
        Dim lang As String
        Dim fichier As IO.FileInfo
        LanguesToolStripMenuItem.DropDownItems.Clear()
        For Each fichier In dir.GetFiles("*.lng")
            lang = (fichier.Name).Substring(0, ((fichier.Name).Length - 4))
            LanguesToolStripMenuItem.DropDownItems.Add(lang)
        Next
    End Sub
CODE#

Cela fonctionne car j'ai bien la liste des langues disponibles dans le sous menu "Langues" (LanguesToolStripMenuItem) mais je bloque pour la suite.
Je souhaiterai "checked" la langue par defaut quand on clique dessus mais je n'y arrive pas.
J'arrive a cocher le sous menu "langues" mais c'est les items de ce sous menu que je veux cocher....

si quelqu'un à la solution ou tout du moins un piste...

merci

waspy59 · Answer

personne pour m'aider?

quentincabo · Answer

Bonjour,

Juste pour te demander si tu as trouver la solution car moi je bloque un peu dessus

Merci d'avance

Création de sous-menu dynamique

2 réponses

Votre réponse

Discussions similaires