Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
PDF object to run OCR
Message
General information
Forum:
Visual FoxPro
Category:
ActiveX controls in VFP
Miscellaneous
Thread ID:
01675342
Message ID:
01675378
Views:
64
>I'm looking for a way to OCR existing documents in a VFP system before exporting to a document manager. The files are stored in a windows folder, so could be handled in a variety of ways. I already use iTextSharp to fill pdf forms and have Debenu Quick PDF, but neither of those tools seem to do OCR. The Document Management company wants to charge $2500 up front and $500 annually for a watch folder setup. I'm looking for a program with no continuing fee that could be fired programmatically.
>
>As always, thanks in advance!
Local miDoc,miLayout,lcStr
lcStr=''
CREATE CURSOR mondocument (mondococr m)
miDoc = Createobject('MODI.Document')
miDoc.Create( "C:\untitled.tif")
miDoc.Images(0).OCR
miLayout = miDoc.Images(0).Layout
strLayoutInfo ="Language: " + Transform(miLayout.Language )+Chr(13)+Chr(10)
strLayoutInfo=strLayoutInfo+"Number of characters: " + Transform(miLayout.NumChars)+Chr(13)+Chr(10)
strLayoutInfo=strLayoutInfo+"Number of fonts: "+ Transform(miLayout.NumFonts )+Chr(13)+Chr(10)
strLayoutInfo=strLayoutInfo+"Number of words: " + Transform(miLayout.NumWords)+Chr(13)+Chr(10)+Chr(13)+Chr(10)
strLayoutinfo = strLayoutinfo+miLayout.text
INSERT INTO mondocument (mondococr) VALUES (strLayoutinfo)
MODIFY MEMO mondocument.mondococr
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform