-----------------------------------------------------------------
procedure SetRange(TheXRange, TheYRange: Longint);
Заменяет значения XRange и YRange, переданные при вызове Init, на значения TheXRange и TheYRange. Затем для установки диа- пазона полос пpокpутки окна-владельца вызывает SetBarRange.
См. также: TScroller.SetBarRange.