delphi - 启用运行时主题的 Delphi 中的自定义背景颜色

Question

我在运行时创建了一堆面板，我想改变它们的颜色。颜色属性不起作用，我不想要运行时主题。

我正在使用德尔福 XE3。

Answer 1

从 StyleElements 中移除 seClient 并将 ParentBackground 设置为 false。

aPanel.StyleElements :=  Panel1.StyleElements - [seClient];
aPanel.ParentBackground := False;
aPanel.Color := clLime;