Вниз
Скачать: CL | DM;

Scroll в конце TMemo   Найти похожие ветки 

 
Боян Георгиев   (2004-07-22 22:10) [0]

Здравствуйте!
Подскажите мне как скролировать мемо в конце.
Я хочу чтобы юзер всегда видит последний ред текста.


 
ИдиотЪ   (2004-07-23 08:12) [1]

еще раз и без сокращений, плз)


 
Rouse_ ©   (2004-07-23 09:21) [2]

На выбор:

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


 
MBo ©   (2004-07-23 09:22) [3]

Memo1.SelStart:=Length(Memo1.Lines.Text)


 
ИдиотЪ   (2004-07-23 09:53) [4]

MBo ©
вообще-то при добавлении Мемо имеет сам гадкую привычку вставать в конце текста
А richedit - наоборот, курсор остается на месте
(это в дельфи5)


 
KSergey ©   (2004-07-23 12:31) [5]

1.Если memo в фокусе и пользователь не крутит его скролами сам - то он и так видит место редактирования
2.Если в мемо внесен текст (LoadFromFile, например) - то чтобы после спозиционироваться в конец надо сделать примерно так:

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

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


 
KSergey ©   (2004-07-23 12:47) [6]

> [2] Rouse_ ©   (23.07.04 09:21)
> SendMessage(Memo1.Handle, EM_SCROLLCARET, SB_BOTTOM,0);

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


 
Rouse_ ©   (2004-07-24 00:37) [7]

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

Что абсолютно не противоречит заданному вопросу...



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.021 c
9-1082801902
Комбинатор
2004-04-24 14:18
2004.08.08
Кватернионы


3-1089749484
voe
2004-07-14 00:11
2004.08.08
передача данных в TDBLookupListBox


4-1088437839
MetalFan
2004-06-28 19:50
2004.08.08
как программно "залочить" комп?


1-1090860755
Shturmovik
2004-07-26 20:52
2004.08.08
исключения при открытии файла


14-1090583108
Andrey
2004-07-23 15:45
2004.08.08
Разовая удаленная работа для Delphi программиста




   Наверх