Is this a bug?

Code: Select all
If OpenWindow(0,0,0,270,140,#PB_Window_SystemMenu|#PB_Window_ScreenCentered,"ComboBoxGadget")
CreateGadgetList(WindowID(0))
ComboBoxGadget(0,10,10,250,100,#PB_ComboBox_Editable)
GadgetToolTip(0,"Editable ComboBox")
AddGadgetItem(0,-1,"ComboBox editable...")
ComboBoxGadget(1,10,40,250,100)
GadgetToolTip(1,"Tooltip for ComboBox")
For a=1 To 5
AddGadgetItem(1,-1,"ComboBox item "+Str(a))
Next
SetGadgetState(1,2)
Repeat
Until WaitWindowEvent()=#PB_Event_CloseWindow
EndIf