AutoIt Français

Code : Tout sélectionner

#cs ----------------------------------------------------------------------------

 AutoIt Version : 3.3.8.1
 Auteur:         Zouzaka

 Fonction du Script :
    Modèle de Script AutoIt.

#ce ----------------------------------------------------------------------------
;Includes
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <GuiTreeView.au3>
#include <string.au3>

;Declaration
Global $Item_ctg[999] , $Item_ctg_Modif[999] , $Child_ctg[999] , $Child_ctg_Modif[999]
Global $Item_number = 0

;Default file Test
If Not FileExists("Default.xml") Then
FileWrite("Default.xml", _
"<Programme>" & @CRLF & _
"<Vocab1>|Personnages|Equipements|Objets|</Vocab1>" & @CRLF & _
"<Personnages></Personnages>" & @CRLF & _
"<Equipements></Equipements>" & @CRLF & _
"<Objets></Objets>" & @CRLF & _
"</Programme>")
EndIf

#region Gui Principal
;Création de la gui
$Handel = GUICreate("Scenario Editor",640,340)
;Menu_Fichier
$Menu_Fichier = GUICtrlCreateMenu("Fichier")
$Menu_Fichier_Open = GUICtrlCreateMenuItem("Ouvrir",$Menu_Fichier)
$Menu_Fichier_Save = GUICtrlCreateMenuItem("Sauvgarder",$Menu_Fichier)
$Menu_Fichier_Exit = GUICtrlCreateMenuItem("Quitter",$Menu_Fichier)
;Menu_Edition
$Menu_Edition = GUICtrlCreateMenu("Edition")
$Menu_Edition_ctg = GUICtrlCreateMenuItem("Categories Edit",$Menu_Edition)
$Menu_Edition_Recherche = GUICtrlCreateMenuItem("Rechercher",$Menu_Edition)
;Création Des Categories de Base
$Tree_Ctg = _GUICtrlTreeView_Create($Handel,5,5,-1,300,$WS_BORDER)
$Item_Ctg[0] = _GUICtrlTreeView_Add($Tree_Ctg,0,"|==>Personnages")
$Item_Ctg[1] = _GUICtrlTreeView_Add($Tree_Ctg,0,"|==>Equipements")
$Item_Ctg[2] = _GUICtrlTreeView_Add($Tree_Ctg,0,"|==>Objets")
;Création de la zone de titre
$Titel_Texte = GUICtrlCreateInput("Personnage > Nom du personnage",160,5)
$Document_Texte = GUICtrlCreateEdit("Text",160,30,475,275)
;Création du bouton valider
$Valid_titel = GUICtrlCreateButton("Valider",370,4,50,21)
#endregion

#region Gui Modification Categories
;Trouver la posisiton de la gui principal
$Pos_Gui_Pcp = WinGetPos("Scenario Editor")
;Création de la gui
$Handel2 = GUICreate("Categories Editor",200,340,$Pos_Gui_Pcp[0]-225,$Pos_Gui_Pcp[1],0,-1,$Handel)
;Création du Menu
$Menu_ctg = GUICtrlCreateMenu("Fermer")
;Création de la treeview
$Tree_Ctg_Modif = _GUICtrlTreeView_Create($Handel2,0,0,194,70,$WS_BORDER)
For $Item_number = 0 To 998
    Local $x = _GUICtrlTreeView_GetText($Tree_Ctg,$Item_Ctg[$Item_number])
    If $Item_number > 0 Then
        Local $y = _GUICtrlTreeView_GetText($Item_Ctg[$Item_number - 1])
    EndIf
    If $x = "" Then
        ExitLoop
    Else
        $Test_Name = StringRegExp($x,"|==>")
        If $Test_Name = 1 Then
            $Item_ctg_Modif[$Item_number] = _GUICtrlTreeView_Add($Tree_Ctg_Modif,0,$x)
        Else
            $Test_Name = StringRegExp($x,"|=>")
            If $Test_Name = 1 Then
                $Child_ctg_Modif = _GUICtrlTreeView_AddChild($Tree_Ctg_Modif,$y,$x)
            Else
                MsgBox(0,"Error","Erreur au niveau de la verification Parent/Child")
            EndIf
        EndIf
    EndIf
Next

;Label 1
$Label = GUICtrlCreateLabel("Zone Modification",55,80)
;Groupe Rename
$Groupe_Rename = GUICtrlCreateGroup("Changer Le Nom d'une Catégorie",5,100,180,90)


#endregion
GUISetState(@SW_SHOW,$Handel)
GUISetState(@SW_SHOW,$Handel2)

;
While 1
    $msg = GUIGetMsg()
    Switch $msg
        Case $GUI_EVENT_CLOSE
            Exit
    EndSwitch
WEnd

Code : Tout sélectionner

;Création de la treeview
$Tree_Ctg_Modif = _GUICtrlTreeView_Create($Handel2,0,0,194,70,$WS_BORDER)
For $Item_number = 0 To 998
    Local $x = _GUICtrlTreeView_GetText($Tree_Ctg,$Item_Ctg[$Item_number])
    If $Item_number > 0 Then
        Local $y = _GUICtrlTreeView_GetText($Item_Ctg[$Item_number - 1])
    EndIf
    If $x = "" Then
        ExitLoop
    Else
        $Test_Name = StringRegExp($x,"|==>")
        If $Test_Name = 1 Then
            $Item_ctg_Modif[$Item_number] = _GUICtrlTreeView_Add($Tree_Ctg_Modif,0,$x)
        Else
            $Test_Name = StringRegExp($x,"|=>")
            If $Test_Name = 1 Then
                $Child_ctg_Modif = _GUICtrlTreeView_AddChild($Tree_Ctg_Modif,$y,$x)
            Else
                MsgBox(0,"Error","Erreur au niveau de la verification Parent/Child")
            EndIf
        EndIf
    EndIf
Next