如何让易语言使鼠标左键一直点击,但是又能够移动鼠标的,急求,赏分的!~

如题所述

 

 

 

 

 

 

.版本 2

.支持库 eAPI

.支持库 shellEx

 

.程序集 窗口程序集1

.程序集变量 X, 整数型

.程序集变量 Y, 整数型

.程序集变量 标识1, 整数型

.程序集变量 标识2, 整数型

 

.子程序 _按钮1_被单击

时钟2.时钟周期 = 到整数 (编辑框1.内容)

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

模拟鼠标点击 (X, Y, )

.子程序 _按钮2_被单击

时钟1.时钟周期 = 0

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

标识1 = 注册热键 (_启动窗口.取窗口句柄 (), 标签1.取窗口句柄 (), 0, #F1键)标识2 = 注册热键 (_启动窗口.取窗口句柄 (), 标签1.取窗口句柄 (), 0, #F2键)

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

.参数 参数一, 整数型

.参数 参数二, 整数型

 

.判断开始 (参数一 = 标识1)

    时钟1.时钟周期 = 到整数 (编辑框1.内容)

.判断 (参数一 = 标识2)

    时钟1.时钟周期 = 0

.默认

 

.判断结束

.子程序 __启动窗口_将被销毁

撤销热键 (取窗口句柄 (), 标识1)撤销热键 (取窗口句柄 (), 标识2)

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

X = 取鼠标水平位置 ()

Y = 取鼠标垂直位置 ()

编辑框2.内容 = 到文本 (X)

编辑框3.内容 = 到文本 (Y)

 

 

 

温馨提示:答案为网友推荐,仅供参考
第1个回答  2013-02-13
是我理解错了吗,一个时钟组件,就搞定的事,没人回答
.版本 2
.支持库 eAPI
.程序集 窗口程序集1
.子程序 __启动窗口_创建完毕
时钟1.时钟周期 = 200

.子程序 _时钟1_周期事件
模拟鼠标点击 (取鼠标水平位置 (), 取鼠标垂直位置 (), #接口常量.左键单击)
第2个回答  2013-02-06
.子程序 _启动窗口_创建完毕
.模拟鼠标点击()
第3个回答  2013-02-05
模拟鼠标点击()
相似回答