TScrollEvent = procedure (Sender: TObject; ScrollCode: TScrollCode; var ScrollPos: Integer)
Событие вызывается во время прокрутки.
Параметры:
Ссылки: TScrollBar.OnScroll