Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
OCR from VFP
Message
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:
01262229
Vues:
17
Hi Mike

Thanks! As always you are right on the money!
It works great - on XP
I does not work for me on my brand new Dell Precision M90 with Vista Ultimate and 4GB of memory!!

it creates the object alright but when assigning the image it give a ole error. It seems to think the tif file is corrupted
The same files work fine on the inspiron 1705 with XP -sp2

Any ideas?

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
Peter Cortiel
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform