如何自己定义 窗体颜色 ?

[johnzcq]

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

[老之]

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

• 打赏
• 举报

回复 赞

[postren]

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

• 打赏
• 举报

回复 赞

[cuteant]

请问您的问题在哪里？

Form1.Color := $000000;

这样不就是十六进制的数据了么？

• 打赏
• 举报

回复 赞

[johnzcq]

谢谢 ！ 我就是 不知道 怎么用 十六 进制表示一个颜色啊 现在明白了

• 打赏
• 举报

回复 赞