Code: Alles auswählen
If OpenWindow(0, 0, 0, 270, 175, "ListViewGadget", #PB_Window_SystemMenu | #PB_Window_ScreenCentered) And CreateGadgetList(WindowID(0))
ListViewGadget(0, 10, 10, 250, 120)
For a = 1 To 12
AddGadgetItem (0, -1, "Item " + Str(a) + " of the Listview")
Next
SetGadgetState(0, 9)
ButtonGadget(1, 10, 140, 250, 25, "Read", #PB_Button_Default)
Repeat
WinEvent = WaitWindowEvent()
If WinEvent = #PB_Event_Gadget And EventGadget() = 1
For a = 0 To CountGadgetItems(0) - 1
Debug GetGadgetItemText(0, a, 0)
Next
Debug "---"
EndIf
Until WinEvent = #PB_Event_CloseWindow
EndIf
Ergebnis$ = GetGadgetItemText(#Gadget, Eintrag, Spalte)
- ListViewGadget() - 'Eintrag' ist die Nummer des Eintrags, dessen Inhalt Sie ermitteln wollen. 'Spalte' wird ignoriert.
c ya,
nco2k