ADO Database Delphi

Title: How to focus a certain Cell in a TDBGrid
procedure TForm1.Button1Click(Sender: TObject);
begin
with TStringGrid(DBGrid1) do
begin
Row := 2; // Row - Zeile
Col := 5; // Column - Spalte
SetFocus;
end;
end;