AutoIt Français

Code : Tout sélectionner

Func _GestionDesCategories()
    Local $TreeView1Items[100][100]
    Local $Form1_1, $TreeView1, $label0, $label1, $label2, $Input0, $Input1, $Input2, $nMsg, $Ajouter, $Modifier
    Local $ListeExtensions

    $Form1_1 = GUICreate("Gestion des catégories", 626, 444, 192, 124)
    $TreeView1 = GUICtrlCreateTreeView(8, 8, 177, 425) ; On commence par créer un treeview
    For $i = 1 To $NbSectionsDuFichierIni
        $TreeView1Items[$i][0] = GUICtrlCreateTreeViewItem($categorie[$i][0], $TreeView1) ; dans lequel on commence par mettre en racine les noms de sections
        $ListeExtensions = StringSplit($categorie[$i][1], ".") ; puis on découpe la liste d"extensions
        For $j = 2 To $ListeExtensions[0] - 1
            $TreeView1Items[$i][$j] = GUICtrlCreateTreeViewItem($ListeExtensions[$j], $TreeView1Items[$i][0]) ; qu'on met en sous-ietm de la treeview
        Next
    Next

    $label0 = GUICtrlCreateLabel("Nom de la catégorie", 200, 15, 410, 17)
    $label1 = GUICtrlCreateLabel("Liste des extensions", 200, 70, 410, 17)
    $label2 = GUICtrlCreateLabel("Répertoire de stockage des fichiers", 200, 167, 410, 17)

    $Input0 = GUICtrlCreateInput("", 200, 35, 141, 21)
    $Input1 = GUICtrlCreateInput("", 200, 90, 410, 63)
    $Input2 = GUICtrlCreateInput("", 200, 187, 410, 21)
    $Ajouter = GUICtrlCreateButton("Ajouter",230, 230, 105, 33, $WS_GROUP)
    $Modifier = GUICtrlCreateButton("Modifier", 350, 230, 105, 33, $WS_GROUP)
    GUISetState(@SW_SHOW)

    While 1 ; on attend qu'il se passe qqchose dans la form
        $nMsg = GUIGetMsg()
        Switch $nMsg
 Case $Ajouter
                   _AjoutCategorie()
            Case $Modifier
                       _ModifCategorie()
            Case $GUI_EVENT_CLOSE
                Exit
            Case Else
                For $i = 1 To $NbSectionsDuFichierIni
                    If $nMsg = $TreeView1Items[$i][0] Then ; si l'utilisateur clique sur une des categories dans la treeview
                        GUICtrlSetData($Input0, $categorie[$i][0]) ; on met les valeurs dans les 3 champs de saisie
                        GUICtrlSetData($Input1, StringReplace($categorie[$i][1], ".", " "))
                        GUICtrlSetData($Input2, $categorie[$i][2])
                    EndIf
                Next
  EndSwitch
    WEnd
; pour l'instant la GUI fait rien de plus, mais il suffit ensuite de gerer les modifications apportées par l'utilisateur, et éventuellement de les enregistrer
EndFunc   ;==>_GestionDesCategories


Func _AjoutCategorie()

;Petite Gui
EndFunc

Func _ModifCategorie()
EndFunc