Como puedo en una Toolbar...

Como puedo en una Toolbar...

Postby MarioG » Thu Sep 01, 2011 2:20 pm

Estimados
Tengo una Toolbar que se vé de la siguiente manera
Image

Lo que pretendo es, como muestro, separar el icono de Ayuda del resto
Al ícono de fondo blanco lo hice así:
Code: Select all  Expand view  RUN
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
User avatar
MarioG
 
Posts: 1380
Joined: Fri Oct 14, 2005 1:28 pm
Location: Resistencia - Chaco - AR

Re: Como puedo en una Toolbar...

Postby jll-fwh » Fri Sep 02, 2011 6: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
User avatar
jll-fwh
 
Posts: 408
Joined: Fri Jan 29, 2010 8:14 pm
Location: Meliana - Valencia

Re: Como puedo en una Toolbar...

Postby Bayron » Fri Sep 02, 2011 6:56 pm

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

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

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

FWH12.04||Harbour 3.2.0 (18754)||BCC6.5||UEstudio 10.10||
Windows 7 Ultimate

FiveWin, One line of code and it's done...
User avatar
Bayron
 
Posts: 815
Joined: Thu Dec 24, 2009 12:46 am
Location: Philadelphia, PA

Re: Como puedo en una Toolbar...

Postby jll-fwh » 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
User avatar
jll-fwh
 
Posts: 408
Joined: Fri Jan 29, 2010 8:14 pm
Location: Meliana - Valencia

Re: Como puedo en una Toolbar...

Postby MarioG » Sat Sep 03, 2011 12:55 pm

muchas gracias!
Resistencia - "Ciudad de las Esculturas"
Chaco - Argentina
User avatar
MarioG
 
Posts: 1380
Joined: Fri Oct 14, 2005 1:28 pm
Location: Resistencia - Chaco - AR

Re: Como puedo en una Toolbar...

Postby MarioG » Mon Sep 05, 2011 2:02 pm

jjl;
voy a necesitar mas ayuda porque mirando el include de la toolbar tengo;

Code: Select all  Expand view  RUN
 
#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: Select all  Expand view  RUN
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
User avatar
MarioG
 
Posts: 1380
Joined: Fri Oct 14, 2005 1:28 pm
Location: Resistencia - Chaco - AR

Re: Como puedo en una Toolbar...

Postby Ruben Fernandez » 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
Ruben Fernandez
 
Posts: 366
Joined: Wed Aug 30, 2006 5:25 pm
Location: Uruguay

Re: Como puedo en una Toolbar...

Postby MarioG » Tue Sep 06, 2011 2: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
User avatar
MarioG
 
Posts: 1380
Joined: Fri Oct 14, 2005 1:28 pm
Location: Resistencia - Chaco - AR


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: FiveWiDi and 104 guests