![]() |
|
|
#1
|
|||
|
|||
|
Добрый день.
Подскажите пожалуйста, как можно скачать картинку с сайта не используя TWebBrowser? Адрес картинки: 'http://www.kartinka.ru/risunok.jpg'. Пример. Можно ли для этого использовать компонент TidHHTP? |
|
#2
|
||||
|
||||
|
|
|
#3
|
||||
|
||||
|
Можна вот так:
Код:
procedure TForm1.Button2Click(Sender: TObject);
var
memo:TMemoryStream;
begin
Memo := TMemoryStream.Create;
idHTTP1.Get('http://www.kartinka.ru/risunok.jpg',Memo);
idHTTP1.Disconnect;
Memo.SaveToFile('image.jpg');
Memo.Free;
end; |