马上加入TC
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
#include"varlist.t"
namespace 多窗体同步
dm=com("dm.dmsoft")
hwnd,keycode
//********************************//
//***********线程任务**************//
//********************************//
function beginsomething()
//多窗体同步.register() //注册绑定
help.messagebox(convert.inttostr(keycode))
while(true)
k=keyboard.waitkey()
help.sleep(100)
if(k!=118)
// dm.KeyPress(k)
超级键盘.按键(k,10)
help.sleep(20)
endif
endwhile
return true
endfunction
//********************************//
//***********开始按钮**************//
//********************************//
function start_click()
while (true)
keycode=keyboard.waitkey()
help.sleep(500)
if(keycode==118)
//hwnd=dm.GetMousePointWindow()
window.getmousemovewndhand()
h=thread.beginthread("多窗体同步.beginsomething")
varlist.addstr(h)
else
多窗体同步.beginsomething()
endif
endwhile
return true
endfunction
//********************************//
//***********退出按钮**************//
//********************************//
function exit_click()
//多窗体同步.free()
多窗体同步.closeThead()
help.exit()
return true
endfunction
//********************************//
//********注册绑定*********//
//********************************//
function register()
dm_ret = dm.BindWindow(hwnd,"dx","dx","dx",0)
help.sleep(20)
if (dm_ret==0)
help.messagebox("大漠绑定失败")
help.exit()
endif
return true
endfunction
//********************************//
//********大漠解除绑定*********//
//********************************//
function free()
// dm.UnBindWindow()
help.sleep(500)
return true
endfunction
//********************************//
//********窗体销毁方法*********//
//********************************//
function destroy()
多窗体同步.exit_click()
return true
endfunction
//********************************//
//********关闭多线程*********//
//********************************//
function closeThead()
str=varlist.returnstr()
wz
while(true)
wz=str.findstr(str,"|")
thread.closethread(str.strsub(str,0,wz))
help.sleep(200)
if (wz==-1)
break
else
str=str.strcut(str,wz+1,true)
endif
endwhile
return true
endfunction
endnamespace
|