GetMenuItemText()

Syntaxe

Resultat$ = GetMenuItemText(#Menu, Element)

Renvoie le texte d'un menu.

Arguments

#Menu	Le menu à utiliser.
Element	L'élément du menu.

Valeur de retour

Renvoie le texte du menu déroulant.

Exemple

  If OpenWindow(0, 200, 200, 300, 100, "Exemple GetMenuItemText")
  If CreateMenu(0, WindowID(0))
    MenuTitle("Projet")
    MenuItem(1, "Nouveau")
    MenuItem(2, "Ouvrir") 
  EndIf
  
  Repeat
    Event = WaitWindowEvent()          
    If Event = #PB_Event_Menu          ; un menu a été cliqué
      Select EventMenu()              
        Case 1
          ShowDebugOutput()
          Debug " le 1er menu a été cliqué dont le texte est : " + GetMenuItemText(0,1)   
        Case 2
          ShowDebugOutput()
          Debug " le 2ième menu a été cliqué dont le texte est : " + GetMenuItemText(0,2)
      EndSelect
    EndIf
  Until Event = #PB_Event_CloseWindow
  EndIf

Voir aussi

SetMenuItemText(), MenuItem()

OS Supportés

Tous