HiAsm

Ответов: 4621

Рейтинг: 746

#1: 2014-05-09 20:02:46 ЛС | профиль | цитата

Вот здесь в StrList освобождается:


#pas
destructor THIStrList.Destroy;
begin
   FList.Free;
   if Arr <> nil then dispose(Arr); //<<< ======
   inherited Destroy;
end;

sla8a писал(а):

Это я не трогал

Да, я знаю. Ну, раз всеравно вносил изменения, ничего страшного, если и это заодно поправишь.

карма: 26

Голосовали: sla8a