![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Скролинг текста в RichEdit
perseptron © (2003-02-11 13:00:00)Please Help ME! Как сделать чтоб при добавлении строки методом RichEdit1.Lines.Add можна было бы видеть добавленый текст (тоесть скролер RichEdit"a не уходил вверх а все время был внизу)
perseptron (2003-02-11 14:49:00) [1]Если вместо SB_LINEDOWN поставить SB_BOTTOM а потом повторить процедурку для SB_LINEUP тогда получится то чего я добивался. Интересная и полезная оказывается процедура этот perform (надо будет разобратся) . Спасибо за помощь.
Sheriff (2003-02-11 13:55:00) [2]Rich1.Perform(WM_VSCROLL,SB_LINEDOWN,0);
Alexkr (2003-02-11 13:52:00) [3]Действительно, в Win98 что-то все прыгает. На Win2000 все в норме.
perseptron (2003-02-11 13:41:00) [4]вариант работает но немного не так как хотелось бы - текст уходит за пределы видимой области и чтоб его вернуть надобно опять кликать по проклятому скроллеру только вот уже в другую сторону. Пробовал добавить что-то типа M.Pos:=M.Pos-5 не получилось (в смысле результата). Может попробуем другие варианты...
Alexkr (2003-02-11 13:11:00) [5]Один из вариантов:
var
M: TWMScroll;
begin
......
M.Msg := WM_VSCROLL;
M.ScrollCode := SB_BOTTOM;
......
RichEdit1.Dispatch( M );
Application.ProcessMessages;
......
end;