2014-06-30 44 views
0

我有以下代碼:吐溫OCR功能返回空字節

ddlResultFormat.Items.Add("Text") 

    dynamicDotNetTwain1.LoadImage("C:\Users\elj\Desktop\3b072e9b-76b4-4776-bd3c-5984074d8ecd.png") 
    Dim r = dynamicDotNetTwain1.GetImage(dynamicDotNetTwain1.CurrentImageIndexInBuffer).Width.ToString() 
    Dim l = dynamicDotNetTwain1.GetImage(dynamicDotNetTwain1.CurrentImageIndexInBuffer).Height.ToString() 
    Dim languageFolder As String 
    languageFolder = "C:\Program Files (x86)\Dynamsoft\Dynamic .NET TWAIN 5.2 Trial\Samples\Bin\" 
    Dim languages As New Dictionary(Of String, String) 
    languages.Add("English", "eng") 
    Me.dynamicDotNetTwain1.OCRTessDataPath = languageFolder 
    Me.dynamicDotNetTwain1.OCRLanguage = "English" 

    Dim ocrResultFormat As Dynamsoft.DotNet.TWAIN.OCR.ResultFormat 
    ocrResultFormat = CType(System.Enum.Parse(GetType(Dynamsoft.DotNet.TWAIN.OCR.ResultFormat), Val("&H" & 0)), Dynamsoft.DotNet.TWAIN.OCR.ResultFormat) 
    Me.dynamicDotNetTwain1.OCRResultFormat = ResultFormat.Text 

    Dim strDllPath As String 
    strDllPath = "C:\Program Files (x86)\Dynamsoft\Dynamic .NET TWAIN 5.2 Trial\Redistributable\OCRResources\" 
    dynamicDotNetTwain1.OCRDllPath = strDllPath 

    If (Me.dynamicDotNetTwain1.CurrentImageIndexInBuffer < 0) Then 
     Dim jajajja = "Please load an image before doing OCR!" 
    End If 

    Dim sbytes As Byte() 
    sbytes = Me.dynamicDotNetTwain1.OCR(Me.dynamicDotNetTwain1.CurrentSelectedImageIndicesInBuffer) 

我正在面臨的問題是,sbytes字節數組被始終設置爲空雖然在緩衝器中的指數之是正確的和路徑和DLL都很好的實現,但轉換爲字節數組並沒有成功我沒有得到任何異常,但字節的長度爲0

任何想法我該如何解決這個問題?

回答

0

請更新以下代碼行並重試。

Me.dynamicDotNetTwain1.OCRLanguage = "eng" 'not English