Докачка файла idhttp

[Terikon]

происходит полная закачка файла, тоесть качает не с тех байт которые я указал

var
  loadfile: tfilestream;
  http: tidhttp;
begin
  loadfile := tfilestream.Create('d:\111rrrr3333', fmCreate);
  loadfile.Size := 10313520;
  loadfile.Position := 10313520;
  http := tidhttp.Create;
  http.Request.ContentRangeStart := 10313520;
  http.Request.ContentRangeEnd := 11313520;
  http.Get('http://download.qip.ru/2012/qip2012.exe', loadfile);
  loadfile.Free;
  http.Free;
end;

[Кольша]

  loadfile.Size := 10313520;
  loadfile.Position := 10313520

этим вы устанавливаете размеры loadfile а не скачке в DM(downlandmaster) есть что то типо этого:

Content-Range: bytes 1707336-1944004/1944005

Вообщем копайте в сторону сокетов

[Terikon]

так я вот этим указываю откуда и до куда качать

http.Request.ContentRangeStart := 10313520;
http.Request.ContentRangeEnd := 11313520;

[Кольша]

точно не заметил извеняюсь

loadfile.Position := 0;

[Terikon]

Сообщение от Кольша

точно не заметил извеняюсь

loadfile.Position := 0;

и так я делал, всё равно файл скачивается полностью

[Пепел Феникса]

там есть глюк что установка через свойства не срабатывает.
используйте явное указания параметра строкой.

[Terikon]

Сообщение от Пепел Феникса

там есть глюк что установка через свойства не срабатывает.
используйте явное указания параметра строкой.

ты об этом ?

  http.Request.CustomHeaders.Add('ContentRangeStart : 10313520');
  http.Request.CustomHeaders.Add('ContentRangeEnd : 11313520');

подставил так но результат тот же.

[Terikon]

Всем спасибо, проблему решил
вот верный код

var
  loadfile: tfilestream;
  http: tidhttp;
begin
  loadfile := tfilestream.Create('d:\111rrrr3333', fmCreate);
  loadfile.Position := 0;
  http := tidhttp.Create;
  http.Request.CustomHeaders.Add('Range: bytes=10313520-');
  http.Get('http://download.qip.ru/2012/qip2012.exe', loadfile);
  loadfile.Free;
  http.Free;
end;