vfp6.0如何编程读图片上的数字

仿照车牌自动识别的方法，只要原理弄明白了，编程不是问题。

1    0
2    2
3    3
4    4
5    5
6    1
7    2
8    2
9    2
10    2
11    0
我大概就是这样的问题，图上有这两列，我想分别都取出来

能不能加个QQ聊一下 568760029

Clear
Local miDoc, miLayout, lcStr
lcStr = ''
miDoc = Createobject('MODI.Document')
miDoc.Create( "Aa1.png")
miDoc.Images(0).OCR(9, .T., .T.)  && 9 = 英文，2052 = 中文GBK，1028 = 繁体Big-5
miLayout = miDoc.Images(0).Layout
lcStr = Strtran(miLayout.Text, Chr(13) + Chr(10), '')

? Len(lcStr)
? lcStr
*!*    =StrToFile(lcStr, "AAA.txt")
*!*    Modify File aaa.txt

miDoc.Close() && 关闭

简单的、无背景的图像还可以，变形的字体不好说，，，

感谢回复，不过运行有问题 miDoc = Createobject('MODI.Document') 提示没有'MODI.Document'没有类定义，不知道什么原因，以告之一下吗，谢谢

安装了office Document imaging(modi) 已没有这个错误提示了，不过结果仍不对，不知道方便留下QQ，以便向高手更好的学习一下

结果仍不对的原因 6 楼已经讲了，你上传一张有数字的样张图上来，，，
不好意思，如果不涉及密码或账号的隐私问题，希望大家不要私聊，毕竟这里是大家交流的地方，谢谢理解，，，

好的，谢谢，不过传上图，点添加附件和图片没有反应，其实图很简就是有两列，每列都一些数字，我想读出来，出来是 9，cftaJI—s

[此贴子已经被作者于2019-1-23 15:53编辑过]