darf ich Hilfe erwarten?
So geht's:
AutoIt
#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
Alles anzeigen