Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2011.01.23;
Скачать: CL | DM;

Вниз

Программное перемещение ScrollBar в TMemo   Найти похожие ветки 

 
Чайник ©   (2010-10-27 21:24) [0]

В программе в TMemo добавляется ряд строк, больше, чем может уместиться на экране. Свойство ScrollBars = ssVertical. Как программным образом сдвинуть движок скроллбара, чтобы видимый текст в тмемо начинался с нужной строки?


 
Leonid Troyanovsky ©   (2010-10-27 22:09) [1]


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

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


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

--
Regards, LVT.


 
Юрий Зотов ©   (2010-10-27 22:28) [2]

Memo1.Perform(EM_LINESCROLL, 0, N);

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


 
Чайник ©   (2010-10-28 01:22) [3]

Спасибо!

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

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

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


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


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

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

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



Страницы: 1 вся ветка

Текущий архив: 2011.01.23;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.011 c
2-1288293658
AnGel
2010-10-28 23:20
2011.01.23
Indy


2-1288563898
Германн
2010-11-01 01:24
2011.01.23
Отладка компонент


15-1286539443
xayam
2010-10-08 16:04
2011.01.23
Drupal 6 + .profile для мультисайтинга


2-1288286941
Scott Storch
2010-10-28 21:29
2011.01.23
масштабирование


15-1286524599
И. Павел
2010-10-08 11:56
2011.01.23
Как остановить трассировку?