Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Сети > Скачать файл из интернета

Автор: ivan219 5.1.2018, 12:46

Добрый день.
Есть вот такой адрес https://api-zcash.flypool.org/poolStats там лежит файл с расширением json.
Если я в вожу адрес в Operu то она открывает мне файл. Если я в вожу адрес в Explorer то он предлагает мне сохранить этот файл.
Мне нужно загрузить файл в ОЗУ ПК и дальше с ним работать. Как с ним дальше работать я знаю. А вот загрузить его в ОЗУ ПК не выходит.
Я пробовал компонент TWebBrowser но он при загрузке предлагает сохранить файл на жесткий диск. Так же пробовал компонент IdHTTP но он выдает ошибку и ничего не загружает.
В целом в данной области ни разу не работал и все примеры которые нашел в интернете не помогают.

Код


procedure TForm2.Button1Click(Sender: TObject);
var FileStream :TFileStream;

var LoadStream: TMemoryStream;
begin
 LoadStream := TMemoryStream.Create; // выделение памяти под переменную
 idHTTP1.Get(Edit1.Text, LoadStream); // загрузка в поток данных из сети
 LoadStream.SaveToFile('E:\44.json'); // сохраняем данные из потока на жестком диске
 Memo1.Lines.LoadFromFile('E:\44.json');
 LoadStream.Free; // освобождаем память
end;

Если можете дайте рабочий код.