Colorear secciones en un THeaderControl
En un aplicación en BCB 6 me interesaría poder colorear o diferenciar de alguna manera determinadas secciones de un THeaderControl. Estuve mirando por el foro y sólo encontré una respuesta de roman en la que cita el evento OnCustomDraw en Pintar de un color un THeaderSection o la cabecera de un TListColumn. He estado mirando y, al menos en Builder, tal evento no existe para THeaderControl o no soy capaz de encontrarlo. ¿Alguien me puede guiar en como modificar el aspecto de una sección en este elemento?
|
A mi un código como este me funciona (lo he probado en una versión más nueva de Delphi, eso sí):
Lo único importante, es que la tercera columna (en este caso Index=2) hay que definirla con la propiedad Style=hsOwnerDraw. Si no defines así esa propiedad, el evento no salta sobre esa columna. Es decir, en mi ejemplo, que tiene definidas tres columnas, y sólo la tercera definida como hsOwnerDraw, el evento OnDrawSection sólo salta en la tercera. |
¡Perfecto! Muchas gracias.
|
La franja horaria es GMT +2. Ahora son las 15:58:40. |
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