让Delphi的TZipFile压缩类支持压缩密码的扩展类

时间:2021-05-10 17:08:11
【文件属性】:

文件名称:让Delphi的TZipFile压缩类支持压缩密码的扩展类

文件大小:4KB

文件格式:ZIP

更新时间:2021-05-10 17:08:11

Delphi zip 压缩 密码

有些人可能已经知道,Delphi(至少从XE2起)附带了一个内置的TZipFile类,用于读写zip文件。这是一个只是功能有限的一个相当基础的类,但这对于日常工作来说可能就够了。 在最近将项目从Delphi 7迁移到Delphi 10.1 Berlin之前,我正在面临着要修复当前基于外部DLLzip实现或者重新实现一个TZipFile的决定。第二个选择也将具有摆脱必须DLL的优点。 那么,一如以往,当你认为你找到了正确的解决方案并开始编码 - 现实的步骤。我们必须读取的一些zip文件是密码保护的。不幸的是,TZipFile不支持密码加密。 摆脱这种外部依赖是诱人的,改变使用TZipFile的非加密用例很简单。如果切换到市场上其它库,似乎太多的努力而获得的收益很少。所以我修改了自己实现加密部分的想法。老实说,多难? 幸运的是,在这种特殊情况下,我们只需要读取这些加密的zip文件,所以以某种方式实现解密部分就足够了。查看TZipFile的技术文档,我实际上在文档中找到了如何实现这一点的说明。


【文件预览】:
uEncryptedZipFile.pas

网友评论

  • 非常好非常好
  • 下载了pas文件,可是编译不过,找不到TZipFile.OnCreateDecompressStream 没有这个事件定义,有知道的吗?
  • 非常好非常好
  • 不知道怎么用
  • https://www.uweraabe.de/Blog/2017/05/07/tzipfile-with-password-encryption-part-3/ 这里有说明。
  • 好像代码不全,里面给了一个地址需要自己下载,里面也没有例子,只有源码,开始接触delphi 的人使用有难度!