grid选中记录的颜色改变问题？？？？急。。。。

Question

当我在combobox中选中一条记录的某一个字段的值，我想该条记录的颜色突出。

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:=clgreen;
          dbgrid1.Canvas.Font.Color:=clblack;
       end;
   dbgrid1.DefaultDrawColumnCell(rect,datacol,column,state);
end;