Delphi XE5 android 使用System.Zip单元释放资源文件

本文整理自网络，侵删。

 介绍

本文章介绍了Delphi XE5 android 使用System.Zip单元释放资源文件，在写代码之前，需要先引用
System.Zip.pas


然后编写如下的代码
var

  zip: TZipFile;

begin
  //首先创建对象
  zip := TZipFile.Create;
  //打开需要解压缩的Zip文件
  zip.Open(TPath.GetDocumentsPath + PathDelim +'txt.zip', TZipMode.zmRead);
  //解压缩所有的文件到指定的目录
  zip.ExtractAll(TPath.GetDocumentsPath + PathDelim);
  //释放资源
  FreeAndNil(zip);

end; 

相关阅读 >>

Delphi 十进制转十六进制

Delphi文件无法拖拽功能失效

Delphi 得到执行程序的当前所在完整路径

Delphi 设置系统启动文件夹自身开机自动运行

Delphi yearof 根据指定的日期返回年

Delphi stringgrid之属性大全

Delphi 时间到就触发事件

Delphi app 横屏和竖屏

Delphi调用命令行命令并获取返回信息

Delphi idftp 详解

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » Delphi XE5 android 使用System.Zip单元释放资源文件