DBGrid双击后颜色能不能修改？

Question

DBGrid1双击后把该条记录的内容写入Memo1中，同时该条记录的颜色想换一下以表明该条记录已选过
双击多条记录后，双击过的记录都变一下颜色
能不能实现？

Answer 1

能，双击时可以设置一个bool变量设为真，再在drawcell中判断这个变量为真时修改brush颜色，再调用缺省画刷应高就可以

Answer 2

DBGridEh1我用的是这个控件，可以显示备注型字段
如果没有备注型字段可以，但是有备注型字段就不行。

Answer 3

DataSet加个字段标记一下,然后drawcolumncell时判断一下标记字段就可以了

Answer 4

procedure TfrmTyxwbl.DBGridEh5DrawColumnCell(Sender: TObject; const Rect: TRect;
  DataCol: Integer; Column: TColumnEh; State: TGridDrawState);
begin
  with (Sender as TDBGridEh).Canvas do
  begin
    if ADOQuery5.FieldByName('IsSel').AsBoolean then
    begin
      Brush.Color:=clSkyBlue;
      FillRect(Rect);
      DBGridEh5.DefaultDrawColumnCell(Rect,DataCol,Column,
      [gdFixed,gdFocused,gdSelected]);
    end
    else
    begin
      Brush.Color:=clBtnFace;
      FillRect(Rect);
      DBGridEh5.DefaultDrawColumnCell(Rect,DataCol,Column,
      [gdFixed,gdFocused,gdSelected]);
    end;
  end;
end;