![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Переместисть курсор в конец строки [D7, WinXP]
Антоныч © (2005-01-25 15:35:00)Я наверняка туплю, но пример наипростейший. Имеется 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' курсор находится в начале строки. Как его переместить в конец?
Антоныч (2005-01-25 15:40:00) [1]Спасибо. Надо было внимательнее читать хелп :)
begin...end (2005-01-25 15:37:00) [2]TMemo.SelStart