Delphi多线程批量文件下载与解压程序

多线程的批量下载 + 解压功能,Delphi 玩得还是挺溜的。项目用的是 Delphi 自带的 Indy 组件来搞下载,每个任务一个线程,效率一下子就提上去了。你要是经常大批量的文件下载,这套代码真的可以参考下,结构清晰、执行也稳。

VclZip 负责解压这一块,支持 ZIP 格式不在话下。用法也不复杂,下载完直接喂进去就行,基本不用操太多心。

而且还有个用到的 Siow_OBRAR_v0.04 库,虽然资料不多,但看命名是辅助解压的,估计支持点特殊格式。如果你碰到不太好解的压缩包,也可以试试看。

嗯,顺带提醒下,既然多线程跑并发,线程安全一定得注意。像文件写入、状态共享这些地方,最好加点锁,防止冲突。还有异常也别落下,不然出错了用户啥也不知道。

,这套 Delphi 源码,适合用来做下载器类的工具开发,或者你自己写爬虫想加点下载逻辑,也能直接拿来改。响应快,扩展性也还不错。

如果你对多线程下载比较感兴趣,还可以看看C# 多线程下载那篇,对比一下语言差异,说不定还有新思路。

rar
skywingsWebGet.rar 预估大小:14个文件
folder
codefans.net 文件夹
folder
skywingsWebGet 文件夹
file
webcdemo.dproj 3KB
file
MyDt.pas 15KB
file
Uwebc.dfm 5KB
file
webcdemo.cfg 434B
file
UnzLib.dll 208KB
file
webcdemo.dproj.local 62B
file
webcdemo.INI 325B
file
zLib.dll 292KB
file
webcdemo.dpr 234B
file
Uwebc.pas 18KB
file
MyDt_Bk.pas 8KB
file
webcdemo.identcache 167B
file
webcdemo.res 159KB
file
MyUnzp.pas 6KB
rar 文件大小:288.23KB