mit
Code: Alles auswählen
SendMessage_(GadgetID(Gadget),#EM_SETSEL,$fffffff,$fffffff)
Vielen Dank.
Code: Alles auswählen
SendMessage_(GadgetID(Gadget),#EM_SETSEL,$fffffff,$fffffff)
japp. Das Textfeld ist ein Kind des ComboboxGadget. Demzufolge musst DuThoPie hat geschrieben:Gibt es so etwas auch für das editierbare ComboBox-Gadget?
Wenn Von und bis gleich sind wird nichts markiertThoPie hat geschrieben:Danke.
Geht das auch ohne den Text zu markieren?
Code: Alles auswählen
OpenWindow(0, 0, 0, 640, 480, "Combo", #PB_Window_SystemMenu)
ComboBoxGadget(0, 5, 5, 100, 20, #PB_ComboBox_Editable)
ButtonGadget(1, m5, 30, 80, 20, "Ende")
Repeat
event = WaitWindowEvent()
Select event
Case #PB_Event_Gadget
eg = EventGadget()
Select eg
Case 1
SetFocus_(GadgetID(0))
SendMessage_(GadgetID(0),#CB_SETEDITSEL, 0, 3 << 16 + 3)
EndSelect
EndSelect
Until event = #PB_Event_CloseWindow