怎样在stringgrid的格里改变光标位置

Question

procedure TForm1.StringGrid1KeyPress(Sender: TObject; var Key: Char);
var
  vEdit: TEdit;
begin
  case Key of
    'y', 'Y': begin
      TStringGrid(Sender).EditorMode := True;
      if TStringGrid(Sender).ComponentCount <= 0 then Exit;
      vEdit := TEdit(TStringGrid(Sender).Components[0]);
      if vEdit.Text <> '' then Exit;
      Key := #0;
      vEdit.Text := '粤';
      vEdit.SelStart := 2;
      vEdit.SelLength := 0;
    end;
  end;
end;

Answer 1

不是，我要控制STRINGGRID是CELL里的光标

Answer 2

?通过TStringGrid.Row|TStringGrid.Col属性