Tcomponent/destructor

[Sh4d0w]

Moin,
habe eine Frage:

Und zwar habe ich zwei units. Eine hauptunit und eine andere wo eine Klasse definiert ist.
Die heißt z.B type THaus = Class(Tcomponent)

in dieser unit habe ich einen constructor und destructor. Im destructor steht drin:

Delphi-Quellcode:

destructor THaus.destroy;
begin
  inherited destroy;
end;

In der hauptunit habe ich dann einen button, mit dem ich das haus wieder löschen möchte, da steht drin:

Delphi-Quellcode:

begin
haus.destroy;
end;

Aber das wird nicht gelöscht! Was muss ich denn noch beachten? Danke schonmal.