Gibt TObject Speicherplatz wieder frei ?

[jfheins]

Delphi-Quellcode:

procedure DoSomething (Obj: TMyObj);
begin
Obj.DoSomethingElse;
Form1.Caption := Obj.Text;
end;

// ...

begin
  Obj := TMyObj.Create;
  Obj.FillWithData;
  DoSomething (Obj);
  Obj.Free;
end;

Hilft dir das ?