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

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

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

Программное перемещение ScrollBar в TMemo

Чайник © (2010-10-27 21:24:00)
В программе в TMemo добавляется ряд строк, больше, чем может уместиться на экране. Свойство ScrollBars = ssVertical. Как программным образом сдвинуть движок скроллбара, чтобы видимый текст в тмемо начинался с нужной строки?

Германн (2010-10-28 03:58:00) [1]

> Чайник © (28.10.10 01:22) [3]
>
> Спасибо!
>
> Пока сделал перректальным способом:

"Перректальный" сам вопрос.
Обычно требуется либо показывать список "с начала", либо с конца.

Прочее - от лукаваго!

Чайник (2010-10-28 01:22:00) [2]
Спасибо!

Пока сделал перректальным способом:

memWater.SelStart := N; memWater.SelLength := 0;

- окно устанавливается так, что N- в верхней позиции. Завтра на свежую голову поиграю с Perform.

Юрий Зотов (2010-10-27 22:28:00) [3]
Memo1.Perform(EM_LINESCROLL, 0, N);

N - на сколько строк прокрутить вниз (N>0) или вверх (N<0). Позиция курсора при этом не меняется.

Leonid Troyanovsky (2010-10-27 22:09:00) [4]

> Чайник © (27.10.10 21:24)

> Как программным образом сдвинуть движок скроллбара, чтобы
> видимый текст в тмемо начинался с нужной строки?

with Memo do Perform( EM_LINESCROLL, 0, LineNum - Perform(EM_GETFIRSTVISIBLELINE, 0, 0)-1);
--
Regards, LVT.

Наверх

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