Negde moras da uradis Free te string liste jer se to ne radi automatski, i to je najbolje u try..finally varijanti, na primer:
Code:
Sl:= TStringList.Create;
try
// Nesto se radi sa listom
finally
Sl.Free;
end;
Posebno resenje trazi varijanta u kojoj string listu ne koristis samo unutar jednog metoda, vec je koristis na nivou forme, data modul-a i sl. Onda radis Free u OnDestroy te forme ili DM-a. Naravno, obavezno proveravaj da li je objekat liste uposte napravljen:
Code:
OnCreate:
Sl:= nil;
Sl:= TStringList.Create;
....
OnDestroy:
if Assigned(Sl) then
FreeAndNil(Sl); // ili Sl.Free;