Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   OOP (https://www.clubdelphi.com/foros/forumdisplay.php?f=5)
-   -   Separadores en TToolbar con propiedad flat (https://www.clubdelphi.com/foros/showthread.php?t=60895)

schs 17-10-2008 11:52:37

Separadores en TToolbar con propiedad flat
 
Buenas,

ante todo me presento ya que es mi primer mensaje en este foro, y espero participar mucho.

ahora mi pregunta: ¿es posible hacer invisibles los separadores de una toolbar cuando tiene la propiedad flat activada? por si no queda claro, cuando la toolbar no es flat, los separadores son simplemente un espacio en blanco, pero cuando es flat, se dibuja una linea vertical que me gustaría eliminar.

se me han ocurrido dos cosas pero ninguna me sirve

1) usar el evento oncustomdrawbutton de la toolbar. no sirve porque solo entra para los botones, y no para los separadores.

2) usar el evento oncustomdraw de la toolbar. en principio bien, puedo dibujar todos los botones y separadores, cada uno como quiera, con algo así:

for i:=0 to Sender.ButtonCount-1 do
sender.oncustomdrawbutton(sender,sender.Buttons[i],[],dd);

El problema es que no se cómo obtener el estado del boton, TCustomDrawState, que necesita el metodo oncustomdrawbutton, así que no puedo distinguir si está pulsado, activo, habilitado...


Agradecería mucho cualquier ayuda.
Un saludo

Lepe 17-10-2008 12:32:40

Quita el separador e introduce un panel sin bordes, ni caption, ni efecto 3D.

Saludos


La franja horaria es GMT +2. Ahora son las 04:37:48.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi