Moin
Ich habe folgenden Code:
Delphi-Quellcode:
var sl_tmp : TStringlist;
s : string;
begin
sl_tmp := TStringlist.Create;
while not(eof(datei)) do
begin
Readln(datei, s);
sl_tmp.Add(s);
end;
FreeAndNil(sl_tmp);
end;
Ich rufe die procedure einmal auf. Wenn ich sie ein 2.mal aufrufe sind die Daten von dem vorigen aufruf noch drin!
Wie ist das möglich? Wird nicht bei FreeAndNil auch der Speicher freigegeben und geleert?