Тема: [Delphi] Помогите с .txt файлом
Показать сообщение отдельно

  #10  
Старый 19.12.2009, 14:20
ZdezBilYa
Участник форума
Регистрация: 29.08.2008
Сообщений: 151
С нами: 9315854

Репутация: 107
По умолчанию
у вас идет освобождение списка:

Цитата:
finally
Data.Free;
CM.Free;
Http.Free;
Str1.Free;
end;
вынесите это за цикл for
 
Ответить с цитированием