dbgrid行和选择行的颜色改变

Question

如何改变被选择行的颜色
如何改变单号行，双号行的颜色（1行=红，2=黄，3=红，4行=黄......）
谢谢！！！

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:=clred;
    dbgrid1.canvas.fillrect(rect);
  end;
  DBGrid1.DefaultDrawColumnCell(Rect,Datacol,Column,State); 
自己 再改一下吧