|
马上加入TC
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
变量 大漠对象=插件("dm.dmsoft"),卡键句柄=数组()
功能 卡键()
变量 hwnd,KJCS=数组()
hwnd=大漠对象.GetForegroundWindow()
大漠对象.BindWindow(hwnd,"dx.graphic.2d","windows","dx",0)
等待(1000,false)
大漠对象.KeyPressChar("space")
遍历(变量 i = 1; i <= 6; i++)
KJCS[0]=hwnd
KJCS[1]=下拉框获取文本("卡键下拉框"&i)
KJCS[2]=下拉框获取文本("卡键延时框"&i)
卡键句柄[hwnd]=线程开启("CycleKeyPress",KJCS)
结束
结束
功能 CycleKeyPress(KJCS)
变量 hwnd=KJCS[0],YKDJ=KJCS[1],KJYS=KJCS[2]
循环(真)
大漠对象.KeyPressChar(YKDJ)
等待(KJYS,假)
结束
结束
这样,为什么按空格键能生效,之后启动的按键线程不会生效呢?
|
|