SetActiveGadget()

Syntaxe

SetActiveGadget(#Gadget)

Active le #Gadget spécifié (donne le focus). Cette fonction est utilisée principalement avec ComboBoxGadget() and StringGadget(). Cela permet a un gadget d'obtenir le focus du clavier.

Exemple:

  If OpenWindow(0, 0, 0, 270, 140, "SetActiveGadget", #PB_Window_SystemMenu | #PB_Window_ScreenCentered) And CreateGadgetList(WindowID(0))
    StringGadget  (0, 10, 10, 250, 20, "bla bla...")
    ComboBoxGadget(1, 10, 40, 250, 100)
    For a = 1 To 5 : AddGadgetItem(1, -1, "Elément de liste déroulante " + Str(a)) : Next
    SetGadgetState(1, 2)                ; sélectionne le troisième élément (la numérotation commence à 0)
    ButtonGadget  (2, 10,  90, 250, 20, "Activer le gadget de saisie de texte")
    ButtonGadget  (3, 10, 115, 250, 20, "Activer la liste déroulante")
    Repeat
      Evenement = WaitWindowEvent()
      If Evenement = #PB_Event_Gadget
        Select EventGadget()
          Case 2 : SetActiveGadget(0)   ; Activer le gadget 'saisie de texte'
          Case 3 : SetActiveGadget(1)   ; Activer la liste déroulante
        EndSelect
      EndIf
    Until Evenement = #PB_Event_CloseWindow
  EndIf

OS Supportés

Tous