#import "ts.tssoft" Ts
空间 天使插件试用
整型 绑定句柄,窗口句柄
功能 逻辑型 开始_点击()
绑定句柄=线程.开启("天使插件试用.绑定窗口","")
返回 真
功能结束
功能 逻辑型 退出_点击()
辅助.退出()
返回 真
功能结束
功能 逻辑型 绑定窗口()
整型 父窗口句柄=窗口.找到窗口("无标题 - 记事本")
字符型 返回值=系统.枚举(转换.整型转字符型(父窗口句柄),3)
字符型[] 返回组=字符型[1] //需要先初始化一次
逻辑型 是否成功=字符串.分割(返回值,"|",返回组)
窗口句柄=转换.字符型转整型(返回组[0])
整型 返回值1=Ts.BindWindow(窗口句柄,"dx","dx","dx",1)
辅助.等待(1000)
如果(返回值1==1)
辅助.消息框("绑定成功")
否则
辅助.消息框("绑定失败")
如果结束
辅助.等待(1000)
Ts.SendString(窗口句柄,"我是来测试的")
help.sleep(2000)
int ret=Ts.UnBindWindow()
返回 真
功能结束
空间结束 |