Moin @ALL,
hatte jetzt nochmal bissi zeit... und functions gefunden, die ne stringlist zurueckgeben. und laut test (siehe code) werden die auch nicht freigegeben (sagt jedenfalls "ReportMemoryLeaksOnShutdown") und ist ja auch irgendwie logisch.
kann man sowas ueberhaupt irgendwie freigeben?? werde jetzt jedenfalls alles mal auf variante 2 umstellen. vllt. hat ja jemand nen kommentar uebrig...
LG..
..de Schorsch
Delphi-Quellcode:
function getSL: TStringList; overload;
function getSL(var SL: TStringList): Boolean; overload;
procedure TForm1.Button1Click(Sender: TObject);
begin
showmessage(getSL.Text);
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
var sl := TStringList.Create;
try
getSL(sl);
showmessage(sl.Text);
finally
FreeAndNil(sl);
end;
end;
function TForm1.getSL: TStringList;
begin
result := TStringList.Create;
result.Add('haha');
result.Add('hehe');
result.Add('hihi');
result.Add('hoho');
result.Add('huhu');
end;
function TForm1.getSL(var SL: TStringList): Boolean;
begin
SL.Add('haha');
SL.Add('hehe');
SL.Add('hihi');
SL.Add('hoho');
SL.Add('huhu');
end;