Color von dynamisch erzeugtem TPanel

[bwolf]

Hi,

habe ein kleines, aber seltsames Problem.
Ich erstelle zur Laufzeit ein TPanel und will dessen Hintergrundfarbe ändern.
Aus irgend einem Grund klappt das aber nicht.
Code:

Delphi-Quellcode:

procedure TForm1.test();
var
  pnlHeader : TPanel;
begin
    pnlHeader := TPanel.Create(self);
    pnlHeader.Parent := pnlContainer;
    pnlHeader.ParentColor := False;
    pnlHeader.Color := clRed;
    pnlHeader.Align := alTop;
end;

Jemand eine Idee?
Danke!