Mit diesem Code, was ich hier in
DP gefunden habe, funktioniert aber es erscheint ein Problem zu sein und zwar: Beim ab zweiter Aufruf, wird nicht die Datei direkt vom Server downloadet sondern vom Temp
Ich ändere die Quelle in Server aber wenn ich die Datei downloade, dann finde ich dass der Code die alte Datei vom temp wahrscheinlich geholt hat !!!
Delphi-Quellcode:
uses
URLMon;
procedure TForm1.Button1Click(Sender: TObject);
var
Datei,Ziel:PChar;
begin
try
Datei := 'http://www.DieSeite/DieDatei.txr';
Ziel := 'C:\Windows\Desktop\DieDatei.txt';
UrlDownloadToFile(nil, Datei, Ziel, 0, nil);
except
ShowMessage('Ein Fehler ist aufgetreten! Programm wird beendet!');
Form1.Close;
end;
end;
end;
http://www.delphipraxis.net/internal...downloadtofile