Einzelnen Beitrag anzeigen

Andreas L.
(Gast)

n/a Beiträge
 
#4

Re: browserdownload automatisch starten

  Alt 10. Feb 2008, 14:55
Selektiere den Webbrowser auf deinen Form-Designer. Im Objektinspektor klickst du auf "Ereignisse" und dann beim OnbeforeNavigate im weißen Feld daneben doppelklicken. Jetzt folgendes reinschreiben:

Delphi-Quellcode:
var
dl: TidHttp;
fs: TFileStream;
NURL: String;
begin

NURL := URL; //Konstante vom Ereignis in einen String speichern
dl := TIdHTTP.create; //IdHTTP erstellen
fs := TFileStream.Create('C:\wodiedateihinsoll.txt', fmCreate); //FileStream erstellen und einen Pfad angeben, wo die Datei gespeichert werden soll.
dl.get(NURL, fs); //Saugen
dl.Free; //Speichern freigeben
fs.Free; // "
Cancel := True; //Webbrowser stoppen damit nicht der Download-Dialog kommt
end;
Um IdHttp benutzen zu können musst du die unit IdHttp und idMessages einbinden.
  Mit Zitat antworten Zitat