Bild aus Internet laden

[DeddyH]

Geht es vielleicht so?

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var  Ziel,Datei: string;
      i:Integer;
begin
  For i:=1 to 168 do
  begin
    try
      Datei := Format('link%d.png',[i]);
      Ziel := 'C:\Documents and Settings\User\Desktop\Neuer Ordner';
      UrlDownloadToFile(nil, PAnsiChar(Datei), PAnsiChar(Ziel), 0, nil);
    except
      on E: Exception do
        MessageBox(Handle,PAnsiChar(E.Message),'Fehler',MB_OK or MB_ICONERROR);
    end;
  end;
end;

Ohne Gewähr, da nur so heruntergetippt.

P.S.: Willkommen in der DP