загрузка файла по протоколу https

[пауэрлифтинг]

как скачать файл картинку по протоколу https. пробывал использовать idhttp с IdSSLIOHandlerSocketOpenSSL то ошибка

[Виталий Желтяков]

Всё легко и просто:

uses urlmon, wininet
...
//-------------------- Функция загрузки файла --------------------------------//
// SourceFile - источник, DestFile - назначение
function DownloadFile(SourceFile, DestFile: string): Boolean;
begin
  try
    Result := UrlDownloadToFile(nil, PChar(SourceFile), PChar(DestFile), 0, nil) = 0;
  except
    Result := False;
  end;
end;
//----------------------------------------------------------------------------//