如何自己定义 窗体颜色 ?

Question

请问如何自己定义 窗体颜色 ? 例如：
form1.color：=clBtnFace；
但是form中color属性的取值有限。
可否用其他方式给color 赋值 比如 用十六进制来代表一个颜色 然后付值给 form1.color

Answer 1

放一个ColorDialog控件，运行时可以添加自定义颜色
procedure TForm1.Button1Click(Sender: TObject);
begin
  if ColorDialog1.Execute then
   Form1.Color:=ColorDialog1.Color;
end;

Answer 2

Form1.Color := RGB(1, 2, 3);
RGB函数可以返回任何真彩色

Answer 3

请问您的问题在哪里？Form1.Color := $000000;这样不就是十六进制的数据了么？