这段窗口句柄代码为何不能运行呢？

aismy

1. .版本 2
   
2. 
   
3. .子程序 _时钟3_周期事件
   
4. .局部变量 鼠标坐标, 坐标
   
5. .局部变量 当前窗口句柄, 整数型
   
6. 
   
7. 取鼠标坐标 (鼠标坐标)' ok
   
8. 当前窗口句柄 ＝ 取坐标窗口句柄 (鼠标坐标.x, 鼠标坐标.y)
   
9. 画控件外观 (当前窗口句柄)
   
10. 编辑框11.内容 ＝ 到文本 (当前窗口句柄)
    
11. 
    
12. .子程序 画控件外观
    
13. .参数 控件句柄, 整数型
    
14. 
    
15. 
    
16. 
    
17. .子程序 _按钮11_鼠标左键被按下, 逻辑型
    
18. .参数 横向位置, 整数型
    
19. .参数 纵向位置, 整数型
    
20. .参数 功能键状态, 整数型
    
21. 
    
22. 时钟3.时钟周期 ＝ 300
    
23. 按钮11.标题 ＝ “放开鼠标左键，结束操作！”
    

复制代码

提示：错误(37): 找不到指定的命令／子程序／Dll命令调用名称“取鼠标坐标”。
编译现行易程序失败或被中止!

fsjoe

加上这两段代码

第一段是数据类型定义，如果已经有了就不用

1. .版本 2
   
2. 
   
3. .数据类型 坐标
   
4.     .成员 X, 整数型
   
5.     .成员 Y, 整数型
   

复制代码

第二段 是个子程序

1. .版本 2
   
2. 
   
3. .子程序 取鼠标坐标
   
4. .参数 鼠标坐标, 坐标, 参考
   
5. 
   
6. 鼠标坐标.X ＝ 取鼠标水平位置 ()
   
7. 鼠标坐标.Y ＝ 取鼠标垂直位置 ()
   

复制代码