Не работает метод Assign Опции

[C2H5OH]

Не пойму кто глючит или я или моя Delphi.

Следующая поцедурка

Код

procedure TTaskForm.CreateDataPanel(Panel: TPanel);
begin
 Panel := TPanel.Create(Self);
 Panel.Assign(Panel1);
end;

вызывает ошибку
Cannot assign a tPanel to a tPanel.

В чем проблема? По всем документациям должно работать.

[mj]

Метод Assign хоть и присутствует во всех компонентах, но далеко не во всех риализован...

[___ALex___]

напиши свой