鼠标消息怎么没反应……附图求解

okfacai

1. .版本 2
   
2. .支持库 shellEx
   
3. 
   
4. .程序集 窗口程序集1
   
5. .程序集变量 zb1, 精易_坐标
   
6. 
   
7. .子程序 __启动窗口_创建完毕
   
8. .局部变量 wjh, 整数型
   
9. 
   
10. 时钟1.禁止 ＝ 真
    
11. 注册热键 (_启动窗口.取窗口句柄 (), 标签1.取窗口句柄 (), 1, #空格键)
    
12. 
    
13. 
    
14. .子程序 _标签1_反馈事件, 整数型
    
15. .参数 参数一, 整数型
    
16. .参数 参数二, 整数型
    
17. 
    
18. zb1 ＝ 鼠标_取窗口坐标 (_启动窗口.取窗口句柄 ())
    
19. _启动窗口.标题 ＝ 到文本 (zb1.横) ＋ “||” ＋ 到文本 (zb1.纵)
    
20. 时钟1.激活 ()
    
21. 时钟1.时钟周期 ＝ 2000
    
22. 鸣叫 ()
    
23. 
    
24. .子程序 _时钟1_周期事件
    
25. 
    
26. 
    
27. 时钟1.时钟周期 ＝ 2000
    
28. 鼠标_消息 (_启动窗口.取窗口句柄 (), zb1.横, zb1.纵, 1, 1)
    
29. 
    

复制代码

鼠标消息怎么没反应……附图求解  如下图，求解

迷离

整体代码我是改写成这样子的：

.版本 2
.支持库 shellEx

.子程序 __启动窗口_创建完毕

注册热键 (_启动窗口.取窗口句柄 (), 标签1.取窗口句柄 (), 0, #空格键)

.子程序 _标签1_反馈事件, 整数型
.参数 参数一, 整数型
.参数 参数二, 整数型

_启动窗口.标题 ＝ 到文本 (取鼠标水平位置 ()) ＋ “||” ＋ 到文本 (取鼠标垂直位置 ())
时钟1.时钟周期 ＝ 10

.子程序 _时钟1_周期事件

时钟1.时钟周期 ＝ 10
_启动窗口.标题 ＝ 到文本 (取鼠标水平位置 ()) ＋ “||” ＋ 到文本 (取鼠标垂直位置 ())

w589321

时钟1.禁止 ＝ 真
时钟1.激活 ()

这些是啥？

okfacai

用了个时钟，，，

迷离

有点乱代码，发文件上来

okfacai

沉默夏夜 发表于 2011-10-14 22:35
时钟1.禁止 ＝ 真
时钟1.激活 ()

用了个时钟，，，

okfacai

comingrain 发表于 2011-10-14 22:43
有点乱代码，发文件上来

好。稍等。。。

okfacai

comingrain 发表于 2011-10-14 22:43
有点乱代码，发文件上来

老大，代码我发到贴上去了

迷离

时钟周期时间太长，一般设置为10为适合！

迷离

.版本 2

.局部变量 横, 整数型
.局部变量 纵, 整数型

横 ＝ 取鼠标水平位置 ()
纵 ＝ 取鼠标垂直位置 ()