控制stringgrid单元格的背景颜色
在SQL 2000 数据库中有一个字段（审核状态）。在stringgrid显示时，当审核状态为‘未审核’是为红色，当审核状态为‘已审核’是为绿色。。。
如果有代码请贴出代码。。谢谢！
在线求高手。。。急。急 急 急
[解决办法]
在TForm1.StringGrid1DrawCell中写：

if StringGrid1.Cells[ACol,ARow]='未审核' then
  StringGrid1.Canvas.Brush.Color :=clRed
else if StringGrid1.Cells[ACol,ARow]='已审核' then
  StringGrid1.Canvas.Brush.Color :=clGreen； 

procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;
  Rect: TRect; State: TGridDrawState);
begin
  with TStringGrid(Sender) do
  begin
    if ACol=5 then {5表示"审核"这一列;如果要整行变色，就去掉这一句}
    begin
      if Cells[ARow,ACol]='未审核' then {ACol->5}
         Canvas.Brush.Color:=clRed
      else
         Canvas.Brush.Color:=clGreen;

         Canvas.FillRect(Rect);
         Canvas.TextOut(Rect.Left+2,Rect.Top+2,Cells[ACol,ARow]);
    end;
  end;
end;