Цветовая палитра и "Панель управления"

[Xaerl]

Собственно и все. Необходимо создать цветовую палитру выбора цветов(как в паинте например) и Панель управления (понятно что такое :D )

[Gorychev]

На вкладке Dialogs есть компонент ColorDialog - чем тебе не палитра?
Используй например так:

if ColorDialog1.Execute then Label1.Font.Color := ColorDialog1.Color;

[Xaerl]

не отображаеться это кнопка ... как сделать чтоб ее было видно ?

[Terran]

ColorDialog не является кнопкой, тебе надо его вызвать. Это можешь сделать так:
Как уже писал Gorychev, только этот код надо добавить в процедуру.

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

[JTG]

Ну а вызвать панель управления -

ShellExecute(0,'open','control',nil ,nil,SW_SHOWNORMAL);
* в Uses надо добавить модуль ShellApi

или WinExec('control',SW_SHOWNORMAL);
(ничё добавлять не надо)

[Dj_smart]

Поправочка:
ShellExecute(0,'open','control',nil ,nil,SW_SHOWNORMAL);