OCR Reconocimiento Optico de Caracteres .NET
Hola a todos, en este ejemplo vamos a hacer un OCR (Optical Character Recognition por sus siglas en ingles) en un form. para ello vamos utilizar el OCR de Office.
Lo primero que vamos ha hacer es crear un form con 1 boton , un picturebox y un richtextbox de tal forma que nos quede algo parecido a esto.
A continuación añadiremos la referencia a el componente COM de Microsoft Office Documento Imaging (MODI).
y En el Evento de Clic del boton Escribimos el siguiente codigo.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 |
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click Dim f As New OpenFileDialog 'Instanciamos el file dialog f.ShowDialog() 'Mostramos el filedialog Dim r = f.FileName 'recogemos el nombre del fichero Me.PictureBox1.Image = New Bitmap(r) 'Creamos el bitmap de la imagen y lo asignamos a el picturebox Dim md As New MODI.Document 'instanciamos el modi md.Create(r) ' y lo creamos haciendo referencia a la imagen Try md.OCR(MODI.MiLANGUAGES.miLANG_ENGLISH) ' le decimos el lenguage Dim image As MODI.Image = md.Images(0) 'intanciamos la imagen en MODI Dim layout As MODI.Layout = image.Layout 'Y AQUI EL TRADUCTOR Me.RichTextBox1.Text = layout.Text 'Pasamos la traduccion a el Richtexbox md.Close() ' cerramos Catch md.Close() 'si da error por cualquier motivo cerramos End Try End Sub |
Ya esta ahora solo queda probarlo Espero que os sirva y os guste. El codigo queda comentado.