| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Подскажите пожалуйста! [D5, D6, WinME]
novice_al © (2002-07-23 08:15:00)Уважаемые мастера! Пожалуйста подскажите! Есть TMemo в нём есть вертиальный скролл.Нужно чтобы при добавлении текста скроллинг работал автоматом в конец текста.
novice_al (2002-07-23 09:43:00) [1]Спасибо! Вот теперь всё работает!
MBo (2002-07-23 09:33:00) [2]memo1.perform(EM_LINESCROLL,0,memo1.lines.count);
novice_al (2002-07-23 09:27:00) [3]To MBo - Это курсор в конец текста, но не скролл
To RV - а у меня как ни странно не работает
RV (2002-07-23 09:09:00) [4]кстати, у меня почему-то скроллинг всегда работает автоматом в конец текста, если добавляю
MBo (2002-07-23 08:52:00) [5]procedure TForm1.Memo1Change(Sender: TObject);
begin
memo1.selstart:=length(memo1.lines.text);
end;
RV (2002-07-23 08:32:00) [6]ScrollMessage.Msg:=WM_VScroll;
for i := Memo1.Lines.Count DownTo 0 do
begin
ScrollMessage.ScrollCode:=sb_LineUp;
ScrollMessage.Pos:=0;
Memo1.Dispatch(ScrollMessage);
end;
и по аналогии
| |
