Delphi中的TActionList有个标准动作TDownLoadURL,内部是使用的URLDownloadToFile,它下载文件时会定时产生OnDownloadProgress 事件,这样就可以用进度条显示。

Delphi用TActionList实现下载文件的方法

Delphi用TActionList实现下载文件的方法