Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Scroll в конце TMemo

Боян Георгиев © (2004-07-22 22:10:00)
Здравствуйте!
Подскажите мне как скролировать мемо в конце.
Я хочу чтобы юзер всегда видит последний ред текста.

Rouse_ (2004-07-24 00:37:00) [1]
> EM_SCROLLCARET не имеет параметров, лишь устанавливает курсор
> в область видимости (вернее область видимости так, чтобы
> был виден курсор)
Что абсолютно не противоречит заданному вопросу...

KSergey (2004-07-23 12:47:00) [2]
> [2] Rouse_ © (23.07.04 09:21)
> SendMessage(Memo1.Handle, EM_SCROLLCARET, SB_BOTTOM,0);

EM_SCROLLCARET не имеет параметров, лишь устанавливает курсор в область видимости (вернее область видимости так, чтобы был виден курсор)

KSergey (2004-07-23 12:31:00) [3]
1.Если memo в фокусе и пользователь не крутит его скролами сам - то он и так видит место редактирования
2.Если в мемо внесен текст (LoadFromFile, например) - то чтобы после спозиционироваться в конец надо сделать примерно так:

memo.SelStart := Length(memo.Lines.Text);
SendMessage(memo.Handle, EM_SCROLLCARET, 0, 0);

Если именно устанавливать курсор никуда не надо -просто вторая строка.
Но форма и memo должны быть видимы в это время!

ИдиотЪ (2004-07-23 09:53:00) [4]
MBo ©
вообще-то при добавлении Мемо имеет сам гадкую привычку вставать в конце текста
А richedit - наоборот, курсор остается на месте
(это в дельфи5)

MBo (2004-07-23 09:22:00) [5]
Memo1.SelStart:=Length(Memo1.Lines.Text)

Rouse_ (2004-07-23 09:21:00) [6]
На выбор:

SendMessage(Memo1.Handle, WM_VSCROLL, SB_BOTTOM,0);
SendMessage(Memo1.Handle, EM_SCROLLCARET, SB_BOTTOM,0);

ИдиотЪ (2004-07-23 08:12:00) [7]
еще раз и без сокращений, плз)

Наверх

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