delphi xe android 使用System.Zip单元释放资源文件

本文整理自网络，侵删。

 
System.Zip.pas
 
var
  zip: TZipFile;
begin
  zip := TZipFile.Create;
  zip.Open(TPath.GetDocumentsPath + PathDelim +'txt.zip', TZipMode.zmRead);
  zip.ExtractAll(TPath.GetDocumentsPath + PathDelim);
  zip.Free;
 
注意：应用权限选对
 

相关阅读 >>

常用的几个网络函数和系统函数

Delphi android调用授权管理打开通知监听服务

Delphi 多次改变 richedit.text部份文本的颜色后，出现所有字体都变色的的解决办法

Delphi 让嵌入窗体的 webbrowser 控件无边框

Delphi xe5 给edit增加自定义按钮

Delphi 多函数形式的多线程同步-线程执行顺序

Delphi 设计一个有渐变色的标签

Delphi实现文件的拖放功能

Delphi 文件路径相关的字符串操作

Delphi 根据开始和结束符取得中间字符串

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

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