Code: Alles auswählen
#window = 0
#combo = 0
OpenWindow(#window, 0, 0, 200, 100, "Test", #PB_Window_SystemMenu| #PB_Window_ScreenCentered)
ComboBoxGadget(#combo, 10, 10, 150, 20, #PB_ComboBox_Editable)
SetActiveGadget(#combo)
i = 0
Repeat
Event = WaitWindowEvent()
If EventGadget() = #combo
i + 1
Debug i
EndIf
Until Event = #PB_Event_CloseWindow