I just jumped in here and tried your code myself. Great code. Thanks for sharing!

>Try this code :
>
>

>PUBLIC oForm
>oForm = CREATEOBJECT('form1')
>oForm.visible = .t.
>
>
>**************************
>DEFINE CLASS form1 AS form
>	Height = 333
>	Width = 480
>	ShowWindow = 2
>	DoCreate = .T.
>	AutoCenter = .T.
>	Caption = "Form1"
>	toolbarref = .NULL.
>	Name = "Form1"
>
>	ADD OBJECT command1 AS commandbutton WITH ;
>		Top = 200, ;
>		Left = 290, ;
>		Height = 27, ;
>		Width = 84, ;
>		Caption = "Command1", ;
>	Name = "Command1"
>
>
>	ADD OBJECT command2 AS commandbutton WITH ;
>		Top = 200, ;
>		Left = 198, ;
>		Height = 27, ;
>		Width = 84, ;
>		Caption = "Command2", ;
>		Name = "Command2"
>
>	ADD OBJECT command3 AS commandbutton WITH ;
>		Top = 200, ;
>		Left = 106, ;
>		Height = 27, ;
>		Width = 84, ;
>		Caption = "Command3", ;
>	Name = "Command3"
>
>	ADD OBJECT text1 AS textbox WITH ;
>		Height = 23, ;
>		Left = 32, ;
>		Top = 28, ;
>		Width = 424, ;
>		Name = "Text1"
>
>	PROCEDURE Activate
>		IF  ISNULL(this.toolbarref)
>			this.ToolbarRef=CREATEOBJECT('MyToolbar')
>			this.ToolbarRef.Dock(0)   && or 1 , 2
>			this.ToolbarRef.visible = .t.
>		ENDIF
>	ENDPROC
>
>
>ENDDEFINE
>
>
>
>*********************************
>DEFINE CLASS mytoolbar AS toolbar
>	Caption = "Toolbar1"
>	Height = 28
>	Left = 0
>	Top = 0
>	Width = 99
>	ShowWindow = 1
>	Name = "mytoolbar"
>	ADD OBJECT command1 AS commandbutton WITH ;
>		Top = 3, ;
>		Left = 5, ;
>		Height = 22, ;
>		Width = 23, ;
>		Caption = "a", ;
>		Name = "Command1"
>	ADD OBJECT command2 AS commandbutton WITH ;
>		Top = 3, ;
>		Left = 27, ;
>		Height = 22, ;
>		Width = 23, ;
>		Caption = "b", ;
>		Name = "Command2"
>	ADD OBJECT command3 AS commandbutton WITH ;
>		Top = 3, ;
>		Left = 49, ;
>		Height = 22, ;
>		Width = 23, ;
>		Caption = "c", ;
>	Name = "Command3"
>	ADD OBJECT command4 AS commandbutton WITH ;
>		Top = 3, ;
>		Left = 71, ;
>		Height = 22, ;
>		Width = 23, ;
>		Caption = "d", ;
>		Name = "Command4"
>
>
>ENDDEFINE
>

>
>>Thats what I tried and no toolbar....
>>
>>:(