Скачать файл, который выдаётся страницей

[Unconnected]

Привет всем. Нашёл такой удобный способ скачки с http:

uses
  URLMon, ShellApi;

function DownloadFile(SourceFile, DestFile: string): Boolean;
begin
  try
    Result := UrlDownloadToFile(nil, PChar(SourceFile), PChar(DestFile), 0, nil) = 0;
  except
    Result := False;
  end;
end;

, но если файл выдается "страницей кракозябров", а не как обычно окошком "Сохранить как", то эта процедура качает 1 кб.. что делать?

[Человек_Борща]

....если файл выдается "страницей кракозябров"....

то браузер открыл этот файл. т.к для него не задано Mime-type поле. И браузер считает что файл - это текст и открывает его.

Но вам способ не самый удобный. Удобнее использовать idHTTP из Indy или набор модулей Overbyte ICS

[Unconnected]

Так.. а можете показать, как задать MIME в самом простом случае отдачи exe? Спецификации есть, а примеров нет(

[Unconnected]

Разобрался. Спасибо