Comboboxgadget und Setgadgettext

Für allgemeine Fragen zur Programmierung mit PureBasic.
Calloway
Beiträge: 106
Registriert: 15.09.2004 23:26

Comboboxgadget und Setgadgettext

Beitrag von Calloway »

Hallo!

Es gab einen Thread im Archiv, der sich schon mit dem Thema befasste, aber ohne Ergebnis blieb:
http://www.robsite.de/php/pureboard-arc ... oboxgadget

Gibt es mittlerweile schon eine Möglichkeit, das Comboboxgadgetfeld mittels Setgadgettext mit einem BELIEBIGEN Text zu versehen? AFAIK kann man zur Zeit nur Texte setzen, die auch in der Popupliste stehen.
Benutzeravatar
PBZecke
Beiträge: 399
Registriert: 02.09.2004 17:34

Beitrag von PBZecke »

Mit API "SetWindowText_()" ging das schon immer.

Code: Alles auswählen

; PureBasic Visual Designer v3.90 build 1360


;- Window Constants
;
Enumeration
  #Window_0
EndEnumeration

;- Gadget Constants
;
Enumeration
  #Button_0
  #Combo_0
EndEnumeration


Procedure Open_Window_0()
  If OpenWindow(#Window_0, 298, 244, 452, 118,  #PB_Window_SystemMenu | #PB_Window_SizeGadget | #PB_Window_TitleBar , "New window ( 0 )")
    If CreateGadgetList(WindowID())
      ButtonGadget(#Button_0, 273, 39, 117, 39, "Drücke Button!")
      ComboBoxGadget(#Combo_0, 39, 39, 195, 39,#PB_ComboBox_Editable)
      
    EndIf
  EndIf
EndProcedure

Open_Window_0()

Repeat
  
  Event = WaitWindowEvent()
  
  If Event = #PB_EventGadget
    
    ;Debug "WindowID: " + Str(EventWindowID())
    
    GadgetID = EventGadgetID()
    
    If GadgetID = #Button_0
      SetWindowText_(GadgetID(#Combo_0),"Das soll in die ComboBox!")
      
    ElseIf GadgetID = #Combo_0
      Debug "GadgetID: #Combo_0"
      
    EndIf
    
  EndIf
  
Until Event = #PB_EventCloseWindow

End
;
Nein, ich habe die Suche nicht benutzt, und deshalb auch nichts dazu gefunden... :lol:
Calloway
Beiträge: 106
Registriert: 15.09.2004 23:26

Beitrag von Calloway »

In der Tat! :o :o :o :o

Ich frage mich, warum da noch niemand früher darauf gekommen ist, bei der ersten Anfrage zu dem Thema zu posten.

Vielen lieben Dank für die Lösung. :allright:
Vielleicht behebt Fred mal den Fehler in einer der nächsten Updates...

--
Gruß, Martin.
Benutzeravatar
Andre
PureBasic Team
Beiträge: 1765
Registriert: 11.09.2004 16:35
Computerausstattung: MacBook Core2Duo mit MacOS 10.6.8
Lenovo Y50 i7 mit Windows 10
Wohnort: Saxony / Deutscheinsiedel
Kontaktdaten:

Beitrag von Andre »

Ich werde Fred mal auf dieses Beispiel und die fehlende Unterstützung in der originalen Gadget Lib hinweisen. :)
Bye,
...André
(PureBasicTeam::Docs - PureArea.net | Bestellen:: PureBasic | PureVisionXP)
Benutzeravatar
PBZecke
Beiträge: 399
Registriert: 02.09.2004 17:34

Beitrag von PBZecke »

@Calloway: Bitte!

@Andre: Bei der Gelgenheit auch um eine Konstante für das wichtige aber nicht offiziell unterstützte Event ComboBox-Change erbitten. Zur Zeit nehme ich immer die Ziffer 1.
Nein, ich habe die Suche nicht benutzt, und deshalb auch nichts dazu gefunden... :lol:
Benutzeravatar
Andre
PureBasic Team
Beiträge: 1765
Registriert: 11.09.2004 16:35
Computerausstattung: MacBook Core2Duo mit MacOS 10.6.8
Lenovo Y50 i7 mit Windows 10
Wohnort: Saxony / Deutscheinsiedel
Kontaktdaten:

Beitrag von Andre »

PBZecke hat geschrieben:@Andre: Bei der Gelgenheit auch um eine Konstante für das wichtige aber nicht offiziell unterstützte Event ComboBox-Change erbitten. Zur Zeit nehme ich immer die Ziffer 1.
Werde ich noch nachreichen.
Bye,
...André
(PureBasicTeam::Docs - PureArea.net | Bestellen:: PureBasic | PureVisionXP)
Antworten