Hallo zusammen,
ich habe ein kleines Porblem:
Ein Bekannter hat mir ein kleines Programm geschrieben, welches mir
verschiedene Dinge aus dem Netz Downloaded. Dieser Bekannte ist leider
vor einem Jahr verstorben. Ich habe den Quelltext allerdings komplett vorliegen.
Jetzt hat sich hier bei uns im Haus etwas geändert: Wir sitzen jetzt hinter einem
HTTP-Proxy! Nun kann mein tolles Programm nix mehr runterladen.
Ich habe nach kurzer suche auch folgenden Quelltext gefunden der für die DLaktion
wohl zuständig ist:
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
|
with IdHTTP1 do
begin
Source:=TFileStream.Create(AppPath+'DL\UPLOAD.STR',fmCreate);
Destination:=TFileStream.Create(AppPath+'DL\DOWNLOAD.ZIP',fmCreate);
Adresse:='http://www.xyz.de/downloads';
DoRequest(hmGet,Adresse,Source,Destination);
Application.ProcessMessages;
Source.Destroy;
Destination.Destroy;
end; |
Könnte mir evtl jemand auf die Sprünge helfen? Ich habe keine Ahnung wie ich das umsetzten kann.
Kann ich auf diese Art und Weise überhaupt über einen Proxy saugen?
Ich habe die Function URLDownloadToFile gefunden, habe aber keine Ahnung ob ich diese Funktionen einfach
austauschen kann. (Wahrscheinlich ja nicht...
( )
Danke für eure Hilfe.
Denis
