Компонент Delphi ColorDialog (диалог выбора цвета) располагается на вкладке Dialog Палитры Компонентов. C его помощью можно задать цвет любого визуального компонента.

Выбор цвета осуществляется с помощью диалогового окна, показанного выше. Первоначально окно состоит из левой половины и мы можем выбрать "Основные цвета". При необходимости мы можем задать "Дополнительные цвета". Для этого нажимаем кнопку "Определить цвет" и перед нами появиться вторая, правая половина нашего диалогового окна, в котором выбрав визуально интересующий нас цвет нажимаем кнопку "Добавить в набор".

Цвет выбранный пользователем, основное свойство данного компонента, определяется свойством Color. Свойство Color можно задать на этапе проектирования в Инспекторе Объектов или же программно.

С помощью свойства CustomColors можно задать цвета дополнительной палитры. Цвета задаются строками:

порядковый номер цвета = шестнадцатеричное представление цвета;

порядковый номер цвета - ColorA (первый цвет) и далее до СщдщкЗ(последний шестнадцатый цвет). Для примера строка

ColorA = 909090

задаст первый  цвет и он будет серый.

Свойство Options состоит из следующего множества опций:

• cdFullOpen - мы будим видим сразу же при открытии диалогового окна обе панели, как на рисунке вверху;
• cdPreventFullOpen - кнопка "Определить цвет" будет недоступной (серого цвета) и как следствие мы не сможем вызвать правую панель для определения цвета;
• cdShowHelp - справа, после кнопки отмена в диалоговом окне появиться кнопка "Справка";
• sdSolidColor - дается указание использовать ближний к выбранному сплошной цвет, что уменьшает палитру;
• cdAnyColor - tcnm возможность выбрать не сплошные цвета.

Первоначально все опции отключены.

Обработчик кнопки будет таким:

procedure TForm1.Button1Click(Sender: TObject);
begin
     if ColorDialog1.Execute then
       edit1.Color := ColorDialog1.Color;
end;

Итог: мы познакомились с компонентом ColorDialog и его применением в приложении.