Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Работа с сетью в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 18.01.2010, 23:41   #1
Usov
Форумчанин
 
Аватар для Usov
 
Регистрация: 29.09.2009
Сообщений: 228
По умолчанию ContentRangeStart и ContentRangeEnd

Собственно нужно закачать часть файла:
Код:
var
  fs: TFileStream;
begin
  fs := TFileStream.Create('c:\TeamViewer.zip', fmCreate);
  IdHTTP1.Request.ContentRangeStart := 0;
  IdHTTP1.Request.ContentRangeEnd := 1000;
  IdHTTP1.Get('http://zeos.cc.ua/files/TeamViewer.zip', fs);
  fs.Free;
end;
Как бы классика, но у меня закачивается весь файл. В чем может быть проблема? Я уже начинаю грешить на свою сборку 10.2.3.

Попробовал использовать свойство IdHTTP1.Request.Range := '0-1000'; - с ним работает как надо.

Последний раз редактировалось Usov; 19.01.2010 в 14:35.
Usov вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц