Dicas - Colocando cores em um DBGrid

Você precisa estar logado para dar um feedback. Clique aqui para efetuar o login
Para efetuar o download você precisa estar logado. Clique aqui para efetuar o login
Confirmar voto
0
 (1)  (0)

Veja nesta dica, como colorir uma célula do DBGrid.

Colocando cores no DBGrid

 

procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect; DataCol: Integer; Column: TColumn; State: TGridDrawState);

var

  holdColor: TColor;

begin

  holdColor := DBGrid1.Canvas.Brush.Color;

  if Column.FieldName = 'Condiçao' then

    if (Column.Field.AsInteger mod 2 <> 0) then

    begin

      DBGrid1.Canvas.Brush.Color := clGreen;

      DBGrid1.DefaultDrawColumnCell(Rect, DataCol, Column, State);

      DBGrid1.Canvas.Brush.Color := holdColor;

    end;

end;

 
Você precisa estar logado para dar um feedback. Clique aqui para efetuar o login
Receba nossas novidades
Ficou com alguma dúvida?