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; 

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

Ответы на вопрос(2)

Решение Вопроса

вы должны установить для ParentBackground значение False.

 gonzales23 сент. 2010 г., 14:51
Ах, извините, это работает! Я установил для ParentColot значение false, а не для ParentBackground. Спасибо!
 gonzales23 сент. 2010 г., 14:37
Я попробовал это, но это не работает.

Попробуй это :-)

procedure TForm1.Button1Click(Sender: TObject);
var
  pnlTest : TPanel;
begin
    pnlTest := TPanel.Create(Form1);
    pnlTest.Parent := Form1;
    pnlTest.Width := 100;
    pnlTest.Height := 100;
    pnlTest.ParentBackground := false;
    pnlTest.Color := clRed;
end;

Ваш ответ на вопрос