Показать сообщение отдельно
  #2  
Старый 15.12.2008, 15:01
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,096
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

1. Выбирай любой метод:
TForm.ScrollInView(); - скролирует до показа указанного контрола.
TForm.ScrollBy(); - абсолютное скролирование.
TForm.VertScrollBar - ссылка на полосу прокрутки.

2. Обрабатывай событие использования колеса мыши:
OnMouseWeelUp - вверх.
OnMouseWeelDown - вниз.
Делать придется через TForm.VertScrollBar.
Ответить с цитированием