Da ich bisher nicht wußte, das ich das Bild erst runterladen muss, konnte ich natürlich auch nicht danach suchen, aber jetzt da ich es weiß habe ich hier im Forum eine einfache und geniale Möglichkeit gefunden. Und man muss nicht zwangsweise
INDY verwenden.
Delphi-Quellcode:
procedure TForm1.Button2Click(Sender: TObject);
var Datei,Ziel:PChar;
begin
try
Datei := 'http://127.0.0.1/bilder/1.jpg';
Ziel := 'E:\temp\0.jpg';
UrlDownloadToFile(nil, Datei, Ziel, 0, nil);
except
// Fehlermeldung ausgeben
end;
end;
Das Einzige was zusätzlich noch zu tun wäre, ist den Temp Ordner beim Beenden zu leeren.