Der aus einer editierbaren Combobox ausgewählte Wert kann nicht mit getgadgettext() ausgelesen werden.
Stattdessen erhält man die vorangegangenen Wert.
Arbeitet man nicht mit Bindevent() funktioniert alles wie es sollte.
Code: Alles auswählen
Procedure event()
If EventGadget()=2
If EventType()=#PB_EventType_Change
Debug "Is this >"+GetGadgetText(2)+"< the selected item? yes|no"
EndIf
EndIf
EndProcedure
BindEvent(#PB_Event_Gadget, @event())
If OpenWindow(0, 0, 0, 270, 180, "ComboBoxGadget", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
ComboBoxGadget(2, 10, 70, 250, 21, #PB_ComboBox_Editable)
For a = 1 To 5
AddGadgetItem(2, -1,"ComboBox item " + Str(a))
Next
Repeat
Until WaitWindowEvent() = #PB_Event_CloseWindow
EndIf