Colorir linha DBGrid

Question

Minha dbgrid colore a fonte da linha para vermelho conforme uma condi��o dos campos mostrados ( manipulado no evento DBGrid1DrawColumnCell). At� a� Ok. O problema � que quando a mesma est� selecionada...

P_lima · Answer

Use esta linha de comando, n�o sei se � o que vc quer, mas foi o que eu entendi. Abra�o

Try
If TablePedi.FieldByName(�CAMPO TABELA�).AsString = �P� Then
Begin
DBGrid3.Canvas.Font.Color := clBlack;
DBGrid3.Canvas.Brush.Color := $00FFFF80;
End
Else If TablePedi.FieldByName(�CAMPO TABELA�).AsDateTime < Date Then
Begin
DBGrid3.Canvas.Font.Color := clBlack;
DBGrid3.Canvas.Brush.Color := clRed;
End
Else If TablePedi.FieldByName(�PED_DATA�).AsDateTime < Date Then
Begin
DBGrid3.Canvas.Font.Color := clBlack;
DBGrid3.Canvas.Brush.Color := $00B0FFFF;
End
Else
Begin
DBGrid3.Canvas.Font.Color := clBlack;
DBGrid3.Canvas.Brush.Color := clWhite;
End;
Except
End;
DBGrid3.DefaultDrawColumnCell(Rect, DataCol, Column, State);

end;

// p_lima{...}

F�rum Colorir linha DBGrid #185940