Как поместить курсор в определенную позицию edit'а и подобных ему элементов управления?

Вопрос:

Как поместить курсор в определенную позицию edit'а и подобных ему элементов управления?

Ответ:

Можно использовать методы Delphi SelStart() и SelectLength().

Пример:

procedure TForm1.Button1Click(Sender: TObject);
begin
  Edit1.SetFocus;
  {переводим курсор во вторую позицию}
  Edit1.SelStart := 2;
  {не выделяем никакого текста}
  Edit1.SelLength := 0;
end;