Moin...
Wenn wir schon am meckern sind...
Delphi-Quellcode:
TS.Free;
TS := nil;
TS := TStringList.Create;
...halte ich, unabhängig der Bedenken der Vorposter wie FreeAndNil(), für keine gute Idee. Du erzeugst die Liste, füllst sie mit Inhalt und diese bleibt bis zum nächsten Aufruf (Free) im Arbeitsspeicher!
Wäre nicht besser:
Delphi-Quellcode:
TS := TStringList.Create;
try
....Arbeit
finally
TS.Free;
end;
PS: Der Zusammenhang, wo die Liste dann in deinem Code
letztendlich freigegeben wird, ist für uns nicht ersichtbar.