использование OCR с vbscript в тесте завершено - PullRequest
0 голосов
/ 21 октября 2011

Я использую VBScript в тесте завершено. Мне нужно идентифицировать текст на изображении. Я могу сделать это с помощью OCR. OCR может идентифицировать текстовые шрифты, которые «выделены жирным шрифтом», но есть один текст, который обладает свойством «зачеркнутого», которое OCR не может идентифицировать, он дает некоторую бессмысленную ценность. Это способ идентификации текста по изображениям, которые вычеркнуты? Ниже приведен код, который я использовал и не работает:

 Set Rect = Aliases.npApp.wndNP6Class.Picture.GetRect(5,47,234,520)
 Set OCRObj = OCR.CreateObject(Rect)
 Set ocrOpt = OCRObj.CreateOptions
 Set Font = ocrOpt.Fonts.Add
 Set Font = ocrOpt.Fonts.Add
 Font.Name="Arial"
 Font.Styles.Add 2  ' Choosing bold font type
 Font.Styles.Add 4   ' Choosing strike out font type
 ocrOpt.ExactSearch=false
 ocrOpt.GrayScaleBinarization=true
 ocrOpt.SkipFragmentation=false
 ocrOpt.BinarizationThreshold =100   'Low threshold value to capture text from image

 vTempStr1 = OCRObj.GetText(ocrOpt)

Спасибо.

...