Delphi 2009 - создание TPanel во время выполнения и изменение его цвета

возникла странная проблема: я создаю 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; 

Есть идеи? Спасибо!

11
задан RRUZ 15 April 2011 в 06:30
поделиться