寻求易语言编写一份zlib1.dll的compress和uncompress例子

a7816995

zlib1.7z (34.21 KB, 下载次数: 131)

2020-5-3 17:21 上传

点击文件名下载附件

寻求易语言编写一份zlib1.dll的compress、uncompress例子，本DLL支持compressBound


谢谢有缘人。

.版本 2

.DLL命令 压缩, 整数型, "zlib1.dll", "@compress", 公开, compress()函数成功返回Z_OK，如果内存不够，返回Z_MEM_ERROR，如果目标缓冲区太小，返回Z_BUF_ERROR
    .参数 参数_dest, 字节集, , dest：压缩后xx保存的目标缓冲区
    .参数 参数_destLen, 整数型, , destLen：目标缓冲区的大小（必须在调用前设置，并且它是一个指针）
    .参数 参数_source, 字节集, , source：要压缩的xx
    .参数 参数_sourceLen, 整数型, , sourceLen：要压缩的xx长度


由于需要传入的是指针类型的长度，所以拜托有缘人帮忙谢谢例子。  任意一个文件的 加解压例子。

梦寻简单

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

子程序名	返回值类型	公开	备 注
_unompress	字节集
参数名	类 型	参考	可空	数组	备 注
bin	字节集

变量名	类 型	静态	数组	备 注
dest	字节集
destLen	整数型
source	字节集
sourceLen	整数型
ret	整数型

source ＝ bin
sourceLen ＝ 取字节集长度 (bin)
destLen ＝ sourceLen × 2
dest ＝ 取空白字节集 (destLen)
ret ＝ uncompress_ (dest, destLen, source, sourceLen)
dest ＝ 取字节集左边 (dest, destLen)
返回 (dest)

子程序名	返回值类型	公开	备 注
_compress	字节集
参数名	类 型	参考	可空	数组	备 注
bin	字节集

变量名	类 型	静态	数组	备 注
dest	字节集
destLen	整数型
source	字节集
sourceLen	整数型
ret	整数型

source ＝ bin
sourceLen ＝ 取字节集长度 (bin)
destLen ＝ sourceLen × 2
dest ＝ 取空白字节集 (destLen)
ret ＝ compress_ (dest, destLen, source, sourceLen)
如果真 (ret ＝ 0)
dest ＝ 取字节集左边 (dest, destLen)
返回 (dest)

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

变量名	类 型	静态	数组	备 注
xx1	字节集
xx2	字节集

xx1 ＝ _compress ({ 1, 2, 3, 1, 2, 3, 1, 2, 3 })
xx2 ＝ _unompress (xx1)
调试输出 (xx2)

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 _unompress, 字节集<br /> .参数 bin, 字节集<br /> .局部变量 dest, 字节集<br /> .局部变量 destLen, 整数型<br /> .局部变量 source, 字节集<br /> .局部变量 sourceLen, 整数型<br /> .局部变量 ret, 整数型<br /> <br /> source ＝ bin<br /> sourceLen ＝ 取字节集长度 (bin)<br /> destLen ＝ sourceLen × 2<br /> dest ＝ 取空白字节集 (destLen)<br /> ret ＝ uncompress_ (dest, destLen, source, sourceLen)<br /> dest ＝ 取字节集左边 (dest, destLen)<br /> 返回 (dest)<br /> <br /> .子程序 _compress, 字节集<br /> .参数 bin, 字节集<br /> .局部变量 dest, 字节集<br /> .局部变量 destLen, 整数型<br /> .局部变量 source, 字节集<br /> .局部变量 sourceLen, 整数型<br /> .局部变量 ret, 整数型<br /> <br /> source ＝ bin<br /> sourceLen ＝ 取字节集长度 (bin)<br /> destLen ＝ sourceLen × 2<br /> dest ＝ 取空白字节集 (destLen)<br /> ret ＝ compress_ (dest, destLen, source, sourceLen)<br /> .如果真 (ret ＝ 0)<br />     dest ＝ 取字节集左边 (dest, destLen)<br /> .如果真结束<br /> 返回 (dest)<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 xx1, 字节集<br /> .局部变量 xx2, 字节集<br /> <br /> xx1 ＝ _compress ({ 1, 2, 3, 1, 2, 3, 1, 2, 3 })<br /> xx2 ＝ _unompress (xx1)<br /> 调试输出 (xx2)

  

DLL命令名	返回值类型	公开	备 注
uncompress_	整数型
DLL库文件名:
zlib.dll
在DLL库中对应命令名:
uncompress
参数名	类 型	传址	数组	备 注
dest	字节集
destLen	整数型
source	字节集
sourceLen	整数型

DLL命令名	返回值类型	公开	备 注
compress_	整数型
DLL库文件名:
zlib.dll
在DLL库中对应命令名:
compress
参数名	类 型	传址	数组	备 注
dest	字节集
destLen	整数型
source	字节集
sourceLen	整数型

.版本 2<br /> <br /> .DLL命令 uncompress_, 整数型, "zlib.dll", "uncompress"<br />     .参数 dest, 字节集, 传址<br />     .参数 destLen, 整数型, 传址<br />     .参数 source, 字节集<br />     .参数 sourceLen, 整数型, 传址<br /> <br /> .DLL命令 compress_, 整数型, "zlib.dll", "compress"<br />     .参数 dest, 字节集<br />     .参数 destLen, 整数型, 传址<br />     .参数 source, 字节集<br />     .参数 sourceLen, 整数型

a7816995

梦寻简单 发表于 2020-5-3 18:03
[e=0].版本 2
.支持库 spec

麻烦再看看，这个奇葩的问题。。。

梦寻简单

a7816995 发表于 2020-5-3 21:25
麻烦再看看，这个奇葩的问题。。。

dll里面的zlib改为zlib1

a7816995

梦寻简单 发表于 2020-5-3 23:37
dll里面的zlib改为zlib1

不好意思，确实是我粗心大意了。 哈哈

罗泠雨人

a7816995 发表于 2020-5-4 10:55
不好意思，确实是我粗心大意了。 哈哈

你这个不提示堆栈错误吗？

U米网络

梦寻简单 发表于 2020-5-3 17:25
[e=0].版本 2
.支持库 spec

大佬我shuj解压出来不完整是啥情况

梦寻简单

a644239610 发表于 2020-6-17 12:24
大佬我shuj解压出来不完整是啥情况

你可以先看看ret的返回值

补充内容 (2020-6-17 12:44):
compressBound  可以用这个命令取一下缓存区长度
参数:长度

ms5084456

库中命令名处compress前面要加@, "@compress"