Folgender Code hat mich irgendwie überrascht:
Code: Alles auswählen
If OpenWindow(0, 0, 0, 322, 150, "EditorGadget", #PB_Window_SystemMenu | #PB_Window_ScreenCentered) And CreateGadgetList(WindowID(0))
EditorGadget(0, 8, 8, 306, 133)
For a = 0 To 5
AddGadgetItem(0, -1, "Line "+Str(a))
Next
AddGadgetItem(0, -1, "Testlinie 1")
Item = CountGadgetItems(0) - 1
RemoveGadgetItem(0, Item)
;Debug CountGadgetItems(0)
AddGadgetItem(0, -1, "Testlinie 2")
Item = CountGadgetItems(0) - 1
RemoveGadgetItem(0, Item)
;Debug CountGadgetItems(0)
AddGadgetItem(0, -1, "Wieso ist das hier soweit unten???")
Repeat : Until WaitWindowEvent() = #PB_Event_CloseWindow
EndIf
Jetzt frag ich mich warum die Zeilen zwar geleert werden, aber offenbar nicht gelöscht.
Ist das im EditorGadget so Absicht, oder eventuell ein Bug?