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 mscomnn1 判断com口是否打开

Delphi 实现窗口与任务栏右下角对齐

Delphi applicationevents1 webbrowser1屏蔽右键菜单

Delphi 如何使用findfirst搜索不同的文件类型？

Delphi 模仿qq截图

Delphi实现音频传输

Delphi 顺序查找与二分查找

Delphi读取文本文件的最后一行

Delphi 数字排序自动完成

Delphi 获取其他进程句柄的几种方法

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

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