Показать сообщение отдельно
  #10  
Старый 04.10.2011, 17:27
Аватар для Bargest
Bargest Bargest вне форума
Профессионал
 
Регистрация: 19.10.2010
Адрес: Москва
Сообщения: 2,390
Версия Delphi: XE3/VS12/FASM
Репутация: 14665
По умолчанию

Передача больших файлов всегда вызывает небольшие проблемы. Не знаю уж, как реализованы TCP/IP компоненты в делфе, но когда я писал свои ради интереса, буфер размером больше 8 кб за раз не передавался вообще.
Самое простое в данном случае решение на мой взгляд - отправлять файл по частям. То есть не сразу читаем весь файл в 100 МБ в память и шлем, а, например, читаем первые 10 МБ, отправляем, ждем подтвеждения, следующие 10 МБ, ...
А можно и кусочки поменьше.
__________________
jmp $ ; Happy End!
The Cake Is A Lie.
Ответить с цитированием