На этом шаге мы рассмотрим компонент TColorComboBox.
Компонент TColorComboBox представляет собой
комбинированный список, опциями которого являются
цвета. Таким образом компонент
TColorComboBox предназначен для выбора одного из 16
предопределенных цветов с помощью выпадающего списка. Значение выбранного
цвета определяется свойством ColorValue. Пользователь может
установить значение выбранного цвета, присвоив необходимое значение этому
свойству.
Некоторые свойства компонента TColorComboBox:
Таблица 1. Свойства компонента TColorComboBox
Свойство | Описание |
---|---|
property Color: TColor; | Определяет цвет фона списка. |
property ColorNames[Index: Integer]: String; | Возвращает имя цвета по его индексу в списке выбора. |
property ColorValue: TColor; | Свойство определяет значение одного из 16 цветов, выбранное в настоящий момент в компоненте TColorComboBox. |
Property Style: TColorBoxStyle; | Свойство определяет внешний вид компонента:
|
Рис.1. Три различных состояния свойства Style компонента TColorComboBox
Приведем пример: создадим приложение, которое позволит менять цвет у компонента
TRxClock (часы) в зависимости от цвета, выбранного в
компоненте TColorComboBox.
Поместим на форму компоненты: RxClock1 и
ColorComboBox1 (рис.2).
Рис.2. Форма с размещенными на ней компонентами RxClock1
и ColorComboBox1
Для компонента ColorComboBox1 напишем обработчик события
OnClick:
procedure TForm1.ColorComboBox1Click(Sender: TObject); begin RxClock1.Color:= ColorComboBox1.ColorValue; end;
Работа программы показана на рис.3(а-б).
Рис.3а. Выбор цвета Maroon
Рис.3б. Выбор цвета Navy
Текст этого примера можно взять Предыдущий шаг
Содержание
Следующий шаг