有一个奇怪的问题:我在运行时创建了一个TPanele并改变了它的颜色 – 然而,颜色仍然是clBtnFace.
这里的代码:
procedure TForm1.Button1Click(Sender: TObject);
var
pnlTest : TPanel;
begin
pnlTest := TPanel.Create(Form1);
pnlTest.Parent := Form1;
pnlTest.Width := 100;
pnlTest.Height := 100;
pnlTest.Color := clRed;
end;
有任何想法吗?谢谢!
当您想在
主题操作系统下具有
彩色面板时,必须将ParentBackground设置为False.
原文链接:https://www.f2er.com/delphi/101299.html