<![CDATA[Fox4um - OCR]]> http://www.fox4um.com/topic/1397/ocr/ Mon, 26 Oct 2009 16:26:33 +0000 PunBB <![CDATA[Re: OCR]]> http://www.fox4um.com/post/8566/#p8566 Metin; eğer CodePlex ten GDI+ demosunı inceleyebilirsen; TIFF dosyasının belirli bir kısmını kesip alman yada başka bir formata çevirmen mümkün.

]]> Mon, 26 Oct 2009 16:26:33 +0000 http://www.fox4um.com/post/8566/#p8566 <![CDATA[OCR]]> http://www.fox4um.com/post/8557/#p8557 slm,
aşağıdaki kodla ocr çıktısı alabiliyorum. ancak bu bütün metni boşlukları yokederek veriyor. boşlukları yoketmeden veya metnin istediğimiz bir parçasını almanın bir yolu var mı?

Visual Fox Pro
1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

Lparameters xfile

Local miDoc,miLayout,lcStr

lcStr=''

CREATE CURSOR mondocument (mondococr m)

Public midoc

miDoc = Createobject('MODI.Document')

miDoc.Create( m.xfile)

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

tif dosyasının istediğimiz belli bir parçasını cut edip yeni bir dosyaya kaydedebilme imkanı varsa o da şimi görür.

]]> Mon, 26 Oct 2009 08:39:57 +0000 http://www.fox4um.com/post/8557/#p8557