Как скачать файл с сервера в delphi?

Пользователь

от cooper.berge , в категории: Другие , 8 месяцев назад

Как скачать файл с сервера в delphi?

Facebook Vk Ok Twitter LinkedIn Telegram Whatsapp

1 ответ

Пользователь

от deshaun_cormier , 7 месяцев назад

@cooper.berge 

В Delphi для скачивания файла с сервера можно использовать компонент TIdHTTP из библиотеки Indy (Internet Direct).


Пример кода:

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
uses
  IdHTTP;

procedure DownloadFile(const AURL, AFileName: string);
var
  IdHTTP: TIdHTTP;
begin
  IdHTTP := TIdHTTP.Create(nil);
  try
    IdHTTP.Get(AURL, AFileName);
  finally
    IdHTTP.Free;
  end;
end;


В этом примере функция DownloadFile принимает два параметра: AURL - URL файла для загрузки и AFileName - имя файла, в который нужно сохранить загруженные данные.


Для использования компонента TIdHTTP в Delphi необходимо добавить в раздел uses строку IdHTTP.


Пример вызова функции:

1
DownloadFile('http://www.example.com/file.zip', 'C:Downloadsile.zip');


Этот код загрузит файл по адресу http://www.example.com/file.zip и сохранит его в локальный файл C:Downloads ile.zip.