CheckBoxGadget()

Syntaxe

Resultat = CheckBoxGadget(#Gadget, x, y, Largeur, Hauteur, Texte$ [, Options])
Description
Crée un gadget checkbox (case à cocher) dans la GadgetList. 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 case à cocher sur la fenêtre, Largeur et Hauteur, ses dimensions Texte$ compris. Texte$ décrit l'utilité de la case à cocher, il est placé à sa droite.

GadgetToolTip() permet d'ajouter une 'mini aide' à ce gadget.

- GetGadgetState() est utilisé pour récupérer l'état du gadget.
- SetGadgetState() est utilisé pour changer l'état du gadget.

Le paramètre facultatif 'Options' peut être une des constantes suivantes:
  #PB_CheckBox_Right     : Aligne le texte de la case à cocher à droite (uniquement sous Windows).
  #PB_CheckBox_Center    : Centre le texte de la case à cocher (uniquement sous Windows).
  #PB_CheckBox_ThreeState: Crée une case à cocher qui peut avoir trois états (dont un état intermédiaire).
L'option #PB_CheckBox_ThreeState permet à une case à cocher de représenter l'état de plusieurs élements. L'état intermédiaire (ni coché, ni décoché) indique alors que certains élements sont dans un état différent des autres. En cliquant sur la case à cocher, l'utilisateur peut alors les remettre tous dans le même état, soit coché, soit décoché. L'état intermédaire peut donc uniquement être activé par le programme à l'aide de SetGadgetState().

Exemple

  If OpenWindow(0, 0, 0, 270, 160, "CheckBoxGadget", #PB_Window_SystemMenu | #PB_Window_ScreenCentered) 
    CheckBoxGadget(0, 10,  10, 250, 20, "Case à cocher standard")
    CheckBoxGadget(1, 10,  40, 250, 20, "Case à cocher (cochée)") : SetGadgetState(1, #PB_Checkbox_Checked)
    CheckBoxGadget(2, 10,  70, 250, 20, "CheckBox à trois états", #PB_CheckBox_ThreeState) : SetGadgetState(2, #PB_Checkbox_Inbetween)
    CheckBoxGadget(3, 10, 100, 250, 20, "Case à cocher (texte aligné à droite)", #PB_CheckBox_Right)
    CheckBoxGadget(4, 10, 130, 250, 20, "Case à cocher (texte centré)", #PB_CheckBox_Center)

    Repeat : Until WaitWindowEvent() = #PB_Event_CloseWindow
  EndIf

OS Supportés

Tous

<- CanvasOutput() - Gadget Index - ClearGadgetItems() ->