[FreeUser]

Всем привет. Это я. Освободился чуток и снова за моего монстра принялся текстового.
Хочу чтобы когда ColorDialog'ом выбираешь цвет, еще и в label выводилось название выбранного цвета. Это реально?
Заранее благодарен.

[Drozh]

Код:

Label1.Caption := IntToHex(ColorDialog1.Color, 4);

[M.A.D.M.A.N.]

Код:

case Color of
  clred:label1.caption:='red';
  //и так далее
end;

[FreeUser]

Код:

Label1.Caption := IntToHex(ColorDialog1.Color, 4);

А что значит эта 4-ка? Спасибо вам!

[FreeUser]

Код:

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

Не работает Т.е. не меняется цвет шрифта.

[FreeUser]

Помогите плиз