如何比较dbgrid相应数据项，并将该单元变颜色

Question

查询生成两个dbgrid,两个进行对比，把对应项不相同的进行单元的颜色改变，不是记录的颜色改变

Answer 1

对比的其实不是DBGrid，而应该是后端的数据吧，单元格变色得自己画了

Answer 2

http://www.delphibbs.com/keylife/iblog_show.asp?xid=4091把这个通读 或许对你有帮助

Answer 3

procedure TForm1.DBGridEh1DrawColumnCell(Sender: TObject;
  const Rect: TRect; DataCol: Integer; Column: TColumnEh;
  State: TGridDrawState);
begin
 if not (gdFixed in State) then
  begin
   if Column.index=1 //第一列.
    with DBGridEh1.Canvas do
    begin
    if DataModule1.Query1.fieldbyname('余额')>0 then
             Brush.Color := clred
      else
        Brush.Color:=clblue;
      FillRect(Rect);
      Font.Color:=clblack;
      TextOut(Rect.Left, Rect.Top, Field.AsString);
    end;
  end;  
end;