TScan32 de Rafa Carmona

AngelSalom · Post by **AngelSalom** » Wed Oct 26, 2005 6:52 am

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 _
_ := TScan32():New( cFileBmp )

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

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

Un saludo.

Alfredo Arteaga · Post by **Alfredo Arteaga** » Thu Oct 27, 2005 1:19 am

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 · Post by **Silvio** » Thu Oct 27, 2005 7:58 pm

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

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

Best Regards

thefull · Post by **thefull** » Fri Oct 28, 2005 8:23 am

Angel, en tu codigo no defines ninguna area:

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

Puedes preguntar por el area _: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

_ := _:New()
_: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 · Post by **AngelSalom** » Fri Oct 28, 2005 8:38 am

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

Un saludo.

Silvio · Post by **Silvio** » Fri Oct 28, 2005 10:23 am

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 · Post by **thefull** » Fri Oct 28, 2005 12:13 pm

Silvio wrote: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 _ 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 · Post by **Silvio** » Fri Oct 28, 2005 5:10 pm

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 · Post by **RAMESHBABU** » Thu Mar 23, 2006 1:54 am

Please send a copy of TScan to me also.

Regards

- Ramesh Babu P

VeRCE · Post by **VeRCE** » Thu Mar 23, 2006 3:12 pm

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

Post by **karinha** » Fri Mar 24, 2006 11:31 am

Hello FiveWinners!

Por Favor, Donde Encuentro TSCAN32??

jose_murugosa · Post by **jose_murugosa** » Thu Mar 30, 2006 4:55 pm

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 · Post by **RodolfoRBG** » Fri Nov 24, 2006 4:26 pm

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

rodolfoerbg@gmail.com

'chas gracias por anticipado.

Ruben Fernandez · Post by **Ruben Fernandez** » Fri Nov 24, 2006 4:42 pm

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

FiveTech Software tech support forums

TScan32 de Rafa Carmona

TScan32 de Rafa Carmona

Re:

Rafa Carmona TScan32