精易模块v8.0.5改进建议，如有错误请指正

Su·

程序_调用DLL命令与内部_call为更新后命令

  

子程序名	返回值类型	公开	备 注
程序_调用DLL命令	整数型		调用失败返回-1，调用成功返回命令自身的值。
参数名	类 型	参考	可空	数组	备 注
DLL路径	文本型				DLL完整路径
函数名称	文本型				要调用的子程序命令名称
参数1	整数型				参数如果非整数可用指针传递
参数2	整数型
参数3	整数型
参数4	整数型
参数5	整数型
参数6	整数型
参数7	整数型
参数8	整数型
参数9	整数型
参数10	整数型
参数11	整数型
参数12	整数型
参数13	整数型
参数14	整数型
参数15	整数型

变量名	类 型	静态	数组	备 注
模块句柄	整数型
函数地址	整数型
ret	整数型

模块句柄 ＝ LoadLibraryA (DLL路径)  ' 载入指定的动态链接库，并将它映射到当前进程使用的地址空间
如果真 (模块句柄 ＝ 0)
返回 (-1)
函数地址 ＝ GetProcAddress (模块句柄, 函数名称)
判断 (函数地址 ≠ 0)
ret ＝ 内部_Call (函数地址, 参数1, 参数2, 参数3, 参数4, 参数5, 参数6, 参数7, 参数8, 参数9, 参数10, 参数11, 参数12, 参数13, 参数14, 参数15)  ' 该命令是易语言助手词库call’
' 原先这里调用成功后没有释放dll
ret ＝ -1
FreeLibrary (模块句柄)  ' 释放动态链接库
返回 (ret)

子程序名	返回值类型	公开	备 注
内部_call	整数型
参数名	类 型	参考	可空	数组	备 注
子程序地址	整数型
参数1	整数型
参数2	整数型
参数3	整数型
参数4	整数型
参数5	整数型
参数6	整数型
参数7	整数型
参数8	整数型
参数9	整数型
参数10	整数型
参数11	整数型
参数12	整数型
参数13	整数型
参数14	整数型
参数15	整数型

置入代码 ({ 86, 190, 15, 0, 0, 0, 141, 77, 8, 141, 76, 241, 252, 139, 65, 4, 133, 192, 116, 2, 255, 49, 78, 131, 233, 8, 133, 246, 117, 239, 255, 85, 8, 94, 201, 194, 124, 0 })
返回 (0)

.版本 2<br /> <br /> .子程序 程序_调用DLL命令, 整数型, 公开, 调用失败返回-1，调用成功返回命令自身的值。 <br /> .参数 DLL路径, 文本型, , DLL完整路径<br /> .参数 函数名称, 文本型, , 要调用的子程序命令名称<br /> .参数 参数1, 整数型, 可空, 参数如果非整数可用指针传递<br /> .参数 参数2, 整数型, 可空<br /> .参数 参数3, 整数型, 可空<br /> .参数 参数4, 整数型, 可空<br /> .参数 参数5, 整数型, 可空<br /> .参数 参数6, 整数型, 可空<br /> .参数 参数7, 整数型, 可空<br /> .参数 参数8, 整数型, 可空<br /> .参数 参数9, 整数型, 可空<br /> .参数 参数10, 整数型, 可空<br /> .参数 参数11, 整数型, 可空<br /> .参数 参数12, 整数型, 可空<br /> .参数 参数13, 整数型, 可空<br /> .参数 参数14, 整数型, 可空<br /> .参数 参数15, 整数型, 可空<br /> .局部变量 模块句柄, 整数型<br /> .局部变量 函数地址, 整数型<br /> .局部变量 ret, 整数型<br /> <br /> 模块句柄 ＝ LoadLibraryA (DLL路径)  ' 载入指定的动态链接库，并将它映射到当前进程使用的地址空间<br /> .如果真 (模块句柄 ＝ 0)<br />     返回 (-1)<br /> .如果真结束<br /> 函数地址 ＝ GetProcAddress (模块句柄, 函数名称)<br /> .判断开始 (函数地址 ≠ 0)<br />     ret ＝ 内部_Call (函数地址, 参数1, 参数2, 参数3, 参数4, 参数5, 参数6, 参数7, 参数8, 参数9, 参数10, 参数11, 参数12, 参数13, 参数14, 参数15)  ' 该命令是<a href="http://e.125.la/" rel="nofollow" target="_blank" class="relatedlink">易语言助手</a>词库call’<br />     ' 原先这里调用成功后没有释放dll<br /> .默认<br />     ret ＝ -1<br /> .判断结束<br /> FreeLibrary (模块句柄)  ' 释放动态链接库<br /> 返回 (ret)<br /> <br /> <br /> .子程序 内部_call, 整数型<br /> .参数 子程序地址, 整数型<br /> .参数 参数1, 整数型, 可空<br /> .参数 参数2, 整数型, 可空<br /> .参数 参数3, 整数型, 可空<br /> .参数 参数4, 整数型, 可空<br /> .参数 参数5, 整数型, 可空<br /> .参数 参数6, 整数型, 可空<br /> .参数 参数7, 整数型, 可空<br /> .参数 参数8, 整数型, 可空<br /> .参数 参数9, 整数型, 可空<br /> .参数 参数10, 整数型, 可空<br /> .参数 参数11, 整数型, 可空<br /> .参数 参数12, 整数型, 可空<br /> .参数 参数13, 整数型, 可空<br /> .参数 参数14, 整数型, 可空<br /> .参数 参数15, 整数型, 可空<br /> <br /> 置入代码 ({ 86, 190, 15, 0, 0, 0, 141, 77, 8, 141, 76, 241, 252, 139, 65, 4, 133, 192, 116, 2, 255, 49, 78, 131, 233, 8, 133, 246, 117, 239, 255, 85, 8, 94, 201, 194, 124, 0 })<br /> 返回 (0)

这句代码我服了，建议删掉

  

子程序名	返回值类型	公开	备 注
程序_是否关闭	逻辑型		弹出一个信息框，返回操作信息框的结果

如果真 (信息框 (“确定要关闭本窗口吗？”, 32 ＋ 1, “友情提醒”) ＝ 0)
返回 (真)
返回 (假)

.版本 2<br /> <br /> .子程序 程序_是否关闭, 逻辑型, 公开, 弹出一个信息框，返回操作信息框的结果<br /> <br /> .如果真 (信息框 (“确定要关闭本窗口吗？”, 32 ＋ 1, “友情提醒”) ＝ 0)<br />     返回 (真)<br /> .如果真结束<br /> 返回 (假)

Su·

1185384801 发表于 2020-3-13 11:52
参数加上可空应该更好

貌似是论坛显示问题，复制到易语言中没问题

li609545570

精易模块开发组太不用心了！
一个程序是否关闭 也放在模块源码里？
哈哈~ 该长点心了！

Su·

1185384801 发表于 2020-3-13 11:52
参数加上可空应该更好

欸。我写的时候选择了可空，但是发表后怎么没有了  

1185384801

参数加上可空应该更好