GetMenuItemState()

Syntax

Result = GetMenuItemState(#Menu, MenuItem)

Returns the menuitem state. This is only useful for 'check' like menu item. If the menu item is checked, then the 'Result' is 1, else the 'Result' is 0. The checkbox can be put on a menu item with the SetMenuItemState() command.

Example:

  If OpenWindow(0, 200, 200, 200, 100, "GetMenuItemState Example")
    If CreateMenu(0, WindowID(0))
      MenuTitle("Project")
        MenuItem(1, "Changed")
        SetMenuItemState(0,1,1)    ; set check mark for the previously created menu item
    EndIf
    Repeat
      Event = WaitWindowEvent()          ; wait for an event
      If Event = #PB_Event_Menu          ; a menu event appeared
        If EventMenu() = 1             ; first menu item was clicked
          If GetMenuItemState(0,1) = 1   ; actual item state = check marked
            SetMenuItemState(0,1,0)      ; now remove the check mark
          Else                           ; actual item state = no check mark
            SetMenuItemState(0,1,1)      ; now set the check mark
          EndIf
        EndIf
      EndIf
    Until Event = #PB_Event_CloseWindow
  EndIf

Supported OS

Windows, AmigaOS, MacOS X