Toolbar..

Mira este link ...

http://64.68.235.101/pinter/ShowArticle.ASP?ArtNum"5&Language=Spanish

Ejemplo ...

oToolBar = CreateObject ("MyToolBar")

oToolBar.Show ()

Read Events

Define Class MyToolBar as ToolBar

Top = 1
Left = 1
Width = 100

Caption = "Mi Toolbar"

Add Object cmdExit as cPtrButton with Caption = "Salir"
Add Object Sep1 as Separator
Add Object cmdHello as cPtrButton with Caption = "Hola"

Procedure cmdExit.Click
* - --
ThisForm.Release

Clear Events
EndProc

Procedure cmdHello.Click
Messagebox ("Aquí estoy!")
EndProc

EndDefine

Define Class cPtrButton as CommandButton

Height = 25
Width = 75
Enabled = .T.
Visible = .T.
Style = 0
FontName = "Arial"
FontSize = 8

EndDefine

David Amador Tapia
WebMaster de La Web de Davphantom
www.davphantom.net
Cartagena. Colombia
Tel. (5) 6581523 - 6621502 - Cel 310-6581865


"Oscar portorreal" escribió en el mensaje
news:

Saludos a todos.
Alguien podria facilitarme algun ejemplo o informacion para la realizacion
de un toolbar para colocarlo en mi formulario principal.

Gracias por sus comentarios...
Oscar Portorreal
Santo Domingo, Republica Dominicana