结构 压缩软件的核心在于压缩算法.基于Huffman编码的压缩算法思路: 以二进制方式读取源文件,按照每8bits作为一个字符: 统计每个字符的出现频率即为叶子结点的权值,按照Huffman算法得到每个叶子的编码: 对源文件的每个字符,将新的编码组合为二进制流,按照每8bits一个单位写入压缩文件. 举例来看: 假设我们有待压缩源文件hello,h的ASCII码为01101000,同理可得整个文件的二进制形式0110100001100101011011000110110001101111,共5B…

今天用到压缩文件的问题,找了一些网上的资料,后来发现了delphi自身所带的zlib单元,根据例子稍微改变了一些,使它能够符合所有的格式. 使用时,需要Zlib.pas和 Zlibconst.pas两个单元文件,这两个文件保存在 Delphi 5.0安装光盘上 InfoExtrasZlib目录下,此外,在 InfoExtrasZlibObj目录中还保存了 Zlib.pas单元引用的 Obj文件,把这个目录拷贝到delphi的lib下,即可. 原来提供的例子是抓计算机屏幕,现在改成文件流,适应所有…

DELPHI 通过ZLib来压缩文件夹 unit Unit1; interface uses ZLib, Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; const cBufferSize = $; cIdent: ] = 'zsf'; cVersion = $; cErrorIdent = -; cErrorVersion = -; type TFileH…