Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Skrolbar в Memo

And7 © (2011-05-30 03:39:00)
Как cделать чтобы вертикальная полоса ScrollBars в Memo автоматически сдвигалась вниз (чтоб была видна последняя строка)? Есть такие настройки в Memo.Properties ?

RWolf (2011-05-30 17:00:00) [1]
разве memo1.lines.add(str) не скроллит текст автоматически?

And7 (2011-05-30 16:39:00) [2]
Германн Спасибо. Так получилось:
SendMessage(Memo2.Handle, WM_VSCROLL, SB_BOTTOM, 0);

Германн (2011-05-30 16:22:00) [3]
Попробуй так
SendMessage(Memo2.Handle, WM_VSCROLL, SB_BOTTOM, 0);

And7 (2011-05-30 16:13:00) [4]
Попробовал так:

procedure TForm1.Button15Click(Sender: TObject);
begin
Memo2.Text:=Memo2.Text+#13#10+Memo1.Text;
Memo2.Perform(WM_VScroll, SB_LINEDOWN,0);
end;

Не получается.
Пробовал также ставить SB_ENDSCROLL
тоже не получилось.
Хотя в Memo2.Properties.ScrollBars отмечено ssVertical.

Dennis I. Komarov (2011-05-30 09:02:00) [5]

> А как реализовать автоматически ?

Надо отправить окну соответствующее сообщение.

Gu (2011-05-30 04:32:00) [6]
http://www.kansoftware.ru/?tid=5191

And7 (2011-05-30 04:02:00) [7]
А как реализовать автоматически ?

And7 (2011-05-30 03:55:00) [8]
Здесь добавляется строка:
Memo2.Text:=Memo2.Text+#13#10+Memo1.Text;
И когда этих строк становится много, то они в окне Memo не помещаются, а скролбар при следующем добавлением строки переходит не вниз на последнюю строку, а стоит на месте. Только вручную можно его сдвинуть.

And7 (2011-05-30 03:48:00) [9]
А тогда что можно сделать в таком случае ?

Германн (2011-05-30 03:46:00) [10]

> Есть такие настройки в Memo.Properties ?
>

Настроек таких нет.

Наверх

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