[问题] 想把大漠找到字输出到excel中，这个之后怎么做，字库做好了

[复制链接]

shaobo6858980

电梯直达

楼主

发表于 2016-9-20 09:41:59 | 只看该作者回帖奖励

|倒序浏览 |阅读模式

马上加入TC

您需要登录才可以下载或查看，没有帐号？立即注册

功能执行()

变量 ret=注册插件("c:\\dm.dll",真)
变量路径=获取资源路径("rc:新字库.txt")
等待(100)
dm=com("dm.dmsoft")
dm.SetPath(获取资源路径("rc:"))
等待(100)
变量 intX,intY,a,s,dm_ret
ret= dm.FindStr(34,81,82,98,"白0"," ffffff-000000",0.9,intX,intY)//大漠找字
dm_ret = dm.FindStrFast(0,0,2000,2000,"白0","ffffff-000000",0.9,intX,intY)
如果(ret)
      消息框(dm_ret)
      a=0
否则
      消息框("插件注册成功1")
结束

结束