idhttp.DoRequest - zu schwer für mich!

[Smokey]

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;