Перемотка страницы

← →
Wood (2004-09-01 09:30) [0]

Подскажите, пожалуйста, как в TMemo(TRichEdit), после прокрутки, программно вернуть документ на начало. Или курсор установить в начало документа, как хотите.
SendMessage(Memo1.Handle, EM_LINESCROLL, 0, 0) не помогло.
Спасибо.

← →
Юрий Зотов © (2004-09-01 09:38) [1]

with RichEdit1 do
begin
SelStart := 0;
SelLength := 0;
SendMessage(Handle, EM_SCROLLCARET, 0, 0)
end;

← →
Wood (2004-09-01 09:47) [2]

>Юрий Зотов
Спасибо, как я понял перевод курсора(каретки) на позицию 0.
Извините, думал не найду, оказалось:
SendMessage(Memo1.Handle, WM_VSCROLL, SB_PAGEUP, 0);

← →
_sulent © (2004-09-01 10:14) [3]

Встречный вопросик, как можно сделать чтобы делать ввод в тот же самый мемо, и чтобы он сам прокручивался, обычная прокрутка не дает тех результатов, ошибку выдает...

← →
Wood (2004-09-01 11:45) [4]

>_sulent
Что Вы понимаете под обычной прокруткой?
Автоматическая прокрутка как раз -
SendMessage(Memo1.Handle, EM_LINESCROLL, 0, Memo1.Lines.Count-1)

Я уже разобрался, спасибо...

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