Dgrid Linha em vermelho

Delphi

12/09/2003

Tenho em um dbgrid(Tabela).............aparecendo um campo Exclusao.....

Gostaria que quando este campo tivesse preeenchido aparecesse a linha em vermelho

caso contrario

aparecesse a linha em branco(Como é padrao no dbgrid..)....


Evandro_araujo

Evandro_araujo

Curtidas 0

Respostas

Marcelo.c

Marcelo.c

12/09/2003

Tente assim:

No evento OnDrawColumnCell do DBGrid:

If campopreenchido then
  DBGrid1.Canvas.Brush.Color:= clRed
else
  DBGrid1.Canvas.Brush.Color:= clWhite;
DBGrid1.Canvas.FillRect(Rect);
DBGrid1.DefaultDrawDataCell(Rect,Column.Field, State);



GOSTEI 0
POSTAR