stringgrid 如何改变某一 CELL 的背景颜色？ (100分)

stringgrid 如何改变某一 CELL 的背景颜色？ ，
CELL 中的字体如何可设置成不同？

procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;
Rect: TRect; State: TGridDrawState);
begin
with StringGrid1 do
begin
if (ACol = 3) and (ARow = 3) then
begin
Canvas.Brush.Color := clRed;
Canvas.FillRect(Rect);
Canvas.Font.Name := 'Courier New';
Canvas.TextOut(Rect.Left + 2, Rect.Top + 2, Cells[ACol, ARow]);
end;
end;
end;

呵呵， 就不说了。

有无 StringGrid.cell[acol,arow].color:=clred,这样的简单方法？
如何得到指定CELL 的颜色？
如有好的控件，请发个给我。
另，QUERY控件怎样把记录定位到我知道的字段值的位置？，如NAME=‘CLOITON’；

接受答案了.