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