Компонент Delphi ScrollBar — элемент управления в виде ползунка представляет собой горизонтальную или вертикальную полосу прокрутки (рис 1).
С помощью ползунка ScrollBar мы можем выбрать целое число, не выходящее за пределы диапазона чисел от Min до Max в свойстве компонента. Изменять положение ScrollBar можно мышью, клавишами вверх, вниз, влево и вправо, или Page Up и Page Down. При перемещении ползунка изменяется свойство position, которое при необходимости можно можно задать программно, но только если позиция не будет выходить за пределы диапазона.
Свойства ScrollBar
Position | значение которое может изменяться в пределах значений, задаваемые свойствами Min и Мах. |
max | максимальное значение для полосы прокрутки |
min | минимальное значение для полосы прокрутки |
Kind | устанавливает ориентацию ползунка: trHorizontal — горизонтальное расположение, trVertical — вертикальное |
PageSize | определяют, размер ползунка |
SmallChange | определяют сдвиг при клике на кнопки в конце и начале полосы прокрутки или нажатием клавиши со стрелкой |
LargeChange | определяет сдвиг при перемещении кликом рядом с бегунком или при нажатии клавиш PageUp или PageDown |
Name | имя компонента |
Для примера использования ScrollBar можно взять функцию RGB для этого нам понадобится на форме 3 ScrollBar каждый из которых будет отвечать за определенный цвет из RGB т.е красный, зеленый и голубой в свойстве min в каждом ползунке ставим 0, а в свойстве max 255. Затем находим событием OnChange и двойным щелчком по пустому полю открываем редактор кода куда вставляем
1 | Form1.color:=RGB(ScrollBar1.Position,ScrollBar2.Position,ScrollBar3.Position); |
Аналогично вставляем данный код для двух других компонентов ScrollBar. Теперь при перемещении ползунков мы меняем цвет формы.