|
4精币
刚接触易语言没多久
自己写了一个后台模拟按键程序,程序运行后会自动模拟键盘按键
现在问题是 如何立刻中断键盘按键呢? 而不是通过 时钟1.时钟周期 = 0 等到他把按键全部按完一遍后在停止
另外就是程序开始运行后,也就是开始模拟按键时候,程序其他键盘皆不可用,一定要等他停止模拟按键,要怎么修改下呢
程序源码如下:
.版本 2
.支持库 dm
.子程序 _按钮1_被单击
延时 (2000)
hwnd = 大漠插件.GetMousePointWindow ()
大漠插件.BindWindow (hwnd, “dx”, “windows3”, “windows”, 0)
时钟1.时钟周期 = 1000
.子程序 __启动窗口_创建完毕
监视热键 (&_按钮2_被单击, 84, 2, , )
.子程序 _按钮2_被单击
.子程序 _按钮3_被单击
时钟1.时钟周期 = 0
.子程序 _时钟1_周期事件
大漠插件.KeyDown (54)
延时 (500)
大漠插件.KeyDown (53)
延时 (1600)
大漠插件.KeyDown (49)
延时 (3000)
大漠插件.KeyDown (50)
延时 (100)
大漠插件.KeyDown (50)
延时 (100)
大漠插件.KeyDown (50)
延时 (100)
大漠插件.KeyDown (51)
延时 (2000)
大漠插件.KeyDown (52)
延时 (400)
大漠插件.KeyDown (52)
延时 (600)
大漠插件.KeyDown (52)
延时 (400)
大漠插件.KeyDown (56)
大漠插件.KeyDown (56)
延时 (4400)
大漠插件.KeyDown (32)
大漠插件.KeyDown (32)
延时 (1000)
大漠插件.KeyDown (55)
延时 (1000)
延时 (8000)
大漠插件.KeyDown (57)
延时 (6000)
麻烦大家帮帮忙 提下意见也建议~~~谢谢
|
|