请问如何实现双击DBGrid中的一行时，该行的颜色变成其它的颜色

Question

并不要求对数据记录的值进行判断,也就是说没有什么条件,只要是双击的行,颜色就改变,,,
    各位,抽点时间,摆脱

Answer 1

参照下面代码很容易实现
procedure Tfrmmain.DBGrid1DblClick(Sender: TObject);
begin
  if (ADOQuery1.FieldByName('hunyin').asstring)='已婚' then
        begin
          DBGrid1.Canvas.Font.Color:=clblue;
        end;
  DBGrid1.DefaultDrawColumnCell(rect,datacol,column,state);
end;

Answer 2

DBGrid1.Canvas.Font.Color:=clblue;
 DBGrid1.DefaultDrawColumnCell(rect,datacol,column,state);