kyozy 的libzip 模块调用例子

易风雪

模块地址：https://bbs.ijingyi.com/forum.php?mod=viewthread&tid=14857940

大佬封装的这个 zip 模块 功能非常全面，唯一的美中不足就是 注册进度回调在易语言里有BUG，

让AI 写了一个 适配器，然后就可以注册回调不崩溃了。

游客，如果您要查看本帖隐藏内容请回复

  

子程序名	返回值类型	公开	备 注
_进度回调
参数名	类 型	参考	可空	数组	备 注
压缩包指针	整数型
进度值	双精度小数型
用户数据	整数型

调试输出 (“压缩进度”, 进度值)

子程序名	返回值类型	公开	备 注
创建进度回调适配器	整数型		返回适配器指针(可传给模块)
参数名	类 型	参考	可空	数组	备 注
回调子程序指针	整数型				即 &_进度回调

变量名	类 型	静态	数组	备 注
适配器地址	整数型
代码	字节集

' 机器码与之前相同
代码 ＝ { 85, 137, 229 }  ' push ebp; mov ebp,esp
代码 ＝ 代码 ＋ { 255, 117, 20 }  ' push [ebp+20]
代码 ＝ 代码 ＋ { 255, 117, 16 }  ' push [ebp+16]
代码 ＝ 代码 ＋ { 255, 117, 12 }  ' push [ebp+12]
代码 ＝ 代码 ＋ { 255, 117, 8 }  ' push [ebp+8]
代码 ＝ 代码 ＋ { 184 } ＋ 到字节集 (回调子程序指针)  ' mov eax, addr
代码 ＝ 代码 ＋ { 255, 208 }  ' call eax
代码 ＝ 代码 ＋ { 93 }  ' pop ebp
代码 ＝ 代码 ＋ { 195 }  ' ret
' 申请可执行内存
适配器地址 ＝ 申请内存 (取字节集长度 (代码), 真)  ' 第二个参数“真”表示可执行
如果真 (适配器地址 ＝ 0)
返回 (0)

' 用 API 复制机器码到申请的内存中
RtlMoveMemory (适配器地址, 取指针_字节集型 (代码), 取字节集长度 (代码))
返回 (适配器地址)

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

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 _进度回调, , 公开<br /> .参数 压缩包指针, 整数型<br /> .参数 进度值, 双精度小数型<br /> .参数 用户数据, 整数型<br /> <br /> 调试输出 (“压缩进度”, 进度值)<br /> <br /> .子程序 创建进度回调适配器, 整数型, , 返回适配器指针(可传给模块)<br /> .参数 回调子程序指针, 整数型, , 即 &_进度回调<br /> .局部变量 适配器地址, 整数型<br /> .局部变量 代码, 字节集<br /> <br /> ' 机器码与之前相同<br /> 代码 ＝ { 85, 137, 229 }  ' push ebp; mov ebp,esp<br /> 代码 ＝ 代码 ＋ { 255, 117, 20 }  ' push [ebp+20]<br /> 代码 ＝ 代码 ＋ { 255, 117, 16 }  ' push [ebp+16]<br /> 代码 ＝ 代码 ＋ { 255, 117, 12 }  ' push [ebp+12]<br /> 代码 ＝ 代码 ＋ { 255, 117, 8 }  ' push [ebp+8]<br /> 代码 ＝ 代码 ＋ { 184 } ＋ 到字节集 (回调子程序指针)  ' mov eax, addr<br /> 代码 ＝ 代码 ＋ { 255, 208 }  ' call eax<br /> 代码 ＝ 代码 ＋ { 93 }  ' pop ebp<br /> 代码 ＝ 代码 ＋ { 195 }  ' ret<br /> <br /> ' 申请可执行内存<br /> 适配器地址 ＝ 申请内存 (取字节集长度 (代码), 真)  ' 第二个参数“真”表示可执行<br /> .如果真 (适配器地址 ＝ 0)<br />     返回 (0)<br /> .如果真结束<br /> <br /> ' 用 API 复制机器码到申请的内存中<br /> RtlMoveMemory (适配器地址, 取指针_字节集型 (代码), 取字节集长度 (代码))<br /> <br /> 返回 (适配器地址)

chengpf

6666666666666666666666666666666666666666666666

昨夜的雨

感谢分享

wh1234567

什么用处？老师

陈治勤

66666666666666666666

woxl

如果您要查看本帖隐藏内容请回复

yangxuan87

666666666666

1226852858

66666666666666666666666666

1184798949

感谢分享

515889127

感谢分享