[R] TreeView/List avec CheckBox et Icône

[DJSIR]

Bonjour à tous.
J'aimerais réaliser un TreeView, avec des CheckBox (c'est possible)
Imaginez comme une ToDo List..

Merci.

[Tlem]

Et la recherche sur le forum ...
http://www.autoitscript.fr/forum/viewto ... f=6&t=3506

[DJSIR]

J'ai cherché avec le mot CheckBox.. Je pouvait pas trouver ce post.

Merci !

[DJSIR]

C'est plus avec une Liste (je me suis mal formulé)

Donc, voilà mon code :

► Afficher le texte

Code : Tout sélectionner

#include <GUIConstantsEx.au3>
#include <ListViewConstants.au3>
#include <WindowsConstants.au3>
#include <guilistview.au3>

$GUI_UpDate = GUICreate("Hey!", 700, 500)

$List = GUICtrlCreateListView("Test", 1, 0, 200, 476)
GUICtrlSendMsg(-1, $LVM_SETCOLUMNWIDTH, 0, 200-5)

_GUICtrlListView_SetExtendedListViewStyle($List, BitOR($LVS_EX_GRIDLINES, $LVS_EX_FULLROWSELECT, $LVS_EX_CHECKBOXES))

_GUICtrlListView_AddItem($List, "Essai1")
_GUICtrlListView_AddItem($List, "Essai2")
_GUICtrlListView_AddItem($List, "Essai3")
_GUICtrlListView_AddItem($List, "Essai4")
_GUICtrlListView_AddItem($List, "Essai5")
_GUICtrlListView_AddItem($List, "Essai6")

GUISetState()

While 1
    If GUIGetMsg() = -3 Then Exit
WEnd

J'arrive pas à lire avec GUICtrlRead !

[Tlem]

Essayez ceci :

► Afficher le texte

Code : Tout sélectionner

While 1
    If GUIGetMsg() = -3 Then
        $ListNb = _GUICtrlListView_GetItemCount($List)
        For $i = 0 to $ListNb - 1
            $ItemText = _GUICtrlListView_GetItemText($List, $i)
            $ItemState = _GUICtrlListView_GetItemChecked($List, $i)
            If $ItemState = 1 Then
                $ItemState = "Coché"
            Else
                $ItemState = "Décoché"
            EndIf
            MsgBox(0, '', $ItemText & " est " & $ItemState)
        Next
        Exit
    EndIf
WEnd

[DJSIR]

Merci bcp Tlem encore une fois.

[DJSIR]

Bon.. franchement, j'ai besoin de sommeil.
J'avais trouvé avant comment mettre une icône sur une ligne d'une liste et la je trouve plus. Ca fait 30Minutes :!

Tlem ?

[Tlem]

Hummmm. Pas sur un ListView il me semble.

[DJSIR]

Bah, dans l'aide je peux faire un solide. Rien d'autre.

[DJSIR]

► Afficher le texte

Code : Tout sélectionner

#AutoIt3Wrapper_au3check_parameters=-d -w 1 -w 2 -w 3 -w 4 -w 5 -w 6
#include <GuiConstantsEx.au3>
#include <GuiListView.au3>
#include <GuiImageList.au3>
#include <WindowsConstants.au3>

Opt('MustDeclareVars', 1)

_Main()

