Function Result ist Klasse Wie freigeben?

[Alexander Roth]

Hi @all,

also ich habe so was:

Delphi-Quellcode:

function a(old:Tstringlist):Tstringlist;
begin
  result:=Tstringlist.Create;
  result.Clear;

//  result.Free;
end;

Also ich weis nicht wie ich das wieder freigeben soll. (oder wird das vielleicht sogar automatisch freigegeben?)
und wenn man es nicht created dann zeigt anscheinend result auf old.


Natürlich könnte ich das umgehen

Delphi-Quellcode:

procedure a(var new:Tstringlist;  old:Tstringlist);
begin
  new.clear;
end;

aber ich möchte wissen wie man es anders hinkriegt.

Wisst ihr wie?

Danke im Voraus