CreateMenu()

Syntax

Ergebnis = CreateMenu(#Menu, WindowID)

Erstellt ein neues leeres Menü auf dem angegebenen Fenster 'WindowID'. Wenn #PB_Any als '#Menu' Parameter verwendet wird, dann wird der Identifier des neuen Menüs als 'Ergebnis' zurückgegeben. Konnte das Menü nicht erstellt werden, wird als 'Ergebnis' 0 zurückgegeben.

'WindowID' kann einfach mit dem WindowID() Befehl aus der Window Library ermittelt werden. Unmittelbar nach dem Erstellen des Menüs wird dieses das aktuelle Menü zum Einfügen weiterer Einträge. Es ist nun möglich, Befehle wie MenuTitle(), MenuItem(), MenuBar(), OpenSubMenu() etc. zu benutzen.

Um alle Menü-Ereignisse korrekt zu handhaben, sehen Sie in die Beschreibung der folgenden Befehle:
WaitWindowEvent() (alternativ WindowEvent())
EventWindowID()
EventMenuID()

Beispiel:

  If OpenWindow(0, 200, 200, 200, 100, #PB_Window_SystemMenu, "Menu Example")
    If CreateMenu(0, WindowID())    ; hier beginnt das Erstellen des Menüs...
      MenuTitle("Project")
        MenuItem(1, "Open"   +Chr(9)+"Ctrl+O")
        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

Unterstützte OS

All