Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Перемотка страницы [D7, WinXP]


Wood ©   (2004-09-01 09:30:00) 

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


_sulent   (2004-09-01 12:58:00) [1]

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


Wood   (2004-09-01 11:45:00) [2]

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


_sulent   (2004-09-01 10:14:00) [3]

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


Wood   (2004-09-01 09:47:00) [4]

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


Юрий Зотов   (2004-09-01 09:38:00) [5]

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо