我有一个压缩文件,是分卷的。总共有2个分卷。文件名为:file.z01,file.zip.
我用VCLUNZIP解压。无论解压哪一个,都不能成功。 form1.VCLUnZip1.ZipName := ‘file.zip’; //要被解压的文件
form1.VCLUnZip1.ReadZip;
form1.VCLUnZip1.Destdir := 'd:\234';
form1.VCLUnZip1.MultiMode:=mmBlocks;
form1.VCLUnZip1.DoAll := True;
form1.VCLUnZip1.RecreateDirs := true;
form1.VCLUnZip1.FilesList.Add('*.*');
form1.VCLUnZip1.OverwriteMode := Always;
form1.VCLUnZip1.OnTotalPercentDone:= form1.VCLUnZip1TotalPercentDone;
form1.ProgressBar1.Max:=100;
form1.ProgressBar1.Position:=0;
form1.VCLUnZip1.UnZip;
无论我的VCLUnZip1.ZipName 指向哪个文件,都是不能解压的。
这段代码是可以解压非分卷的压缩文件的。跪求高手指点迷津。。
我用VCLUNZIP解压。无论解压哪一个,都不能成功。 form1.VCLUnZip1.ZipName := ‘file.zip’; //要被解压的文件
form1.VCLUnZip1.ReadZip;
form1.VCLUnZip1.Destdir := 'd:\234';
form1.VCLUnZip1.MultiMode:=mmBlocks;
form1.VCLUnZip1.DoAll := True;
form1.VCLUnZip1.RecreateDirs := true;
form1.VCLUnZip1.FilesList.Add('*.*');
form1.VCLUnZip1.OverwriteMode := Always;
form1.VCLUnZip1.OnTotalPercentDone:= form1.VCLUnZip1TotalPercentDone;
form1.ProgressBar1.Max:=100;
form1.ProgressBar1.Position:=0;
form1.VCLUnZip1.UnZip;
无论我的VCLUnZip1.ZipName 指向哪个文件,都是不能解压的。
这段代码是可以解压非分卷的压缩文件的。跪求高手指点迷津。。
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货