Переместисть курсор в конец строки

← →
Антоныч (2005-01-25 15:35) [0]

Я наверняка туплю, но пример наипростейший. Имеется Memo, в нем вводим строку. При нажатии определенной кнопки необходимо, чтоб добавлялось сразу несколько символов, например:
procedure TForm1.Memo1KeyPress(Sender: TObject; var Key: Char);
begin
if Key="a" then begin
Memo1.Text:=Memo1.Text+"bc";
Key:=#0;
end;
end;
После добавления "bc" курсор находится в начале строки. Как его переместить в конец?

← →
begin...end © (2005-01-25 15:37) [1]

TMemo.SelStart

← →
Антоныч (2005-01-25 15:40) [2]

Спасибо. Надо было внимательнее читать хелп :)

Переместисть курсор в конец строки Найти похожие ветки