Hallo
DP!
Ich brauche recht schnell eine Lösung:
Folgendes Problem: Habe die
Indy-Komponenten (welche Version?
Auf jeden Fall in Delphi 7
) und lade über ein IdHTTP Dateien von einer
URL runter. Funktioniertauch so weit, aber wenn die Dateien (wieso auch immer) mal nicht verfügbar sein sollten, zerstört mein Programm kurzerhand die Originale.
Jetz will ich natürlich abfangen, ob die Daten verfügbar sind--- Arbeite gerade an einem Workaround. Fein wär sowas wie TIdHTTP.IsAvailable(
URL:string):boolean, aber das gibts leider nicht.
Kennt wer so was?
Danke,
Euer LDer.
Argh, ihr kommt gleich wieder mit dem hier:
Zu Recht, Code vergessen: Bitteschön
Delphi-Quellcode:
procedure TUpdateForm.Download(Source, Target: string);
var
fs:TFileStream;
const
UpdateURL='http://jmmworks.bplaced.net/*zensiert*';
begin
fs:=TFileStream.Create(ExtractFileDir(Application.ExeName)+'\'+Target, fmCreate or fmShareDenyNone);
try
IdDown.Get(UpdateURL+Source, fs);
except
on E:EIdHTTPProtocolException
do Showmessage('HTTP-Fehler: '+IntToStr(E.ReplyErrorCode));
on E:EIdSocketError
do Showmessage(E.message);
end;
fs.Free;
end;