Downloading a file in Delphi

Question

A google search shows a few examples on how to download a file in Delphi but most are buggy and half of the time don\'t work in my experience.

I\'m looking for a si

Answer 1

Using URLMon.

errcode := URLMon.URLDownloadToFile(nil,
                      PChar('http://www.vbforums.com/showthread.php?345726-DELPHI-Download-Files'),
PChar( 'a:\download.htm'),
      0,
      nil);
if errcode > 0 then
      showmessage('Error while downloading: ' + inttostr(errcode));