[Alegun]

Сообщение от Pcrepair

...на текущем этапе уже не нужно просматривать картинки, и значит не нужно записывать их на ЖД. лучше сразу в ГлобПерем...

Но скачивать картинки по ссылке всёравно придётся, ведь что смотреть, что в "ГлобПерем" заносить, нужен набор байтов для этого. А можно сделать так

Код:

uses UrlMon;
procedure TForm1.Button1Click(Sender: TObject);
var
 URLfile, Fname: string;
begin
 // "УРЛ...картинки"
 URLfile:= 'http://kaifolog.ru/uploads/posts/2011-10/1319535258_002.jpg';

 // "указанный каталог"
 Fname:= ExtractFilePath(ParamStr(0)) +

         // "под своими собственными именами"
         Copy(URLfile,LastDelimiter('/',URLfile)+1,Length(URLfile));

 // "можно просмотреть...картинки" если уже есть на диске
 if FileExists(Fname) then Image1.Picture.LoadFromFile(Fname)
   else

    // или "записывает их в указанный каталог на ЖД"
    UrlDownloadToFile(nil,PAnsiChar(URLfile),PAnsiChar(Fname),0,nil);
end;