Probá modificando el evento OnPaint (si está disponible; o alguno que te permita "pintar" - OnDraw... - el objeto).
En este evento, usá la propiedad "Canvas" del Componente (si es un derivado de TGraphicalControl), o Handle (si deriva de TWinControl) para pintar la superficie antes de mostrar el texto.
|