Ciertamente cuando haces el Fillrect, rellenas d color el Canvas del DbGrid y el texto queda tapado... la mejor solución es dibujar el texto encima del canvas despues de rellenarlo... algo así
DBGRID.Canvas.Brush.Color := ClRed;
dbgrid.Canvas.FillRect(REct);
DbGrid.Canvas.TextOut(Rect.left +1, Rect.top +1, DbGrid.Fields[DataCol].AsString )
TextOut es un procedimiento que dibuja el texto que se le pasa en un canvas,
Datacol es una constante que se recive en el OnDrawColumCell que nos sirve de indice para saber que texto se tiene que extraer del grid para dibujarlo...
Espero que e sirva la ayuda
|