CreateImageMenu()

Syntaxe

Resultat = CreateImageMenu(#Menu, WindowID [, Flags])

Crée un nouveau menu vide sur la fenêtre 'WindowID' qui porte le numéro #Menu et devient le menu en cours de création. Il est alors possible d'utiliser les fonctions MenuItem(), MenuBar(), etc... 'WindowID' peut être obtenu facilement grâce a la commande WindowID() de la librarie Window. Si #PB_Any est utilisé pour le paramètre '#Menu', le numéro du nouveau menu sera renvoyé dans 'Resultat'. Si le menu ne peut pas être créé, 'Resultat' prendra la valeur 0.

'Flags' est une combinaison des valeurs suivantes:

  #PB_Menu_ModernLook: Active le nouveau look et affiche un dégradé.

Pour gérer les évènements relatifs aux menus, voir la description des commandes suivantes:
WaitWindowEvent() (ou WindowEvent())
EventWindow()
EventMenu()

Exemple:

  If LoadImage(0, OpenFileRequester("Choisissez une icone", "", "", 0))
    If OpenWindow(0, 200, 200, 200, 100, "Image menu - exemple")
      If CreateImageMenu(0, WindowID(0))    
        MenuTitle("Project")
          MenuItem(1, "Open"   +Chr(9)+"Ctrl+O", ImageID(0))
          MenuItem(2, "Save"   +Chr(9)+"Ctrl+S")
          MenuItem(3, "Save as"+Chr(9)+"Ctrl+A")
          MenuItem(4, "Close"  +Chr(9)+"Ctrl+C")
      EndIf
      
      Repeat : Until WaitWindowEvent() = #PB_Event_CloseWindow
    EndIf
  EndIf

OS Supportés

Tous