TScan32 de Rafa Carmona

[AngelSalom]

Hola gente!
Estoy implementando la clase TScan32 de Rafa y va de perlas, tan solo una pregunta.
¿Es posible o existe algun modo de indicarle al scanner que me capture una zona determinada del folio?
He visto que esta la funcion Tscan32:RegionSet (nTop,nLeft,nRight,nBottom) pero parece ser que no hace ningún efecto.
Aqui va mi código

-------------------------------------------------------------------------------------
Function RunScan (cFileBmp)
Local oScan
oScan := TScan32():New( cFileBmp )

If oScan:State()<4
oScan:OpenDefault()
Endif

oScan:SetRes (100)
oScan:SetHide (.T.)
oScan:PixelType (TWPT_GRAY) // Gris
oScan:DigitoFile()
oScan:End()
Return (nil)

Un saludo.

[Alfredo Arteaga]

Deseo hacer algunas pruebas con esta clase pero no la encuentro, podrás indicarme de que lugar obtenerla o enviarla a mi correo?

servicios@despachoarteaga.com.mx

Gracias de antemano.

[Silvio]

can you send me also ( silvio_falconi@tin.it)

p.s. there some possibility to execute OCR function ?

Best Regards

[thefull]

Angel, en tu codigo no defines ninguna area:

oScan:RegionSet( nLeft,nTop, nRigth, nBottom ), establece el area a escanear.

Puedes preguntar por el area oScan:RegionGet( @L,@T,@R,@B ), y comparar
los valores ANTES y depues del RegionSet.

A mi me funciona, raro es que no te funcione


Con estos metodos que acontinuacion veremos , podemos seleccionar
una porcion de la region a adquirir.

RegionSet( nLeft,nTop, nRigth, nBottom )
Selecciona una region para adquirir.

METHOD RegionReset()
Restaura a la region que habia por defecto, toda la superficie.

RegionGet( L,T,R,B )
Devuelve en las variables la porciones de la region actualmente definidas.
El uso es muy simple:

Local L,T,R,B // Left,Top,Rigth y Bottom, logicamente
oScan := oScan:New()
oScan:RegionGet(@L,@T,@R,@B), obteniendo el resultado en las misma variables
pasadas por referencia.

RegionGetDefault( L,T,R,B )
Devuelve los valores de la region por defecto. El mismo ejemplo del method
RegionGet es aplicable a este.

[AngelSalom]

Gracias, Rafa. Lo pruebo y te cuento.
Aprovecho desde aqui para agradecerte las fabulosas contribuciones que haces con clases como esta.

Un saludo.

[Silvio]

thank for the tscan class
I Hope if Rafa Carmona let me said how we can use Tscan32 to OCR func
I hope the guru of fivewin and xharbour help us

Regards
silvio

[thefull]

thank for the tscan class
I Hope if Rafa Carmona let me said how we can use Tscan32 to OCR func
I hope the guru of fivewin and xharbour help us

Sorry , i speak spanish, i not find letter in english, please use you traslate.

La tecnologia de OCR, o reconocimiento de caracteres, si bien implica el usar
un dispositivo para capturar o scanear un documento, NO implica que la
clase TScan32 sea capaz de 'reconocer' lo que a escaneado, por ejemplo,
es posible usar, y de hecho asi tengo en el trabajo, una webcam, que
hace el trabajo de capturar el documento y realizar un OCR.

Es decir, en usar un scanner para obtener una imagen en un fichero, no
tiene nada que ver con el OCR.

Si tu preguntas es si he realizado ALGO sobre OCR, directamente no, pero
si he realizado y usado conexiones a DLL que realizan esta tipo de trabajo.

Ahora bien, la licencia de una vale 6000 Euros, nada recomendable, y
varias estan pos los 3000€, y eso solamente para reconocimiento de DNI y pasaportes.

Seria interesante averiaguar o realizar algun tipo de libreria que fuese
capaz de , segun unas plantillas, que es como funcionan realmente esto del OCR, devolvernos unos valores en texto.

Como , cuando, y donde existe esto , no tengo ni idea.

[Silvio]

thanks...
I understand lating language because I have an uncle in Venezuela..
For the Ocr I found any source for Delphi 6 ma nothing for c++ .
I think there is something in Internet and I continue thr search...

Regards

[RAMESHBABU]

Please send a copy of TScan to me also.

Regards

- Ramesh Babu P

[VeRCE]

Please!, can you make it public for all the people ?
----------------------------------------------------------
Por favor, pueden ponerla pública para todos ?

[karinha]

Hello FiveWinners!

Por Favor, Donde Encuentro TSCAN32??

[jose_murugosa]

Por favor envíenme la clase TScan32 a mí tambien y si es posible también un pequeño ejemplo, me sería de gran utilidad.

Quisiera saber si Rafa tiene un sitio donde encontrar sus clases para xHarbour.

Gracias desde ya.

Una cosa más si me envían un exe o zip o rar a mi casilla cambienle la extensión a .EEE .ZZZ o .RRR respectivamente ya que de otro modo estos archivos no me los permite recibir el servidor de Gmail.

MI e-mail es jmurugosa@gmail.com o también jmurugosa@yahoo.com

[RodolfoRBG]

Me apunto también para recibir la clase para escanear. Mi correo:

rodolfoerbg@gmail.com

'chas gracias por anticipado.

[Ruben Fernandez]

Amigos:

Las contribuciones de Rafa Carmona, TheFull están aquí en el foro
sigan este link.

http://fivetechsoft.com/forums/viewtopic.php?t=2501

(Utilidades->TheFull ...)
Saludos

Ruben Fernandez