ComboBoxGadget()
Syntaxe
Resultat = ComboBoxGadget(#Gadget, x, y, Largeur, Hauteur [, Options])Description
Crée un gadget ComboBox (Liste déroulante) dans la GadgetList en cours. Si #PB_Any est utilisé pour le paramètre '#Gadget', le numéro du nouveau gadget sera renvoyé dans 'Resultat'. #Gadget sera le numéro retourné par la fonction EventGadget(). x et y représentent la position de la ligne de titre de la liste.
Attention: contrairement à tous les autres gadgets, la 'Hauteur' spécifie la hauteur de la liste déroulante quand elle est visible. Il faut donc mettre une valeur importante (> 100) sinon la liste ne sera pas visible. Lorsqu'une liste déroulante est créée, elle est vide.
Vous pouvez ajouter une 'mini aide' à ce gadget en utilisant GadgetToolTip().
Les commandes suivantes peuvent être utilisées pour agir sur le contenu de la liste :
- AddGadgetItem(): Ajoute un élément
- GetGadgetItemText(): Renvoie le texte de l'élément spécifié
- RemoveGadgetItem(): Supprime un élément
- ClearGadgetItemList(): Supprime tous les éléments
- SetGadgetItemText(): Change le texte de l'élément spécifié
- SetGadgetState(): Change l'élément sélectionné.
- GetGadgetState(): Récupère l'index de l'élément sélectionné.
- SetGadgetText(): Change le texte affiché. Si le ComboBoxGadget n'est pas éditable, le texte doit être dans la liste déroulante.
- GetGadgetText(): Renvoie le contenu texte de la zone visible de la ComboBox.
Le paramètre facultatif 'Options' peut être une combinaison des constantes suivantes:#PB_ComboBox_Editable : Rend la liste déroulante éditable #PB_ComboBox_LowerCase: Tous les textes entrés dans la combobox sont convertis en minuscules #PB_ComboBox_UpperCase: Tous les textes entrés dans la combobox sont convertis en majusculesExemple:
If OpenWindow(0, 0, 0, 270, 140, "ComboBoxGadget", #PB_Window_SystemMenu | #PB_Window_ScreenCentered) And CreateGadgetList(WindowID(0)) ComboBoxGadget(0, 10, 10, 250, 100, #PB_ComboBox_Editable) AddGadgetItem(0, -1, "Liste déroulante éditable...") ComboBoxGadget(1, 10, 40, 250, 100) For a = 1 To 5 : AddGadgetItem(1, -1,"Elément de liste déroulante " + Str(a)) : Next a SetGadgetState(1, 2) ; sélectionne le troisième élément (la numérotation commence à 0) Repeat : Until WaitWindowEvent() = #PB_Event_CloseWindow EndIf
OS Supportés
Tous