Wenn #PB_Any als '#ToolBar' Parameter verwendet wird, dann wird die Nummer der neuen Toolbar als 'Ergebnis' zurückgegeben. Die 'WindowID' kann einfach mittels dem WindowID() Befehl ermittelt werden.
Diese Toolbar wird die aktuelle Toolbar für die Erstellung, zu der mittels den Befehlen ToolBarStandardButton(), ToolBarImageButton() und ToolBarSeparator() einige Elemente hinzugefügt werden können.
Ist 'Ergebnis' gleich 0, konnte die Toolbar nicht erstellt werden, andernfalls ist alles in Ordnung.
Die spätere Abfrage eines Ereignisses, d.h. ob ein Eintrag der ToolBar angeklickt wurde, erfolgt analog der Abfrage eines Menü-Eintrages mit dem Befehl EventMenu().
Beispiel:
If OpenWindow(0, 0, 0, 150, 25, "ToolBar", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
If CreateToolBar(0, WindowID(0))
ToolBarStandardButton(0, #PB_ToolBarIcon_New)
ToolBarStandardButton(1, #PB_ToolBarIcon_Open)
ToolBarStandardButton(2, #PB_ToolBarIcon_Save)
EndIf
Repeat
Event = WaitWindowEvent()
If Event = #PB_Event_Menu
Debug "ToolBar ID: "+Str(EventMenu())
EndIf
Until Event = #PB_Event_CloseWindow
EndIf
