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 system.sysutils.tmarshaller 与 system.tmarshal

Delphi format中的换行符号是什么

Delphi sysem.json 链式写法

Delphi 系统对话框（如浏览目录）被隐藏到主窗体后面造成程序无法操作的临时处理方式

Delphi 关闭xp保护 替换explorer.exe

Delphi xe, xe10, 创建 activeform 和 activex 工程的方法

Delphi tsearchrec

Delphi android ios 获取packagename

Delphi 获取dll文件的函数列表

Delphi 根据数据库结构生成treeview

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

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