Edit: Mir ist gerade noch eine Alternative eingefallen:
Delphi-Quellcode:
function FunctionDieEineStringlistErzeugt(bla, blub:
string): TStringList;
var
sl: TStringList;
begin
sl := TStringList.Create;
try
sl.Add(bla);
sl.Add(blub);
raise Exception.Create('
Test');
Result := sl;
sl :=
nil;
finally
sl.Free;
end;
end;
Ist aber auch nicht wirklich elegant.
Zeigt da nicht result auf die gleiche Adresse wie sl,
wenn dann sl auf nil gesetz wird, ist dann nicht auch result == nil?
Grüße
Klaus