Foxtable(狐表)用户栏目专家坐堂 → 【ocr识别】VB实现OCR文字识别,怎么进行转化为foxtable程序代码呢?


  共有8411人关注过本帖树形打印复制链接

主题:【ocr识别】VB实现OCR文字识别,怎么进行转化为foxtable程序代码呢?

帅哥哟,离线,有人找我吗?
jyh7081
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:962 积分:8505 威望:0 精华:0 注册:2012/10/3 13:25:00
  发帖心情 Post By:2017/11/1 22:37:00 [显示全部帖子]

在试用版可以运行,在开发版报错:

 


图片点击可在新窗口打开查看此主题相关图片如下:image 7.jpg
图片点击可在新窗口打开查看

 回到顶部
帅哥哟,离线,有人找我吗?
jyh7081
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:962 积分:8505 威望:0 精华:0 注册:2012/10/3 13:25:00
  发帖心情 Post By:2017/11/1 22:58:00 [显示全部帖子]

试用版识别出来了,没有出过错,而且都是在命令窗口运行的


 回到顶部
帅哥哟,离线,有人找我吗?
jyh7081
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:962 积分:8505 威望:0 精华:0 注册:2012/10/3 13:25:00
  发帖心情 Post By:2017/11/1 23:10:00 [显示全部帖子]

重装后按管理员进入也一样,重建一个新项目用命令窗口运行也不行,报同样的错

 回到顶部
帅哥哟,离线,有人找我吗?
jyh7081
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:962 积分:8505 威望:0 精华:0 注册:2012/10/3 13:25:00
  发帖心情 Post By:2017/11/1 23:24:00 [显示全部帖子]

谢谢甜老师!

第一次卸载没舍得清理引用的dll,全部清除后安装,没问题了。


 回到顶部
帅哥哟,离线,有人找我吗?
jyh7081
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:962 积分:8505 威望:0 精华:0 注册:2012/10/3 13:25:00
  发帖心情 Post By:2017/11/1 23:32:00 [显示全部帖子]

可能是引用的dll文件有冲突,把原来的dll文件拷回去就不行了,用管理者权限也不行。

 回到顶部
帅哥哟,离线,有人找我吗?
jyh7081
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:962 积分:8505 威望:0 精华:0 注册:2012/10/3 13:25:00
  发帖心情 Post By:2017/11/1 23:37:00 [显示全部帖子]

给这几个引用的文件有关:

 


图片点击可在新窗口打开查看此主题相关图片如下:image 1.jpg
图片点击可在新窗口打开查看

 回到顶部
帅哥哟,离线,有人找我吗?
jyh7081
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:962 积分:8505 威望:0 精华:0 注册:2012/10/3 13:25:00
  发帖心情 Post By:2017/11/1 23:56:00 [显示全部帖子]

给这个文件有关,去掉就行了:

TWRECE.DLL


 回到顶部
帅哥哟,离线,有人找我吗?
jyh7081
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:962 积分:8505 威望:0 精华:0 注册:2012/10/3 13:25:00
  发帖心情 Post By:2017/11/2 20:29:00 [显示全部帖子]

生成的文本怎样形成段落?现在是一个整段。

 


图片点击可在新窗口打开查看此主题相关图片如下:image 1.jpg
图片点击可在新窗口打开查看

 回到顶部
帅哥哟,离线,有人找我吗?
jyh7081
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:962 积分:8505 威望:0 精华:0 注册:2012/10/3 13:25:00
  发帖心情 Post By:2017/11/2 21:50:00 [显示全部帖子]

21楼图片只弹出最后一行,24楼图片是一次性弹出全部文字。都没有分次弹出。

 

经测试,当行距比例过大时,识别的文字范围会出错。

比如,21楼的三行文字,当图片的上下空白加大时,行距所占比例会变小,就会全部识别出所有行文字,识别的正确率也会相应变化。

当文字个数少于10个时,也不会识别。

[此贴子已经被作者于2017/11/2 22:54:18编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
jyh7081
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:962 积分:8505 威望:0 精华:0 注册:2012/10/3 13:25:00
  发帖心情 Post By:2018/4/3 9:23:00 [显示全部帖子]

甜老师好!
22楼的代码,如何写入记事本并打开?
谢谢!

Dim doc = CreateObject("MODI.Document")
doc.Create("d:\test.jpg")
doc.OCR(2052, True, True)
For i As Integer = 0 To doc.Images.count - 1
    Dim layout = doc.images(i).Layout 
    output.show(layout.text)  
Next i
doc.close
doc = Nothing


 回到顶部
总数 12 1 2 下一页