GetMenuTitleText()

Syntaxe

Resultat$ = GetMenuTitleText(#Menu, Titre)

Renvoie le texte d'un titre d'un menu.

Arguments

#Menu	Le menu à utiliser.
Titre	L'index du titre du menu.

Valeur de retour

Renvoie le texte de l'en-tête du menu.

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é qui appartient à : " + GetMenuTitleText(0,0)   
        Case 2
          ShowDebugOutput()
          Debug " le 2ième menu a été cliqué qui appartient à : " + GetMenuTitleText(0,0)
      EndSelect
    EndIf
  Until Event = #PB_Event_CloseWindow
  EndIf

Voir aussi

MenuTitle(), SetMenuTitleText()

OS Supportés

Tous