Code: Select all
OpenWindow(0, 100, 100, 300, 200, "ListView")
ListViewGadget(0, 100, 50, 100, 100, #PB_ListView_MultiSelect)
AddGadgetItem(0, -1, "Item 1")
AddGadgetItem(0, -1, "Item 2")
AddGadgetItem(0, -1, "Item 3")
AddGadgetItem(0, -1, "Item 4")
Repeat
event=WaitWindowEvent()
Select event
Case #PB_Event_Gadget
;assume gadget is #0
Debug "EventType()="+Str(EventType())
Select EventType()
Case #PB_EventType_Change ; works for selecting/deselecting line instead of #PB_EventType_LeftClick which only works with selecting
Debug "Line clicked on = "+Str(GetGadgetState(0))
For x=0 To 3
Debug " Item "+Str(x)+" = "+Str(GetGadgetItemState(0,x))
Next
EndSelect
EndSelect
Until event = #PB_Event_CloseWindow
