Filas de distintos colores en un dbgrip.
 

Buenas soy nuevo en Delphi, estoy haciendo una aplicacion sencilla donde se lee una variable que determina una accion y dependiendo de esta la fila del dbgrip deberia cambiar a un color especifico, para que el cliente a simple vista pueda saber el status.

Mucho sabri agradecerle su colaboracion.

G.A.R.S.

Prueba esto....
 

Dentro del evento gridDrawColumnCell Prueba Esto G.A.R.S.

Código Delphi [-]
if Condicion then begin
//Elegir Color
grid.Canvas.Brush.Color := clRed;
//Pintar CELDA Seleccionada
TDBGrid(Sender).DefaultDrawColumnCell(Rect,DataCol,Column,State);
end;

Saludos....

algo asi:

procedure TFSelec.grdListadoDrawColumnCell(Sender: TObject; const Rect: TRect; DataCol: Integer;
Column: TColumn; State: TGridDrawState);
begin
case (DMSIU.cdsMaster.FieldByName('ntipocta').AsInteger) of
0:grdListado.Canvas.Brush.Color:=clYellow;
1:grdListado.Canvas.Brush.Color:=clMoneyGreen;
2:grdListado.Canvas.Brush.Color:=clSkyBlue;
3:grdListado.Canvas.Brush.Color:=clMedGray;
end;
grdListado.Canvas.FillRect(Rect);
grdListado.DefaultDrawColumnCell(Rect,DataCol,Column,State);
end;

en el ondrawcolumncell del dbgrid