Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
OCR from VFP
Message
From
17/10/2007 09:06:52
 
 
To
17/10/2007 08:16:13
General information
Forum:
Visual FoxPro
Category:
COM/DCOM and OLE Automation
Title:
Environment versions
Visual FoxPro:
VFP 9 SP1
Miscellaneous
Thread ID:
01261241
Message ID:
01261458
Views:
18
>Hi, I'm running MS Office 2007 but the CREATEOBJECT() line says object not found. Must I install it from CD perhaps?

I don't think Document Imaging installs automatically as part of the MS office installation. I'd go back to the CD and make sure you have it installed.

>
>>You need at least Microsoft Office 2003. Document imaging had no available object model prior to that.
>>
>>>Peter, pmfji, but where do you get the MS Document Imaging controls? i.e.'MODI.Document'
>>>
>>>
>>>>THANKS ALOT!!
>>>>
>>>>Peter
>>>>>Here is an example using Microsoft Document Imaging
>>>>>
>>>>>
Local miDoc,miLayout,lcStr
>>>>>lcStr=''
>>>>>CREATE CURSOR mydocument (mydococr 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 mydocument (mydococr) VALUES (strLayoutinfo)
>>>>>MODIFY MEMO mydocument.mydococr
>>>>>
>>>>>
>>>>>
>>>>>
>>>>>>VFP SP2
>>>>>>
>>>>>>
>>>>>>I need to ocr EXISTING .TIF FILES.
>>>>>>Has anyone done this? Is there some free stuff which can be called from VFP?
>>>>>>
>>>>>>Peter
Previous
Reply
Map
View

Click here to load this message in the networking platform