pintar linea en grid segun condicion

[pgranados]

Con un componente de 1st Class lo logro en el evento OnDrawDataCell

Código Delphi [-]
procedure TFormaAdministrarXML.wwDBGrid1DrawDataCell(Sender: TObject;
  const Rect: TRect; Field: TField; State: TGridDrawState);
begin
      if DModuloEmpresa.FDQueryUsuarios.FieldByName('USUARIO').Value <> '' then
        wwDBGrid1.Canvas.Brush.Color:= wwDBGrid1.Color
      else
        wwDBGrid1.Canvas.Brush.Color:= clRed; // Vacio

      wwDBGrid1.DefaultDrawDataCell(rect, field, state);
end;