Also so geht es bei mir, wenn ich ein Bild, dass online den namen "Weiber.jpg" hat, auf meiner Festplatte als Test.jpg speichern will. Mfg smk
Delphi-Quellcode:
var
strmDatei: TFileStream;
IdHttp1: TIdHTTP;
sURL, sFilename:
String;
begin
sFilename := '
c:\\Test.jpg'
try
try
strmDatei:=TFileStream.create(sFilename,fmCreate);
SURL:= '
http://www.blabla.com/pics/weiber.jpg'
IdHttp1:= TIdHTTP.Create(
nil);
IdHttp1.Get(sURL,strmDatei);
except
on excp:
Exception do begin
//fehlerbehandlung deiner wahl
end;
//except
end;
finally
strmDatei.free;
IdHttp1.Free;
end;
end;