如下动态生成控件,为什么颜色不能改变?

Question

P:=TPanel.Create(self);
 P.Parent:=Form1;
 P.BevelInner:=bvLowered;
 P.BevelOuter:=bvLowered;
 P.Color:=clAqua; //我想改变它的颜色,改这儿不行啊
 P.Left:=128;
 P.Width:=64;
 P.Height:=64;

Answer 1

比如改成
P.Color:=clActiveCaption; 也就变色了或者
 
P.Color ：=rgb(50,186,23)

Answer 2

procedure TForm1.Button1Click(Sender: TObject);
var p:TPanel;
begin
P:=TPanel.Create(self);
 P.Parent:=Form1;
 P.BevelInner:=bvLowered;
 P.BevelOuter:=bvLowered;
 P.Color:=clAqua; //我想改变它的颜色,改这儿不行啊
 P.Left:=128;
 P.Width:=64;
 P.Height:=64;
 p.Visible:=true;
end;

Answer 3

原因我找到了,是因为加了一个XP效果的XPMANIFEST,拿下来就可以
如果我要加XP效果,这个问题怎么才能解决呢?