主页 > 编程资料 > Delphi >
发布时间:2015-09-22 作者:网络 阅读:114次

介绍

本文章介绍了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;
关键字词: