@ DeddyH:
Zitat:
Zitat:
Delphi-Quellcode:
finally
sl := nil;
sl.Free;
end;
Wenn ich nur .Free rufe, dann bekomme ich eine
Exception. Darum diese komische Variante
Du bekommst die
Exception, weil du in der Funktion Result die TStringList sl zuweist. Result := sl. Result und sl sind damit das gleiche, das gleiche Objekt, der gleiche Speicher. Wenn du nun sl.Free machst, machst du auch gleichzeitig Result.Free und deswegen hats geknallt.