FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Como puedo en una Toolbar...
Posts: 1380
Joined: Fri Oct 14, 2005 01:28 PM
Como puedo en una Toolbar...
Posted: Thu Sep 01, 2011 02:20 PM
Estimados
Tengo una Toolbar que se vé de la siguiente manera


Lo que pretendo es, como muestro, separar el icono de Ayuda del resto
Al ícono de fondo blanco lo hice así:
Code (fw): Select all Collapse
oImgMnBrw1:AddMasked( TBitmap():Define( "bmp_Trans32",, oWChld ), "bmp_Trans32" )  // bmp_Trans32 es un ícono vacio de fondo transparente

Pero por lo visto no toma el efecto deseado

Como puedo hacerlo?
Resistencia - "Ciudad de las Esculturas"

Chaco - Argentina
Posts: 408
Joined: Fri Jan 29, 2010 08:14 PM
Re: Como puedo en una Toolbar...
Posted: Fri Sep 02, 2011 06:20 PM

Hola Mario:

Usa las DATAs de la clase:

Ejemplo;

Si creas una barra, al boton que quieras mover le asignas un objeto y luego una vez creado le cambias la posicion asi:

ejemplo:

oSalir:nleft := oBar:nRight - 70

Un saludo
JLL
msn: fwh-jll@hotmail.es

Libreria: FWH/FWH1109 + Harbour 5.8.2 + Borland C++ 5.8.2
Editor de Recursos: PellecC
ADA, OURXDBU
S.O: XP / Win 7 /Win10
Blog: http://javierlloris.blogspot.com.es/
e-mail: javierllorisprogramador@gmail.com
Posts: 883
Joined: Thu Dec 24, 2009 12:46 AM
Re: Como puedo en una Toolbar...
Posted: Fri Sep 02, 2011 06:56 PM

Es posible hacer lo mismo con la RIBBONBAR????

Intenté hacerlo igual con un Grupo de Botones, pero no funcionó....

=====>

Bayron Landaverry
xBasePHP.com
(215)2226600 Philadelphia,PA, USA
MayaBuilders@gMail.com
Guatemala

FWH25.06--Harbour 3.0.0--BCC7.7--UEstudio 10.10
Windows 10

FiveWin, One line of code and it's done...

Posts: 408
Joined: Fri Jan 29, 2010 08:14 PM
Re: Como puedo en una Toolbar...
Posted: Fri Sep 02, 2011 10:55 PM

Hola Bayron:

No estoy usando RIBBONBAR de momento y tampoco tengo la clase, cuando vea que esta 100% depurada ya me metere en ello.

Solo he visto algunos fuentes que se han publicado en el foro, pero en principio yo diria que no tendrias que tener ningun problema, mira la clase y mira las datas que tiene, tiene que tener el objeto las propiedades como todos.

Un saludo
JLL
Msn: jll-fwh@hotmail.es

Libreria: FWH/FWH1109 + Harbour 5.8.2 + Borland C++ 5.8.2
Editor de Recursos: PellecC
ADA, OURXDBU
S.O: XP / Win 7 /Win10
Blog: http://javierlloris.blogspot.com.es/
e-mail: javierllorisprogramador@gmail.com
Posts: 1380
Joined: Fri Oct 14, 2005 01:28 PM
Re: Como puedo en una Toolbar...
Posted: Sat Sep 03, 2011 12:55 PM

muchas gracias!

Resistencia - "Ciudad de las Esculturas"

Chaco - Argentina
Posts: 1380
Joined: Fri Oct 14, 2005 01:28 PM
Re: Como puedo en una Toolbar...
Posted: Mon Sep 05, 2011 02:02 PM
jjl;
voy a necesitar mas ayuda porque mirando el include de la toolbar tengo;

Code (fw): Select all Collapse
#xcommand DEFINE TBBUTTON ;
[ OF <oToolBar> ] ;
[ ACTION <uAction> ] ;
[ TOOLTIP <cToolTip> ] ;
[ PROMPT <cPrompt> ] ;
[ WHEN <uWhen> ] ;
[ MESSAGE <cMsg> ] ;
=> ;
<oToolBar>:AddButton( [<{uAction}>], [<cToolTip>], [<cPrompt>],;
[<{uWhen}>], [<cMsg>] )[/code]

y para sacarme la duda miro el fuente (aunque arriba esta mas que claro)
Code (fw): Select all Collapse
METHOD AddButton( bAction, cToolTip, cText, bWhen, cMsg ) CLASS TToolBar

   AAdd( ::aButtons, { bAction, cToolTip, cMsg,, bWhen } )
   
   TBAddButton( ::hWnd, Len( ::aButtons ), Len( ::aButtons ), cText )

   if bWhen != nil .and. ! Eval( bWhen )
      ::EnableButton( Len( ::aButtons ), .f. )
   endif         

return nil


Asi es que la verdad es que no se como asignar un obj al boton.
Resistencia - "Ciudad de las Esculturas"

Chaco - Argentina
Posts: 366
Joined: Wed Aug 30, 2006 05:25 PM
Re: Como puedo en una Toolbar...
Posted: Mon Sep 05, 2011 10:58 PM

MarioG, No puedo ver tu imagen.
Si lo que deseas es cambiar de lugar el boton, intenta de esta manera que es como te dijo JLL.

Te dejo un ejemplo:

DEFINE BUTTON oBoton6 OF oBtnBar RESNAME "CERRAR" ;
MESSAGE "Cerrar mes de trabajo" ;
ACTION( TUACCION() ) ;
PROMPT "Cerrar mes." FONT oFontBar

oBoton6:nleft := oBtnBar:nRight + 560

Como está me deja este boton al final de la buttonbar. Juega con los valores para dejarlo donde deseas.
Saludos

Ruben Fernandez

Gracias y Saludos

Ruben Fernandez - Uruguay

FWH 11.06, Harbour, Borland 5.82
Posts: 1380
Joined: Fri Oct 14, 2005 01:28 PM
Re: Como puedo en una Toolbar...
Posted: Tue Sep 06, 2011 02:10 PM

Ruben:
Gracias por responder
Mas allá de que no se vea el gráfico, mi consulta fue dirigida al uso de botones mediane ToolBar

Saludos

Resistencia - "Ciudad de las Esculturas"

Chaco - Argentina

Continue the discussion