TabItem und ListView

#include <GUIConstantsEx.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>
#include <GUIConstantsEx.au3>
#include <GuiEdit.au3>
#include <ColorConstants.au3>
#include <GuiListView.au3>
#include <ListViewConstants.au3>
#include <WindowsConstants.au3>

#Region ### START Koda GUI section ### Form=
Local $Form1 = GUICreate("Form1", 600, 600, 192, 114)
Local $Tab1 = GUICtrlCreateTab(50, 16, 1105, 561)

Local $TabSheet1 = GUICtrlCreateTabItem("TabSheet1")
Local $Button1 = GUICtrlCreateButton("TabSheet1 Auswahl", 250, 450, 200, 33, 0)
Local $hListView = GUICtrlCreateListView("", 100, 100, 394, 268)
_GUICtrlListView_SetExtendedListViewStyle($hListView, BitOR($LVS_EX_FULLROWSELECT, $LVS_EX_CHECKBOXES))

Local $TabSheet2 = GUICtrlCreateTabItem("TabSheet2")

Local $Button2 = GUICtrlCreateButton("TabSheet2 Auswahl", 250, 450, 200, 33, 0)
Local $hListView2 = GUICtrlCreateListView("", 100, 100, 394, 268)
_GUICtrlListView_SetExtendedListViewStyle($hListView2, BitOR($LVS_EX_FULLROWSELECT, $LVS_EX_CHECKBOXES))

GUICtrlCreateTabItem("")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

GUISetState()

; Fügt die Spalten hinzu
_GUICtrlListView_AddColumn($hListView, "Spalte 1", 100)
_GUICtrlListView_AddColumn($hListView, "Spalte 2", 100)
_GUICtrlListView_AddColumn($hListView, "Spalte 3", 100)

; Fügt die Items hinzu
_GUICtrlListView_AddItem($hListView, "Zeile 1: Spalte 1", 0)
_GUICtrlListView_AddSubItem($hListView, 0, "Zeile 1: Spalte 2", 1)
_GUICtrlListView_AddSubItem($hListView, 0, "Zeile 1: Spalte 3", 2)
_GUICtrlListView_AddItem($hListView, "Zeile 2: Spalte 1", 1)
_GUICtrlListView_AddSubItem($hListView, 1, "Zeile 2: Spalte 2", 1)
_GUICtrlListView_AddItem($hListView, "Zeile 3: Spalte 1", 2)

_GUICtrlListView_AddColumn($hListView2, "Spalte 1", 100)
_GUICtrlListView_AddColumn($hListView2, "Spalte 2", 100)
_GUICtrlListView_AddColumn($hListView2, "Spalte 3", 100)

; Fügt die Items hinzu
_GUICtrlListView_AddItem($hListView2, "Zeile 1: Spalte 1", 0)
_GUICtrlListView_AddSubItem($hListView2, 0, "Zeile 1: Spalte 2", 1)
_GUICtrlListView_AddSubItem($hListView2, 0, "Zeile 1: Spalte 3", 2)
_GUICtrlListView_AddItem($hListView2, "Zeile 2: Spalte 1", 1)
_GUICtrlListView_AddSubItem($hListView2, 1, "Zeile 2: Spalte 2", 1)
_GUICtrlListView_AddItem($hListView2, "Zeile 3: Spalte 1", 2)

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Tab1
            Switch GUICtrlRead($Tab1)
                Case 0
                    MsgBox(4160, "Information", "TabSheet1")
                Case 1
                    MsgBox(4160, "Information", "TabSheet2")
            EndSwitch
        Case $Button1
            MsgBox(4160, "Information", "Items angehakt: " & _GUICltrListView_GetCheckedItems($hListView))

        Case $Button2
            MsgBox(4160, "Information", "Items angehakt: " & _GUICltrListView_GetCheckedItems($hListView2))
    EndSwitch
WEnd

Func _GUICltrListView_GetCheckedItems($hLV, $bArrayRet = False)
    Local $iCnt = _GUICtrlListView_GetItemCount($hLV), $sSelItems = ''
    For $iIndex = 0 To $iCnt - 1
        If _GUICtrlListView_GetItemChecked($hLV, $iIndex) Then $sSelItems &= $iIndex & '|'
    Next
    $sSelItems = StringTrimRight($sSelItems, 1)
    Return ($bArrayRet ? StringSplit($sSelItems, '|', 2) : $sSelItems)
EndFunc   ;==>_GUICltrListView_GetCheckedItems