如何用DELPHI 把数据库内的图片取出并打ZIP包

发布网友发布时间：2022-12-22 06:58

共2个回答

热心网友时间：2024-11-23 22:38

用数据集取出图片保存为文件后
第三方控件VCLZip来完成。

压缩：

vclzip:=TVCLZip.create(nil);

with vclzp do
begin
ZipName:=dstFile;
RecreateDirs:=true; //注意这里
StorePaths:=False;
FilesList.Add(srcFile);
Recurse := True;
try
Zip;
except
Application.MessageBox('压缩文件失败','错误',MB_OK+MB_ICONINFORMATION);
exit;
end;
end;

热心网友时间：2024-11-23 22:39

数据库里直接存的大项目？

声明：本网页内容为用户发布，旨在传播知识，不代表本网认同其观点，若有侵权等问题请及时与本网联系，我们将在第一时间删除处理。E-MAIL:11247931@qq.com