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 idtcp上传文件

Delphi 获取自身软件的版本号

Delphi txt编码互转 ansi utf-8

Delphi中使用内联变量(inline variables) 的5个理由

delph hash类

Delphi stopprocess 进程关闭函数

Delphi uhttp_flood

Delphi根据不同分隔符获取字符串内容

Delphi xe3里判断网络是否连接成功

Delphi 2009 中 string 与 char 的改变

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

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