Separadores en TToolbar con propiedad flat

[schs]

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]]

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

Saludos