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

Вниз

нужна помощь по полосе прокрутки   Найти похожие ветки 

 
-virus- ©   (2005-07-12 19:43) [0]

Есть компоненты: TScrollBar и 4-е TMemo.
Нужно чтобы при прокрутки ScrollBar прокручивались все 4-е Memo.
Буду очень благодарен за помощь...


 
begin...end ©   (2005-07-12 20:08) [1]

Можно из обработчика TScrollBar.OnScroll посылать каждому из четырёх memo сообщение WM_VSCROLL.
Пример (для вертикального scrollbar"а):

procedure TForm1.ScrollBar1Scroll(Sender: TObject; ScrollCode: TScrollCode;
 var ScrollPos: Integer);
begin
 Memo1.Perform(WM_VSCROLL, MAKEWPARAM(SB_THUMBPOSITION, ScrollPos), 0);
 // То же самое для остальных Memo
 ...
end.


 
begin...end ©   (2005-07-12 20:10) [2]

Разумеется, горизонтальный скроллинг можно осуществить, используя WM_HSCROLL.


 
-virus- ©   (2005-07-12 21:38) [3]

Спасибо большое



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

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

Наверх




Память: 0.47 MB
Время: 0.024 c
14-1120553020
DelphiN!
2005-07-05 12:43
2005.07.31
Web FTP Client


1-1121323224
Руслана
2005-07-14 10:40
2005.07.31
Объясните почему


1-1121085795
chili
2005-07-11 16:43
2005.07.31
Подскажите что может являться уникальным индентификатором для фай


14-1120489191
Soft
2005-07-04 18:59
2005.07.31
Давайте раз и навсегда откроем и закроем проблему МАГИИ!


6-1113911224
Dysan
2005-04-19 15:47
2005.07.31
как послать http запрос и как получит ответ?