Как прокрутить текст в начало ?

← →
KaLLeKa (2006-07-22 20:51) [0]

У меня программа загружает потоком текст в Мемо, но после загрузки указатель полосы прокрутки всегда в самом низу мемо. Как сделать так, чтобы после загрузки указатель был в самом верху на первой строке?

Пробовал по всякому - ничего не получается....
Memo1.Perform(EM_SCROLLCARET, 0, 0);

SendMessage(Memo1.Handle, EM_LINESCROLL, 0, 0);

Помогите пожалуйста

← →
Джо © (2006-07-22 20:58) [1]

Можно, например, так:
SendMessage(Memo1.Handle, WM_VSCROLL, SB_TOP, 0)

← →
Джо © (2006-07-22 21:00) [2]

Ну, и каретку перевести после этого:
Memo1.CaretPos := Point (0,0);

← →
KaLLeKa (2006-07-22 21:10) [3]

Джо спасибо :)

А можно и так. В принципе, без разницы.
Memo1.CaretPos := Point (0,0); Memo1.Perform(EM_SCROLLCARET,0,0)

Как прокрутить текст в начало ? Найти похожие ветки