Fórum Campos do DBgrid com cores.... #227105

20/04/2004

0

Ola este codigo deixa a linha de um dbgrid colorido...

If Datamodule2.ADOColeta.FieldByName(´gc_b´).AsString < Datamodule2.ADOColeta.FieldByName(´gc_n´).AsString Then
dbgrid1.Canvas.Font.Color := clred;  // define cor
DBgrid1.DefaultDrawDataCell(Rect,dbgrid1.Columns[DataCol].Field,state);  // exibe



como fazer para deixar somente um campo colorido ao invés de deixar a linha de todos os campos.... ????

gostaria de deixar somente o campo gc_b com outra cor... como fazer???


Danielvbhp

Danielvbhp

Responder

Posts

20/04/2004

Fer_nanda

isso muda a cor de uma célula
if (Column.Field.FieldName = ´NOMEDOCAMPO´) then
begin
if condição then // coloque aqui sua condição
begin
DBGrid1.Canvas.Brush.Color:= clAqua;
DBGrid1.Canvas.Font.Color:= clWindowText;
DBGrid1.Canvas.FillRect(Rect);
DBGrid1.DefaultDrawColumnCell(Rect, DataCol, Column, State);
end;
end;



mas se vc quiser deixar toda a coluna referente ao campo de uma determinada cor, pode colocar isso
dbgrid.Columns[0].Color := clRed;



Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar