请教一个StringGrid设置背景颜色的问题。

Question

我想在使用stringgrid时，可以自己设置stringgrid各行的背景颜色，请教高手如何实现？

Answer 1

procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol,
  ARow: Integer; Rect: TRect; State: TGridDrawState);
begin
  if (ARow: = 2) or (ARow: = 5) then
  begin
    StringGrid1.Canvas.Font.Color := clred;
    StringGrid1.Canvas.TextRect(rect, rect.Left, rect.Top,
      StringGrid1.Cells[acol, arow]);
  end;
end;

Answer 2

to：lzy6204(畲族的DF)。这个方法可以改变字体的颜色，但是背景颜色不能改，这该怎么办？