GetMenuItemText()

Syntax

Text$ = GetMenuItemText(#Menu, Item)

Returns the text from the specified menu item.

Parameters

#Menu	The menu to use.
Item	The item to get the text from.

Return value

Returns the menu item text.

Example

  Enumeration ; Menu items
    #New
    #Open
    #Last
  EndEnumeration
  
  ; Set multiple menu items and get their text later...
  If OpenWindow(0, 200, 200, 300, 100, "GetMenuItemText Example")
    If CreateMenu(0, WindowID(0))
      MenuTitle("File")
      MenuItem(#New, "New")
      MenuItem(#Open, "Open")
      For i = #Last To 10
        MenuItem(i, "Item" + Str(i))
      Next
    EndIf
    
    Repeat
      Select WaitWindowEvent()
        Case #PB_Event_Menu
          em = EventMenu()
          Select em
            Case #New
              Debug "pressed: " + GetMenuItemText(0, #New)
            Case #Open
              Debug "pressed: " + GetMenuItemText(0, #Open)
            Case #Last To 10
              Debug "pressed: " + GetMenuItemText(0, em)
          EndSelect
        Case #PB_Event_CloseWindow
          Break
      EndSelect
    ForEver
  EndIf

See Also

SetMenuItemText(), MenuItem()

Supported OS

All