SetMenuTitleText()

Syntaxe

SetMenuTitleText(#Menu, Titre, Texte$)

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

Arguments

#Menu	Le menu à utiliser.
Titre	Le numéro du titre du menu.
Texte$	Le nouveau texte.

Valeur de retour

Aucune.

Exemple

  If OpenWindow(0, 200, 200, 300, 100, "Exemple SetMenuTitleText")
    ButtonGadget(0,70,10,150,30,"Changer le menu Projet")
    If CreateMenu(0, WindowID(0))
      MenuTitle("Projet")
      MenuItem(1, "Ouvrir")     
    EndIf
    
    Repeat
      Event = WaitWindowEvent()          
      If Event = #PB_Event_Gadget  
        Select EventGadget()
          Case 0 
           SetMenuTitleText(0,0,"Fichier") ; Change le menu "Projet" par "Fichier" 
        EndSelect
      EndIf
    Until Event = #PB_Event_CloseWindow
  EndIf

Voir aussi

GetMenuTitleText(), MenuTitle()

OS Supportés

Tous