Textdatei runterladen - lokal speichern - ohne User-Eingriff

[shmia]

Delphi-Quellcode:

uses ...,URLMon;

function DownLoadInternetFile(const Source, Dest : String): Boolean;
begin
   Result := URLDownloadToFile(nil,PChar(Source),PChar(Dest),0,nil) = 0
end;
....

if not DownloadInternetFile('http://www.deinserver.de/pfad/datei.txt', 'C:\datei.txt') then
   raise Exception.Create('Datei bla bla konnte nicht heruntergeladen werden');