Indy-HTTP Get und Zip-Dateien ....

[Bitworm]

Hallo zusammen !

Ich habe folgendes Problem: per HTTP-Get fordere ich auf einem
Server einen zip-Datei an. Der Head-Aufruf gibt mir auch die
korrekten Werte zurück, wenn ich aber anschließend die Datei
per HTTP-Get herunterladen möchte gibt es die seltsame Fehlermeldung
(siehe beigefügte Datei).

Der Code:

Delphi-Quellcode:

procedure TForm1.cxButton1Click(Sender: TObject);
var
   BytesKopiert, BytesInsgesamt: int64;
   lStream: TFileStream;
begin
   BytesKopiert := 0;
   IdHTTP.Head(cxTextEdit1.Text);
   BytesInsgesamt := IdHTTP.Response.ContentLength;

   lStream := TFileStream.Create('c:\test.zip', fmCreate or fmShareDenyNone);

   idhttp.Request.ContentType := idhttp.Response.ContentType;
   idHTTP.Get(cxTextEdit1.Text, lstream);

   IdHTTP.Response.ContentStream.Write(lStream, IdHTTP.Response.ContentStream.Size);

   FreeAndNil(lStream);
end;

Die verwendete Indy-Version ist 9, beim IDHttp habe ich HandleRedirects auf True und False
stehen gehabt und es war in beiden Fällen ohne Erfolg. Hat jemand einen Tipp für mich ?

Vielen Dank im vorraus !