请各位帮忙，在线等！

Question

如何让dbgrid中的数据根据不同条件来显示不同颜色。
如
字段 f1 f2
当 f1>f2时这行显示红色
f1<f2时这行显示绿色
谢谢！

Answer 1

procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
  DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin
  if gdSelected in State then
  begin
    DBgrid1.Canvas.Brush.Color:=clred;
    Dbgrid1.canvas.fillrect(rect);
  end;
 
 DBGrid1.DefaultDrawColumnCell(Rect,Datacol,Column,State);自己拿回去改一下