dbgrid - registros com cores diferentes
12/03/2006
0
como faço para colorir as linhas do dbgrid?
Rafael Santana
Posts
12/03/2006
Adriano Santos
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;
12/03/2006
Aroldo Zanela
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.
Clique aqui para fazer login e interagir na Comunidade :)