dbgrid - registros com cores diferentes

Question

pessoal t� usando um dbgrid e preciso deixar uma linha vermelha quando o cliente estiver com sua situa��o cancelada e linhas azuis quando a situa��o for normal...

como fa�o para colorir as linhas do dbgrid?

Adriano Santos · Answer

[quote:9e9def3ccf=�rafael miguel santana�]pessoal t� usando um dbgrid e preciso deixar uma linha vermelha quando o cliente estiver com sua situa��o cancelada e linhas azuis quando a situa��o for normal...

como fa�o para colorir as linhas do dbgrid?[/quote:9e9def3ccf]

procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
  DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin
  if Table1.FieldByName(�CONTINENT�).AsString = �South America� then
  begin
    DbGrid1.Canvas.Brush.Color := clBlue;
    DbGrid1.Canvas.Font.Color := clWhite;
  end
  else if Table1.FieldByName(�CONTINENT�).AsString = �North America� then
  begin
    DbGrid1.Canvas.Brush.Color := clRed;
    DbGrid1.Canvas.Font.Color := clWhite;
  end;
  DbGrid1.Canvas.FillRect(Rect);
  DbGrid1.DefaultDrawDataCell(rect,Column.Field,State);
end;

Aroldo Zanela · Answer

Colega,A forma de menor esfor�o que conhe�o, � utilizando a RxLib ou Jedi VCL, que possuem um componente com manipulador de evento espec�fico para isso....