【CBM666 请教OCR图像文字识别】
office 汉王 紫光 文粹 创华....我试过了好几个 但不理想 可能我下载的版本不对
请教那位能帮我提供一个最优秀的OCR识别工具 当然能有VB可链接的类库最好了 谢谢.
[解决办法]
http://zhidao.baidu.com/question/1678436.html
[解决办法]
office自带的我试了下功能确实不行
[解决办法]
这是个老问题了,看来还是没有合适的,帮顶吧
[解决办法]
要看图片的大小、字体大小、字体类型、以及图片清晰程度(注意符合软件说明中说明图片分辨率等),我用尚书6号大体可以达到85以上的识别能力,所谓95%一般都是吹牛。
[解决办法]
Asprise OCR下载了没有?不知道效果有没有你想象的好,有破解的
[解决办法]
'放到模块中Public Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal Hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As LongPublic Const WM_GETTEXTLENGTH = &HEPublic Const WM_GETTEXT = &HD'┏〓〓〓〓〓〓〓〓〓 GetText,start 〓〓〓〓〓〓〓〓〓┓'[简介]:'获取句柄对应文本,支持任意长度Function GetText(hwnd As Long) As String '帮你写函数,帮你写代码,帮你写模块,帮你设计软件 '--需要什么函数或功能,可以联系我。 Dim Str As String Dim Length As Long Length = SendMessage(hwnd, WM_GETTEXTLENGTH, 0, 0) If Length = 0 Then Exit Function Str = Space(Length) Length = Length + 1 SendMessage hwnd, WM_GETTEXT, Length, ByVal Str GetText = StrEnd Function'┗〓〓〓〓〓〓〓〓〓 GetText,end 〓〓〓〓〓〓〓〓〓┛