Article ID: 135565
Article Last Modified on 2/15/2000
*** Program Tooltest.prg **************
PUBLIC oToolbar
oToolbar = CREATEOBJECT("UDToolbar")
oToolbar.show()
DEFINE CLASS UDToolbar AS Toolbar
Caption = "My Toolbar"
Height = 29
Left = 0
Top = 0
Width = 80
ADD OBJECT Cbsave AS Commandbutton WITH ;
Top = 4, ;
Left = 6, ;
Height = 23, ;
Width = 24, ;
Picture = "\vfp\wizards\wizbmps\wzsave.bmp", ;
Caption = "", ;
Default = .F., ;
Name = "CbSave"
ADD OBJECT Cbdelete AS Commandbutton WITH ;
Top = 4, ;
Left = 29, ;
Height = 23, ;
Width = 24, ;
Picture = "\vfp\wizards\wizbmps\wzdelete.bmp", ;
Caption = "", ;
Default = .F., ;
Name = "CbDelete"
ADD OBJECT Cbprint AS Commandbutton WITH ;
Top = 4, ;
Left = 52, ;
Height = 23, ;
Width = 24, ;
Picture = "\vfp\wizards\wizbmps\wzprint.bmp", ;
Caption = "", ;
Default = .F., ;
Name = "CbPrint"
ENDDEFINE
*** End program Tooltest.prg********************
Once the toolbar is visible, in the Command window enter this command:
HIDE WINDOW ALLfollowed by
SHOW WINDOW ALL
Additional query words: 3.00 VFoxWin
Keywords: KB135565