- 积分
- 4
- 阅读权限
- 10
- 鲜花
- 0
- 猫粮
- 8
- 在线时间
- 5 小时
- 精华
- 0
- 注册时间
- 2019-3-2
- 性别
- 保密
- 最后登录
- 2023-1-16
学前班
- 鲜花
- 0
- 猫粮
- 8
|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有账号?立即注册
×
请问为什么我用CALL方式找字能找到 用多线程Thread.Start 就不行呢 源码有写错的地方吗 感谢
返回下面
当前脚本第9行:1
当前脚本第10行:1
CALL调用能返回找到的坐标
当前脚本第14行:雷电商店
当前脚本第18行:345
当前脚本第19行:311
当前脚本第20行:雷电商店
Dim intx,inty
Thread.Start (yyy)
Sub yyy()
SetRowsNumber(0)
//注意:每次制作完字库后,需要自行把制作的字库文件添加到脚本“附件”中
TracePrint SetDictEx(0, "Attachment:雷电商店.txt")
TracePrint UseDict(0)
//以上两句脚本只需要调用一次
Dim ocrchar
ocrchar=Ocr(327,305,421,337,"FEFEFE-555555",0.9)
Traceprint ocrchar
FindStr(327,305,421,337,"雷电商店","FEFEFE-555555",0.9,intX,intY)
If intX > -1 And intY > -1 Then
TracePrint intX
TracePrint intY
TracePrint "雷电商店"
End If
End Sub
|
|