找回密码
 立即注册

QQ登录

只需一步,快速开始

查看: 4699|回复: 2

[已回复] 新手多线程找字问题

[复制链接]

2

主题

2

回帖

4

积分

学前班

鲜花
0
猫粮
8
发表于 2019-3-5 16:12:41 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?立即注册

×
请问为什么我用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

楼主热帖
  • 打卡等级:武林至尊

1087

主题

2143

回帖

4337

积分

院长

鲜花
9
猫粮
7517
QQ
发表于 2019-3-10 12:16:09 | 显示全部楼层
没看出问题

0

主题

5

回帖

5

积分

学前班

鲜花
0
猫粮
23
发表于 2019-5-10 21:03:00 | 显示全部楼层
每次制作完字库后,需要自行把制作的字库文件添加到脚本“附件”中
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|手机版|小黑屋|紫猫编程学园

GMT+8, 2024-12-23 04:32

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

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