用Delphi实现文件下载的几种方法

版权声明 请尊重原创作品。转载请保持文章完整性，并以超链接形式注明原始作者“tingsking18”和主站点地址，方便其他朋友提问和指正。   笔者最近开发的系统中需要写一个下载文件的功能。以前用BCB调用API写的很烦琐，忽然想起有一个API就可以搞定了，于是一大早就来搜索。这个API就是UrlDownloadToFile。不仅如此，Delphi的一些控件也可以轻松实现下载，如NMHTTP，指定NMHTTP1.InputFileMode := ture; 指定Body为本地文件名，指定Get就可以下载了。下面是详细代码，均出自CSDN。我把它们都整理到这儿，让大家方便查阅。 uses UrlMon; function DownloadFile(Source, Dest: string): Boolean; begin   try     Result := UrlDownloadToFile(nil, PChar(source), PChar(Dest), 0,