Hallo,
gibt es eine Möglichkeit eine ComboBox automatisch aufklappen zu lassen?
Vielen Dank.
ComboBox automatisch aufklappen lassen
Moin,
hast du schon mal was von nem CodeArchiv gehört ... ?
hast du schon mal was von nem CodeArchiv gehört ... ?
Code: Alles auswählen
; German forum: http://www.purebasic.fr/german/archive/viewtopic.php?t=3098&highlight=
; Author: cnesm (updated for PB4.00 by blbltheworm)
; Date: 11. December 2003
; OS: Windows
; Demo: No
; Hinweis: Die Nutzung geschieht auf eigene Gefahr des Benutzers
If OpenWindow(0,20,150,270,140,"Liste von ComboBox anzeigen",#PB_Window_SystemMenu) And CreateGadgetList(WindowID(0))
ComboBoxGadget(0,10,10,250,100)
AddGadgetItem(0,-1,"ComboBox")
ButtonGadget(2, 10, 70, 200, 20, "Liste von ComboBox anzeigen")
Repeat
EventID = WaitWindowEvent()
Select EventID
Case #PB_Event_Gadget
If EventGadget()=2
SendMessage_(GadgetID(0),#CB_SHOWDROPDOWN,1,1)
EndIf
EndSelect
Until EventID=#PB_Event_CloseWindow
EndIf
v6.00