Dbgrid

Delphi

02/06/2003

Como faço para mudar a cor de uma linha de um debriga a partir de uma informação da tablea.
Por exemplo: se o registro tiver cd_status=1, pintar linha de verde. Se tiver cd_status=2, pintar linha de amarelo.
Não posso utlizar info power.
Alguém poderia me dar m exmplo concreto por favor
Obrigado
P.S.--> Uso delphi6 + firebird


Kfe

Kfe

Curtidas 0

Respostas

Fer

Fer

02/06/2003

tente assim

procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject;
const 
Rect: TRect; DataCol: Integer; Column: TColumn;
State: TGridDrawState);
begin
If cd_status=1 then // condição
Dbgrid1.Canvas.Font.Color:= clFuchsia; // coloque aqui a cor desejada
Dbgrid1.DefaultDrawDataCell(Rect, dbgrid1.columns[datacol].field, State);
end;


claro q vc pode melhora-lo, ainda não testei
falow

FeR


GOSTEI 0
POSTAR