Hola. Tienes razon, no di detalles. Bueno pues estoy utilizando dos controles activeX de imaging Kodak, el ImgOCR y el ImgScan. Mi scanner es un acer "scan to web 4300 U". Utiliza el driver MiraScan, pero si quiero hacer un reconocimiento OCR como es mi caso tengo que instalar el scann button. El codigo siguiente escanea una imagen:
procedure TForm1.Button1Click(Sender: TObject);
begin
if ImgScan1.ScannerAvailable then
try
ImgScan1.OpenScanner;
ImgScan1.ScanTo := 1;
ImgScan1.Image:='c:\Imagen.jpeg';
ImgScan1.StartScan;
Application.ProcessMessages;
finally
ImgScan1.CloseScanner ;
end;
end;
Para visualizar la imagen lo hago en un TImage. eso si funciona, pero al querer canvertirlo a texto me marca el error que ya mencione. El codigo que tengo es:
procedure TForm1.Button2Click(Sender: TObject);
begin
Imgocr1.ShowOcrOptions;
Imgocr1.Quality := wiAutoDetectQ;
Imgocr1.Image:= 'c:\Imagen.jpeg';
Imgocr1.ProcessingMode := 1; //OCR
Imgocr1.RetainPictures := false;
Imgocr1.RetainPageLayout := true
Imgocr1.OutputType := wiWordforWindows;
Imgocr1.OutputFile := 'c:\Articulo.rtf';
Imgocr1.LaunchApplication := true;
Imgocr1.StartOcr;
end;
Que podra ser porque ya intente de todo. Se me ha ocurrido que puedo lanzar la aplicacion scannbutton, pues en esa el reconocimiento de OCR si funciona, solo que no se si se pueda. ¿alguna idea?
Gracias por tu tiempo Alfredo.