| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

автопрокрутка текста

zirus ©   (2003-01-08 05:30:00) 

Уважаемые мастера! Я делаю чат: окно текста - memo1. В него пишется текст. Передача между 2 компьютерами со скоростью 300 бод :-). При этом текст пишется в реалтайме(if m>1 then memo1.text:=memo1.text+chr(m);) и в конце строки - memo1.lines.add("");. Как сделать автоматическую прокрутку текста, чтобы была постоянной, я не когда закончится строка?

---

cdadmitriy   (2003-01-08 09:24:00) [1]

Я ползуюсь

SendMessage(RichEdit2.Handle, EM_SCROLLCARET,0,0);

---

AlexKr   (2003-01-08 09:16:00) [2]

Если я тебя правильно понял:
var
M: TWMScroll;
begin
...
//для прокрутки в Memo
M.Msg := WM_VSCROLL;
M.ScrollCode := SB_BOTTOM;
...
Memo1.Dispatch( M );
Application.ProcessMessages;
...
end;

---

Наверх