Delphi - Columnas unidas

Hola a todos!!!

hay alguna forma de que en un StringGrid los titulos de las columnas se puedan "justificar", o sea, se vea algo parecido a esto:

+----------------+-------------------+--------------------+-------------------+
| | 1º trimestre | 2º trimestre | 3º trimestre |
+----------------+-----+------+-----+-----+------+-----+-----+------+-----+
| | P | T | A | P | T | A | P | T | A |
+----------------+-----+------+-----+------+-----+-----+-----+------+-----+
| Mañana | | | | | | | | | |
+----------------+-----+------+-----+------+-----+-----+-----+------+-----+
| Tarde | | | | | | | | | |
+----------------+-----+------+-----+------+-----+-----+-----+------+-----+
| Noche | | | | | | | | | |
+----------------+-----+------+-----+------+-----+-----+-----+------+-----+

(Espero se vea bien)

La idea es justificar los títulos de las columnas, como en el Exel, no busco un componente que lo haga, busco poder hacerlo yo.

Desde ya, muchísimas gracias.

Tendría que heredar el componente TStringGrid (y no te garantizo que no sea peor y que tengas que ir más atrás en la herencia) y hacer todo el dibujado tú mismo... Excepto que quieras desarrollar un componente de este tipo para competir con los existentes, no te lo aconsejo en lo absoluto.

Ernesto

PARA JUSTIFICAR LAS COLUMAS DEBES IR A UNA PROPIEDAD LLAMADA ONDRAWCELLS Y DEBERAS TRABAJAR CON EL CANVAS
ESTE EVENTO TE PROVEE DE LA FILA Y LA COLUMNA EL CANVAS TIENE ALGUNAS PROPIEDADES QUE TE PERMITEN ESCRIBIT EJ TEXTRECTOUT() ESPERO QUE TE SIRVA