向数据库更改完数据之后,按“提交”按钮,然后要在dbgrid中高亮显示我刚才修改过的那条记录!

解决方案 »

  1.   

    以下是奇偶行显示不同颜色,你的和这个一样,判断一下数据值赋颜色就可以了procedure TclientManagerForm.DBGrid1DrawColumnCell(Sender: TObject;
      const Rect: TRect; DataCol: Integer; Column: TColumn; State: TGridDrawState);
    begin
      if dm.QueryClientinfo.RecNo mod 2=0 then
      begin
        DBGrid1.Canvas.Brush.Color:=rgb(248,251,234);
        dbgrid1.Canvas.Font.Color:=clblack;
      end
      else  begin
        DBGrid1.Canvas.Brush.Color:=rgb(255,255,255);
        dbgrid1.Canvas.Font.Color:=clblack;
      end;
      if ((State = [gdSelected]) or (State=[gdSelected,gdFocused])) then
        begin
           DBGrid1.Canvas.Brush.Color:=RGB(200,210,164);
           DBGrid1.Canvas.FillRect(rect);
           DBGrid1.Canvas.font.color:=clBlack;
        end;
      DBGrid1.DefaultDrawColumnCell(Rect,DataCol,Column,State);