Variablen in Procedure freigeben.

[Jackie1983]

servus,

habe in meiner Anwendung irgend wie einen Speicherfresser.
Mache das zur Zeit so

Delphi-Quellcode:

Procedure MachWas(var data : TmeineKlasse);
begin
  //.. irgend was
  data.free;
end;

procedure Timer;
var
  data : TmeineKlasse;
begin
  data := TmeineKlasse.create;
  data.bla := bla;
  MachWas(data);  
end;

da müste doch eigentlich die Daten freigegeben werden, oder?

Mfg