Объект TrackBar

Begin

Практическая работа

Создадим приложение «Редактор цвета». Каждый цвет математически описывается как соотношение базовых компонент. В цветовой модели RGB базовыми компонентами считаются следующие цвета: красный, зеленый, синий. Для получения остальных цветов будем смешивать оттенки базовых, которые измеряются от 0 до 255.

На форме расположим три компонента ScrollBar (Sb1, Sb2, Sb3), которые будет регулировать оттенок каждого базового компонента. В свойстве max каждого из компонентов укажите значение 255. Свойство Color метки Label5 будет отображать полученный цвет.

Создадим событие изменения значения величины для первого базового компонента (R - красного).

Опишите глобальные переменные a, b, с, которые будут содержать текущее значение числовой величины каждого из регуляторов.

procedure TForm1.Sb1Change(Sender: TObject);

a:=sb1.position;

label5.color:= rgb(a,c,b);

edit1.text:=inttostr(a);

end;

Аналогично создаются события для двух других компонентов ScrollBar.

Компонент TrackBar предназначен для визуального управления числовой величиной. Он во многом схож с элементом ScrollBar и отличается от него, в основном, оформлением.

Свойства компонента:

Свойство	Ззначение
Frequency	Определяет частоту нанесения меток: 1- каждое значение диапазона, 2 – каждое второе значение и т.д.
Orientation	Определяет ориентацию компонента: SbHorizontal – горизонтальная SbVertical –вертикальная
Max	Максимальное значение диапазона изменения
Min	Минимальное значение диапазона изменения
Position	Текущее положение ползунка
TickMarks	Определяет способ нанесения меток: tmBottomRight – внизу или справа tmTopLeft – вверху или слева tmBottom – по обеим сторонам

Дата добавления: 2015-05-09