На этом шаге мы рассмотрим компонент TColorComboBox.

    Компонент TColorComboBox представляет собой комбинированный список, опциями которого являются цвета. Таким образом компонент TColorComboBox предназначен для выбора одного из 16 предопределенных цветов с помощью выпадающего списка. Значение выбранного цвета определяется свойством ColorValue. Пользователь может установить значение выбранного цвета, присвоив необходимое значение этому свойству.

    Некоторые свойства компонента TColorComboBox:

Таблица 1. Свойства компонента TColorComboBox

Свойство	Описание
property Color: TColor;	Определяет цвет фона списка.
property ColorNames[Index: Integer]: String;	Возвращает имя цвета по его индексу в списке выбора.
property ColorValue: TColor;	Свойство определяет значение одного из 16 цветов, выбранное в настоящий момент в компоненте TColorComboBox.
Property Style: TColorBoxStyle;	Свойство определяет внешний вид компонента: CsDropDown - комбинированный список, в котором содержатся только названия цветов; CsDropDownList - комбинированный список, в котором содержатся названия цветов и их изображение; CsSimple - строка редактирования, в которой содержится название текущего цвета (рис.1).

Рис.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

    Текст этого примера можно взять здесь.

    На следующем шаге мы рассмотрим компонент TRxSplitter.

Предыдущий шаг Содержание Следующий шаг