Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
How to add to vfp toolbar
Message
 
 
À
16/07/2003 15:43:20
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Divers
Thread ID:
00810792
Message ID:
00810924
Vues:
19
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--
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform