GetMenuItemState()

Syntaxe

Resultat = GetMenuItemState(#Menu, Element)

Renvoie l'état actuel de l'élément du #Menu spécifié. C'est seulement utile dans le cas d'un élément de type 'CheckBox'. Si l'élément est checké alors 'Resultat' = 1 sinon 'Resultat' = 0. La 'CheckBox' peut être affiché ou enlevée grâce à la commande SetMenuItemState().

Exemple

  If OpenWindow(0, 200, 200, 220, 100, "Exemple GetMenuItemState")
    If CreateMenu(0, WindowID(0))
      MenuTitle("Projet")
        MenuItem(1, "Changé")
        SetMenuItemState(0,1,1)    ; Affiche l'élément du menu comme étant coché.
    EndIf
    Repeat
      Evenement = WaitWindowEvent()          ; Attente d'un évenement
      If Evenement = #PB_Event_Menu          ; Evenement de type 'Menu'
        If EventMenu() = 1             ; Le premier élément du menu a été sélectionné
          If GetMenuItemState(0,1) = 1   ; Etat actuel de l'élément = coché
            SetMenuItemState(0,1,0)      ; On le décoche
          Else                           ; Etat actuel de l'élément = décoché
            SetMenuItemState(0,1,1)      ; On le coche
          EndIf
        EndIf
      EndIf
    Until Evenement = #PB_Event_CloseWindow
  EndIf

OS Supportés

Tous