模块转dll的问题

hcq944046

有好心人吗，请帮小弟看下，我想把模块源码转写成dll,但是老是不成功。主要是数据类型的转换问题，小弟小白一枚，盼大神救命！
上代码一：
.版本 2
.子程序 鼠标_移动, , 公开, 设置鼠标坐标
.参数 窗口句柄, 整数型, 可空, 可空:相对桌面移动鼠标  句柄有效则相对窗口中坐标移动
.参数 水平坐标, 整数型, , 水平坐标
.参数 垂直坐标, 整数型, , 垂直坐标
.局部变量 临时坐标, 精易_坐标
.如果真 (窗口句柄 ≠ 0)
    ClientToScreen (窗口句柄, 临时坐标)
.如果真结束
SetCursorPos (临时坐标.横 ＋ 水平坐标, 临时坐标.纵 ＋ 垂直坐标) （这行显示  不能将“精易_坐标”数据转换到“精易_坐标”数据。）
但是我已经在 自定义数据类型表 里加入代码 （和源码中 的一样）
.版本 2
.数据类型 精易_坐标, 公开
    .成员 横, 整数型, , , 横X
    .成员 纵, 整数型, , , 纵Y
不知何故不能静态编译。要如何解决这个数据转换问题。
///////////////////////////////////////////////////////////////////////////////////
上代码二：
.版本 2
.子程序 图标_取句柄, 整数型, 公开, 取图标句柄,成功返回图标句柄,失败返回0
.参数 参_图标, 字节集, , 欲添加为菜单图标的资源  （编译时这行报错：被取地址的子程序“图标_取句柄”的参数 1 必须是基本数据类型，且不能为字节集。
）
.局部变量 局_对象, 对象, 静态, "0"
.局部变量 局_句柄, 整数型
.局部变量 局_成员数, 整数型
局_成员数 ＝ 取数组成员数 (局_对象) ＋ 1
重定义数组 (局_对象, 真, 局_成员数)
.如果真 (局_对象 [局_成员数].创建图片对象 (参_图标))
    返回 (局_对象 [局_成员数].读数值属性 (“handle”, ))
.如果真结束
返回 (0)
////////////然后我将字节集改为文本型 再编译
.如果真 (局_对象 [局_成员数].创建图片对象 (参_图标)) （又报错：不能将“文本型”数据转换到“字节集”数据。）
////////////请问大师，如何解决数据类型转换的问题！
辛苦大师了，万分感谢！新年快乐！

猥琐小胖子

dll.rar (1.37 KB, 下载次数: 32)

2016-2-13 21:53 上传

点击文件名下载附件 测试可以

hcq944046

谢谢你的解答，能请你试下代码二吗？谢谢！

hcq944046

代码一：用了你上传的那个E文件，可以编译，但是我不理解了，用我原来的，与你的代码一模一样，还是不能编译！
ClientToScreen (窗口句柄, 临时坐标) （这行报错：错误(10003): 指定Dll命令名称“ClientToScreen”未找到。）
同时打开你和我的E文件，查看源码：并未发现支持库不同，我用5.4的版本，也不行，是何故？（你我都没有引用模块。）

hcq944046

恩，我发现问题了，你好像多了两个dll命令，有西！还想请你帮修改下代码二，行吗，谢谢！