Func _Main()
    Local $listview, $hImage
    Local $exStyles = BitOR($LVS_EX_GRIDLINES, $LVS_EX_FULLROWSELECT, $LVS_EX_SUBITEMIMAGES)

    GUICreate("ImageList Remove", 400, 300)
    $listview = GUICtrlCreateListView("", 2, 2, 394, 268, BitOR($LVS_SHOWSELALWAYS, $LVS_NOSORTHEADER, $LVS_REPORT))
    _GUICtrlListView_SetExtendedListViewStyle($listview, $exStyles)
    GUISetState()

    ; Load images
    $hImage = _GUIImageList_Create(16, 16, 5, 3)
    _GUIImageList_AddIcon($hImage, @SystemDir & "\shell32.dll", 110)
    _GUIImageList_AddIcon($hImage, @SystemDir & "\shell32.dll", 131)
    _GUIImageList_AddIcon($hImage, @SystemDir & "\shell32.dll", 165)
    _GUIImageList_AddIcon($hImage, @SystemDir & "\shell32.dll", 168)
    _GUIImageList_AddIcon($hImage, @SystemDir & "\shell32.dll", 137)
    _GUIImageList_AddIcon($hImage, @SystemDir & "\shell32.dll", 146)
    _GUICtrlListView_SetImageList($listview, $hImage, 1)

    ; Add columns
    _GUICtrlListView_AddColumn($listview, "Column 1", 120)
    _GUICtrlListView_AddColumn($listview, "Column 2", 100)
    _GUICtrlListView_AddColumn($listview, "Column 3", 100)

    ; Add items
    _GUICtrlListView_AddItem($listview, "Row 1: Col 1", 0)
    _GUICtrlListView_AddSubItem($listview, 0, "Row 1: Col 2", 1, 1)
    _GUICtrlListView_AddSubItem($listview, 0, "Row 1: Col 3", 2, 2)
    _GUICtrlListView_AddItem($listview, "Row 2: Col 1", 1)
    _GUICtrlListView_AddSubItem($listview, 1, "Row 2: Col 2", 1, 2)
    _GUICtrlListView_AddItem($listview, "Row 3: Col 1", 2)
    _GUICtrlListView_AddItem($listview, "Row 4: Col 1", 3)
    _GUICtrlListView_AddItem($listview, "Row 5: Col 1", 4)
    _GUICtrlListView_AddSubItem($listview, 4, "Row 5: Col 2", 1, 3)
    _GUICtrlListView_AddItem($listview, "Row 6: Col 1", 5)
    _GUICtrlListView_AddSubItem($listview, 5, "Row 6: Col 2", 1, 4)
    _GUICtrlListView_AddSubItem($listview, 5, "Row 6: Col 3", 2, 3)

    MsgBox(4096, "Information", "Removing Image Index 0")
    _GUIImageList_Remove($hImage, 0)

    _GUICtrlListView_DeleteAllItems(GUICtrlGetHandle($listview))

    ; Add items
    _GUICtrlListView_AddItem($listview, "Row 1: Col 1", 0)
    _GUICtrlListView_AddSubItem($listview, 0, "Row 1: Col 2", 1, 1)
    _GUICtrlListView_AddSubItem($listview, 0, "Row 1: Col 3", 2, 2)
    _GUICtrlListView_AddItem($listview, "Row 2: Col 1", 1)
    _GUICtrlListView_AddSubItem($listview, 1, "Row 2: Col 2", 1, 2)
    _GUICtrlListView_AddItem($listview, "Row 3: Col 1", 2)
    _GUICtrlListView_AddItem($listview, "Row 4: Col 1", 3)
    _GUICtrlListView_AddItem($listview, "Row 5: Col 1", 4)
    _GUICtrlListView_AddSubItem($listview, 4, "Row 5: Col 2", 1, 3)
    _GUICtrlListView_AddItem($listview, "Row 6: Col 1", 5)
    _GUICtrlListView_AddSubItem($listview, 5, "Row 6: Col 2", 1, 4)
    _GUICtrlListView_AddSubItem($listview, 5, "Row 6: Col 3", 2, 3)

    ; Loop until user exits
    Do
    Until GUIGetMsg() = $GUI_EVENT_CLOSE
    GUIDelete()
EndFunc   ;==>_Main

.. Tlem ?

[Tlem]

Oui. Qui a t'il ?

[DJSIR]

Hummmm. Pas sur un ListView il me semble.

et l'éxemple ci dessus ?

[Tlem]

J'avais rajouté :

il me semble.

Tout le monde peut avoir un oublis !!! Non ?

[DJSIR]

Oui..