...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;