Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
How to add to vfp toolbar
Message
 
 
To
16/07/2003 15:43:20
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
00810792
Message ID:
00810924
Views:
18
This message has been marked as the solution to the initial question of the thread.
You can create you own toolbar. Here's an example of toolbar with buttons for Comment and Uncomment.
_screen.AddProperty("oFrmToolbar", NEWOBJECT("mytoolbar", "test"))
_screen.oFrmToolbar.Show()
RETURN

DEFINE CLASS mytoolbar AS toolbar

	Caption = "Toolbar1"
	Height = 28
	Left = 0
	Top = 0
	Width = 63
	Name = "mytoolbar"

	ADD OBJECT command1 AS commandbutton WITH ;
		Top = 3, ;
		Left = 5, ;
		Height = 22, ;
		Width = 23, ;
		Caption = "", ;
		Name = "Command1"

	ADD OBJECT command2 AS commandbutton WITH ;
		Top = 3, ;
		Left = 35, ;
		Height = 22, ;
		Width = 23, ;
		Caption = "", ;
		Name = "Command2"

	PROCEDURE command1.Click
                * Comment
		KEYBOARD "{ALT+o}m"
	ENDPROC
	PROCEDURE command2.Click
                * Uncomment
		KEYBOARD "{ALT+o}n"
	ENDPROC
ENDDEFINE
>Can i be able to add the
>
>indent
>unindent
>comment
>uncomment
>beautify
>
>to the vfp toolbar.
>
>TIA
--sb--
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform