Call DM注册
s = dm.Ocr(0,0,2000,2000,"9f2e3f-000000",1.0) //范围根据需要设置,字体颜色也你自己设置,你图片太模糊了,我没办法取色
MessageBox s
Sub DM注册() //这里是注册DM的子程序
PutAttachment ".\plugin","*.dll"
PutAttachment ".\plugin\DM", "*.bmp"
PutAttachment ".\plugin\DM","*.txt"
PutAttachment ".\plugin\DM","dm.dll"
//↑PutAttachment释放附件
Call Plugin.RegDll.Reg(".\plugin\DM\dm.dll") //注册插件
set dm = createobject("dm.dmsoft") //创建大漠 对象
TracePrint dm.Ver() //版本信息
dm.SetPath ".\plugin\DM" //设置全局路径
base_path = dm.GetBasePath() //获取dm.dll路径
dm_ret = dm.SetDict(0,"dm_soft.txt") //设置0号字库,字库名字
End Sub
注:前提,你得会自己做大漠的字库。字库做好后把大漠的两个dll和字库都添加到附件里,设置好范围和字体的颜色就可以识别了