Datei Download mit SaveDialog

[seim]

Zitat von Gehstock:

mache es nun mit

Delphi-Quellcode:

function TForm2.DownloadFile(Const Source : String; Const ToLabel: TLabel = Nil; Const PrgBar: TGauge = Nil): Boolean;
var
  NetHandle: HINTERNET;
  UrlHandle: HINTERNET;
  Buffer: Array[0..1024] Of Char;
  BytesRead, Reserved: dWord;
 [...]

Es gibt mit Microsoft Mitteln auch ne Möglichkeit.. allerdings hab ich die noch nicht hinbekommen.

Man müsste statt dem InternetOpenURL ein HttpOpenRequest verwenden da kann man den Referer setzen.