Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
OCR from VFP
Message
De
17/10/2007 09:06:52
 
 
À
17/10/2007 08:16:13
Information générale
Forum:
Visual FoxPro
Catégorie:
COM/DCOM et OLE Automation
Titre:
Versions des environnements
Visual FoxPro:
VFP 9 SP1
Divers
Thread ID:
01261241
Message ID:
01261458
Vues:
19
>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
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform