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)
Me.dynamicDotNetTwain1.OCRLanguage = "English"
Me.dynamicDotNetTwain1.OCRLanguage = "eng"
dynamicDotNetTwain1.CurrentImageIndexInBuffer
dynamicDotNetTwain1.CurrentSelectedImageIndicesInBuffer
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)