mob25
На этом шаге мы рассмотрим компонент 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
Текст этого примера можно взять Предыдущий шаг
Содержание
Следующий шаг
