как скачать картинку?

← →
Дремучий (2001-11-19 22:24) [0]

народ, посоветуйте%
как средствами Делфи закачать картинку с заданого URL, например
http://images.ozornik.ru:9000/amateurs/nov09zs6/062.jpg
по протоколу http!

такая байда, предназначена для html, как ее нужно модифицировать?
сорри, раньше по такой тематике не работал...

{Создаем компонент TNMHTTP}
FHTTP := TNMHTTP.Create(Form1);
FHTTP.Proxy:="ххх.ххх.ххх.ххх";
FHTTP.ProxyPort:= хххх;
{Результат надо записывать в файлы}
FHTTP.InputFileMode := True;
{Подбираем имена для файлов}
i := 1;
while FileExists(Form1.Edit1.Text+"\page"+IntToStr(i)+".htm")
do Inc(i);
{Указываем, в какие именно файлы класть результат}
FHTTP.Body := Form1.Edit1.Text+"\body"+IntToStr(i)+".htm";
FHTTP.Header := Form1.Edit1.Text+"\header"+IntToStr(i)+".txt";
{Пытаемся послать запрос}
FHTTP.Get(URL);
{Перед завершением процесса не забываем освободить память из-под компонента}
FHTTP.Free;

как скачать картинку? Найти похожие ветки