如何使StringGrid某一网格变色，如何让焦点移入StringGrid中指定的网格？(50分)

如何使StringGrid某一网格变色，如何让
焦点移入StringGrid中指定的网格？

>如何使StringGrid某一网格变色
在DrawGrid1DrawCell中写代码：

procedure TForm1.DrawGrid1DrawCell(Sender: TObject; Col, Row: Longint; Rect: TRect; State: TGridDrawState);
var
index: integer;
begin
index := Row * DrawGrid1.ColCount + Col;
with Sender as TDrawGrid do
begin
Canvas.Brush.Color := clBackGround;
Canvas.FillRect(Rect);
ImageList1.Draw(Canvas,Rect.Left,Rect.Top,index);
if gdFocused in State then
Canvas.DrawFocusRect(Rect);
end;
end;

>焦点移入StringGrid中指定的网格？
没看明白。

如： 光标移到第2行第3列，用code实现.

row:=2;
col:=3;
画图如上！

多人接受答案了。