mac os x - CreateToolBar

' createtoolbar.bmx

Import MaxGui.Drivers

Strict 

Local window:TGadget=CreateWindow("My Window",50,50,800,240)
Local panel_1:tgadget=CreatePanel(0,0,600,30,window)
Local toolbar:TGadget=CreateToolBar("icons2.png",0,0,0,0,panel_1)
SetToolBarTips toolbar,["New","Open","Save~nmy soul","4","5","6"] 
AddGadgetItem toolbar,"hello",GADGETITEM_TOGGLE,2,"This item is a quick test of GADGETITEM_TOGGLE"
DisableGadgetItem toolbar,2
RemoveGadgetItem toolbar,12
While WaitEvent()
	Select EventID()
		Case EVENT_GADGETACTION
			If EventSource()=toolbar 
				Print "ToolBar GadgetAction~nEventData()="+EventData()
			EndIf
		Case EVENT_WINDOWCLOSE
			End
	End Select
Wend