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 错误no ftp list parsers have been registered

Delphi使焦点固定到一个button上

重新组织编写Delphi的md2、md4、md5类

Delphi paramcount、paramstr

Delphi模拟文件拖拽

Delphi资源文件的详细使用方法

Delphi程序删除自己

Delphi 在statusbar1.panels上显示日期时间星期

Delphi md5加密base64加解密

Delphi idftp

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



打赏

取消

感谢您的支持,我会继续努力的!

扫码支持
扫码打赏,您说多少就多少

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

评论

管理员已关闭评论功能...