调用DLL窗口组件例程

ax2016

再主程序调用DLL 打开窗口的时候   为什么同样的代码  调整了窗口大小   就无法加载了

代码在附件，求大佬帮忙看看咋回事

陽陽陽

改变窗口大小之后试试重新RtlMoveMemory试试

陽陽陽

源码没法下载（学校电脑）
这个问题描述就很疑惑？？
你调整了大小导致无法调用D L L创建组件？

你试试loadlib动态载入D L L
详情看这里https://bbs.125.la/forum.php?mod ... 14751000&extra=

还不行的话就是代码问题了，试试改变窗口大小之后重新调用D L L初始化（你D L L里有没有获取窗口大小宽度的代码？100%！！）

ax2016

陽陽陽 发表于 2022-11-16 11:22
源码没法下载（学校电脑）
这个问题描述就很疑惑？？
你调整了大小导致无法调用D L L创建组件？

我就调整了dll 里面窗口1的大小  然后再编译成DLL   主程序就无法调用了

ax2016

陽陽陽 发表于 2022-11-16 11:22
源码没法下载（学校电脑）
这个问题描述就很疑惑？？
你调整了大小导致无法调用D L L创建组件？

  

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
窗口	窗口
计次
文件名	文本型

. ' 计次循环首 (, 计次)
' DLL接口 (取变量地址 (窗口))
' 卷帘式菜单1.加入组件菜单 (窗口.标题, 窗口, , )
. ' 计次循环尾 ()
文件名 ＝ 寻找文件 (取运行目录 () ＋ “\*.dll”, )
判断循环首 (文件名 ≠ “”)
DLL命令调用转向 (取运行目录 () ＋ “\” ＋ 文件名, )
DLL接口 (取变量地址 (窗口))
卷帘式菜单1.加入组件菜单 (窗口.标题, 窗口, , )
文件名 ＝ 寻找文件 (, )
判断循环尾 ()

i支持库列表	支持库注释
spec	特殊功能支持库
iext3	扩展界面支持库三

.版本 2<br /> .支持库 spec<br /> .支持库 iext3<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 窗口, 窗口<br /> .局部变量 计次<br /> .局部变量 文件名, 文本型<br /> <br /> <br /> .' 计次循环首 (, 计次)<br /> <br />     ' DLL接口 (取变量地址 (窗口))<br />     ' 卷帘式菜单1.加入组件菜单 (窗口.标题, 窗口, , )<br /> .' 计次循环尾 ()<br /> <br /> <br /> 文件名 ＝ 寻找文件 (取运行目录 () ＋ “\*.dll”, )<br /> .判断循环首 (文件名 ≠ “”)<br />     DLL命令调用转向 (取运行目录 () ＋ “\” ＋ 文件名, )<br />     DLL接口 (取变量地址 (窗口))<br />     卷帘式菜单1.加入组件菜单 (窗口.标题, 窗口, , )<br /> <br /> <br />     文件名 ＝ 寻找文件 (, )<br /> .判断循环尾 ()

我的主程序，会把DLL的里面的窗口1   加载到主程序里

陽陽陽

ax2016 发表于 2022-11-16 11:26
[e=0].版本 2
.支持库 spec
.支持库 iext3

重点是你的D L L！能放一下源码吗

ax2016

陽陽陽 发表于 2022-11-16 11:30
重点是你的D L L！能放一下源码吗

压缩包里有完整的  这是三部分  1 DLL命令定义表   2  程序集1   3 窗口程序集1  

  

DLL命令名	返回值类型	公开	备 注
RtlMoveMemory	整数型
DLL库文件名:
kernel32
在DLL库中对应命令名:
RtlMoveMemory
参数名	类 型	传址	数组	备 注
目的地址	整数型			any
源地址	整数型			any
复制尺寸	整数型

.版本 2<br /> <br /> .DLL命令 RtlMoveMemory, 整数型, "kernel32", "RtlMoveMemory"<br />     .参数 目的地址, 整数型, , any<br />     .参数 源地址, 整数型, , any<br />     .参数 复制尺寸, 整数型

  

窗口程序集名	保 留	保 留	备 注
程序集1

子程序名	返回值类型	公开	备 注
_启动子程序	整数型		请在本子程序中放置动态链接库初始化代码

变量名	类 型	静态	数组	备 注
指针	整数型

载入 (窗口1, , 假)
返回 (0)  ' 返回值被忽略。

子程序名	返回值类型	公开	备 注
DLL接口
参数名	类 型	参考	可空	数组	备 注
窗口指针	整数型

变量名	类 型	静态	数组	备 注
窗口	窗口

窗口 ＝ 窗口1
RtlMoveMemory (窗口指针, 取变量地址 (窗口), 8)

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

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 程序集1<br /> <br /> .子程序 _启动子程序, 整数型, , 请在本子程序中放置动态链接库初始化代码<br /> .局部变量 指针, 整数型<br /> <br /> 载入 (窗口1, , 假)<br /> 返回 (0)  ' 返回值被忽略。<br /> <br /> .子程序 DLL接口, , 公开<br /> .参数 窗口指针, 整数型<br /> .局部变量 窗口, 窗口<br /> <br /> 窗口 ＝ 窗口1<br /> RtlMoveMemory (窗口指针, 取变量地址 (窗口), 8)

  

窗口程序集名	保 留	保 留	备 注
窗口程序集1

子程序名	返回值类型	公开	备 注
_按钮1_被单击

信息框 (“2”, 0, )

.版本 2<br /> <br /> .程序集 窗口程序集1<br /> <br /> .子程序 _按钮1_被单击<br /> <br /> 信息框 (“2”, 0, )