当前位置:首页 » 文件管理 » delphi解压zip

delphi解压zip

发布时间: 2022-07-29 04:07:29

1. Delphi中如何执行ZIP文件谢谢!

前提条件:你必须装有
WinZip
or
WinRAR
等解压缩软件,
并且文件已经关联)即可使用:
楼上兄弟说的
ShellExecute
(记得
use
ShellApi
先)~

2. delphi如何解压文件

procere TForm1.Button5Click(Sender: TObject);
begin
With myZip do
begin
ZipName := inzip.Text;//ZIP文件名
Destdir:=outdir.Text;//解压到的目录
FilesList.Add('*.*');
DoAll := true;
if incpw.Checked then
password:=pwe.Text;//密码
Recurse := True; //* Recurse directories */
StorePaths := true; //* Keep path information */
DoAll := False;
unzip;
end;
end;

3. delphi XE 10 解压压缩文件

没有的,可以在前端要求加个判断格式,只有ZIP的才行。或都把.rar的自己转换成zip

4. 如何使用delphi调用7zip压缩解压缩

e 解压压缩文件到当前目录

忽略路径解压压缩的文件到当前或指定的文件夹。此命令行对应的是 压缩文件管理 命令 解压到指定文件夹 并在 解压路径和选项对话框 “不解压路径”的选项是启用时。

例子:
在当前文件夹,从全部的 RAR 压缩文件解压所有的 *.doc 文件到当前文件夹
WinRAR e *.rar *.doc

5. Delphi 解压文件

很简单吧,先不带密码尝试解压一次或者获取信息一次,如果失败了就说明有密码咯。
代码:
procere TForm1.btn1Click(Sender: TObject);
begin
UnZip1.OnBadPassword:=UnZip1BadPassword;
UnZip1.ArchiveStream:=TFileStream.Create('F:\古书.zip',fmOpenRead);
if UnZip1.CheckArchive then
begin
showmessage('No Pass');
UnZip1.ArchiveStream.Free;
exit;
//无密码,不解压
end;
//解压过程,略。
UnZip1.ArchiveStream.Free;
end;

procere TForm1.UnZip1BadPassword(Sender: TObject; FileIndex: Integer;
var NewPassword: String);
begin
NewPassword:='123456'; //123456是真实的密码,这一步可以省
end;

6. 求delphi 解压文件方法【请注意,不是调用winrar来解压】

不用调用rar用rar里面提供的控件就可以了,或者用7z控件,不用控件应该不可能实现

7. delphi解压文件问题

呵呵,,我给你一个解决的办法吧,看你的代码就知道你是下载VCLZIP组件。。
建议你用VCLunzip组件:解压代码如下:
UnZip1.ZipName:='c:\Upx.zip';//zip所在目录
UnZip1.ReadZip;
UnZip1.FilesList.Add('*.*');
UnZip1.FilesList.Add(UnZip1.Filename[UnZip1.Count-1] );
UnZip1.DoAll:=false;
UnZip1.DestDir:='c:\';//指定目录
UnZip1.RecreateDirs := True;
UnZip1.RetainAttributes := True;
UnZip1.UnZip;

要设置解压时替换原有的文件不弹出提示框,其实很简单在OverwriteMode属性设成Always就可以了!!

8. 谁会用delphi写解压程序(zip文件)

呵呵,如不雅安装了winzip这个软件,可以用它的dll来实现:wzcab3.dllwz32._initunzipunzip_._initCAB_.dllZAMEntryPoint1呵呵,这个由kingron供给的。

9. delphi的VCLZip控件的解压问题

ziper.DoAll := True;
ziper.OverwriteMode := Always;
ziper.RelativePaths:=true;//是否保持目录结构
ziper.AddDirEntriesOnRecurse:=true;
ziper.RecreateDirs:=true;//创建目录

加上这几句应该就行了。
vclzip在delphi2010中是无法使用的,在d7中可以正常使用。如果想在d2010中使用,建议在d7下把这些函数封装成dll,在2010中调用即可。

10. delphi zip 调用的是电脑本机的解压软件吗

这个要看你编写的具体代码。


zip 作为一种常用的压缩文件格式,大多数软件都实现了对 zip 文件的解压函数,可以直接调用。比如,在Delphi XE2 中,就新增有 System.Zip 单元, 可以直接用一句代码就可以压缩整个文件夹:


TZipFile.ExtractZipFile()//解压Zip文件到指定文件夹
TZipFile.IsValid()//判断指定文件是否是有效的Zip文件
TZipFile.ZipDirectoryContents()//压缩指定路径下的所有文件


同时,也可以调用系统的解压缩程序来对 zip 文件进行处理。

热点内容
深圳ug编程培训 发布:2025-05-10 05:54:27 浏览:661
二进制乘法算法 发布:2025-05-10 05:53:46 浏览:588
safari怎么清理缓存 发布:2025-05-10 05:53:43 浏览:649
javaodbc数据库连接 发布:2025-05-10 05:39:21 浏览:121
sqlserver还原数据库失败 发布:2025-05-10 05:28:24 浏览:480
安卓哪个能录内部声音 发布:2025-05-10 05:28:17 浏览:326
安卓大屏如何查看分辨率 发布:2025-05-10 05:11:21 浏览:467
酷派手机密码是多少 发布:2025-05-10 05:04:17 浏览:974
editpluspython 发布:2025-05-10 04:56:53 浏览:740
linux串口驱动开发 发布:2025-05-10 04:55:37 浏览:597