Komponeten zerstören

[LoL]

ok so weit so gut aber wenn ich das so ändere und compilieren will dann erhalte ich folgende fehlermeldung:

Zitat:

Types of actual and formal var parameters must be identical

Delphi-Quellcode:

procedure Destroy_Component(var Compo : TComponent);
begin
  if Compo <> nil then
    begin
      Compo.Destroy;
      Compo := nil;
      Compo.Free;
    end;
end;

//beim panel zerstören:
Destroy_Component(beispielpanel);

zu deutsch

Bei einem Variablenparameter muß das eigentliche Argument genau denselben Typ wie der formale Parameter aufweisen.

was mache ich falsch