delphi - 想在Delphi XE7中使用System.Zip.TZipFile，但在工具选项板中找不到它

Question

我们目前正在使用 ZipTV 进行文件压缩。我们正在努力消除第三方组件，以便轻松升级到较新的 Delphi 版本。我们遇到了 System.Zip.TZipFile，但在 XE7 Delphi Tool Palette 中找不到它。有谁知道我们如何将其添加到我们的应用程序中。以下是 Embarcadero 文档的链接:http://docwiki.embarcadero.com/Libraries/Rio/en/System.Zip.TZipFile

感谢您的帮助。

Answer 1

TZipFile 不是您从工具选项板访问的组件。与使用 TFileStream 一样，您可以在代码中创建此类的实例，而无需使用设计图面。

uses
  System.Zip;
.... 
var
  ZipFile: TZipFile;
.... 
ZipFile := TZipFile.Create;
try
  // use the object
finally
  ZipFile.Free;
end;