komponeten löschen

[Nalincah]

Ich krieg immer diese Meldung:

Delphi-Quellcode:

Konstantenobjekt kann nicht als Var-Parameter weitergegeben 
werden

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
panel1,panel2:TPanel;
begin
  panel1 := TPanel.Create(Form1);
  panel1.Parent := Form1;
  panel1.Width := 100;
  panel1.Height := 100;
  panel2 := TPanel.Create(Panel1);
  panel2.Parent := panel1;
  panel2.Width := 50;
  panel2.Height := 50;
  panel2.Name := 'panel2';
  FreeAndNil(panel1.FindComponent('panel2'));
end;