![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как сделать чтобы Memo прокрутился вниз [D7, WinXP]
Дмитрий_05 © (2005-07-08 14:58:00)Как сделать чтобы Memo прокрутился вниз?
begin...end (2005-07-08 16:33:00) [1]> Дмитрий_05 (08.07.05 15:08) [1]
Memo.Perform(WM_VSCROLL, SB_BOTTOM, 0)?
Big Joe (2005-07-08 15:09:00) [2]Попробуй
Var
ScrollMessage:TWMVScroll;
begin
ScrollMessage.Msg:=WM_VScroll;
for i := Memo1.Lines.Count DownTo 0 do
begin
ScrollMessage.ScrollCode:=sb_LineUp;
ScrollMessage.Pos:=0;
Memo1.Dispatch(ScrollMessage);
end;
end;
Дмитрий_05 (2005-07-08 15:08:00) [3]т.е. чтобы было видно последние строки текста в нем