TC官方合作论坛

 找回密码
 立即注册
楼主: nfapp

[原创作品] 随便做的机器人

  [复制链接]
发表于 2016-12-26 17:04:41 | 显示全部楼层
学习了
回复

使用道具 举报

发表于 2016-12-26 19:21:56 | 显示全部楼层
感谢分享
回复

使用道具 举报

发表于 2016-12-26 19:59:14 | 显示全部楼层
Dimenv Hwnd1, Hwnd2, Hwnd3
//声明变量Hwnd1、Hwnd2、Hwnd3可在线程中调用
For 3
//循环3次
RunApp "notepad"
//打开记事本
Next
Delay 1000
//适当的延迟一下下
HwndEx = Plugin.Window.Search("无标题 - 记事本")
//查找所有标题为“无标题 - 记事本”的窗口句柄返回给变量HwndEx,格式“句柄|句柄|句柄|”
Hwnd = Split(HwndEx, "|")
//肢解
Hwnd1 = Plugin.Window.FindEx(Hwnd(0), 0, "Edit", 0)
//查找第一个窗口“Hwnd(0)”中的输入框(子句柄)句柄返回给变量Hwnd1
Hwnd2 = Plugin.Window.FindEx(Hwnd(1), 0, "Edit", 0)
//查找第二个窗口“Hwnd(1)”中的输入框(子句柄)句柄返回给变量Hwnd2
Hwnd3 = Plugin.Window.FindEx(Hwnd(2), 0, "Edit", 0)
//查找第三个窗口“Hwnd(2)”中的输入框(子句柄)句柄返回给变量Hwnd3
BeginThread A : BeginThread B : BeginThread C
//启动线程A、B、C,启动需要一定的时间。
Sub A()
Rem A
Call Plugin.Bkgnd.SendString(Hwnd1, "这是第1个!")
//线程A每秒向Hwnd1中发送一次文本
Delay 1000
Goto A
End Sub
Sub B()
Rem B
Call Plugin.Bkgnd.SendString(Hwnd2, "这是第2个!")
//线程B每秒向Hwnd2中发送一次文本
Delay 1000
Goto B
End Sub
Sub C()
Rem C
Call Plugin.Bkgnd.SendString(Hwnd3, "这是第3个!")
//线程C每秒向Hwnd3中发送一次文本
Delay 1000
Goto C
End Sub
回复 支持 反对

使用道具 举报

发表于 2016-12-26 23:40:09 | 显示全部楼层
学习了
回复

使用道具 举报

发表于 2016-12-27 18:45:25 | 显示全部楼层
111111111111
回复 支持 反对

使用道具 举报

发表于 2016-12-28 17:49:58 | 显示全部楼层
什么东西看看
回复 支持 反对

使用道具 举报

发表于 2016-12-29 08:03:53 | 显示全部楼层
谢谢分享
回复

使用道具 举报

发表于 2016-12-29 08:37:40 | 显示全部楼层
kkkkkkkkkkkkkkkkkkkkkkkkkkkk
回复 支持 反对

使用道具 举报

发表于 2016-12-29 10:51:23 | 显示全部楼层
回复

使用道具 举报

发表于 2016-12-29 13:02:13 | 显示全部楼层
hhhhhhhhhhh
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

关闭

推荐上一条 /2 下一条

关闭

小黑屋|TC官方合作论坛 (苏ICP备18045623号)

GMT+8, 2024-4-29 19:38 , Processed in 0.036042 second(s), 19 queries .

Powered by 海安简单软件服务部

© 2008-2019 版权所有 保留所有权利

快速回复 返回顶部 返回列表