Delphi 2009 – 在运行时创建一个TPanel并改变其颜色

前端之家收集整理的这篇文章主要介绍了Delphi 2009 – 在运行时创建一个TPanel并改变其颜色前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
@H_502_1@有一个奇怪的问题:我在运行时创建了一个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.

猜你在找的Delphi相关文章