Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
OCR from VFP
Message
De
17/10/2007 08:16:13
 
 
À
17/10/2007 07:39:20
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:
01261445
Vues:
17
Hi, I'm running MS Office 2007 but the CREATEOBJECT() line says object not found. Must I install it from CD perhaps?

>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
In the End, we will remember not the words of our enemies, but the silence of our friends - Martin Luther King, Jr.
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform