About tscanner and multipage scanner

About tscanner and multipage scanner

Postby toninhofwi » Mon Nov 10, 2008 4:47 pm

Hi,

How I can use tscanner with multi file scanner like hp
scanjet 8460 ?

I´m using EZTWAIN 2.70 from dosadi but I can get only one page at a
time, but HP8460 can digitalize 10 pages at a time.

Thanks for any information and best regards,

Toninho.
toninhofwi
 
Posts: 170
Joined: Tue Oct 18, 2005 10:01 am

Postby George » Tue Nov 11, 2008 3:23 am

Hi,
Maybe TwainControlX from http://www.ciansoft.com/ can do the job.
They have a fully functional trial version.

Regards,

George
George
 
Posts: 724
Joined: Tue Oct 18, 2005 6:49 pm

Postby Marco Turco » Tue Nov 11, 2008 11:30 am

Hi,
Dosadi supports the multipage acquiring without problem.

You only need to update the Dosadi dll and use the TW_AcquireMultiPageFile method of Rafa Carmona's class.

Obviusly you have to use a multipage format like PDF or TIFF.
Best Regards,

Marco Turco
SOFTWARE XP LLP
User avatar
Marco Turco
 
Posts: 858
Joined: Fri Oct 07, 2005 12:00 pm
Location: London

Postby toninhofwi » Fri Nov 14, 2008 10:32 am

Marco Turco wrote:Hi,
Dosadi supports the multipage acquiring without problem.

You only need to update the Dosadi dll and use the TW_AcquireMultiPageFile method of Rafa Carmona's class.

Obviusly you have to use a multipage format like PDF or TIFF.


Hi Marco, thanks.

My dosadi dll was too old. Now I update it.

Regards,

Toninho.
toninhofwi
 
Posts: 170
Joined: Tue Oct 18, 2005 10:01 am

Postby toninhofwi » Sat Nov 15, 2008 11:44 pm

George wrote:Hi,
Maybe TwainControlX from http://www.ciansoft.com/ can do the job.
They have a fully functional trial version.

Regards,

George


Hi George,

This weekend I have time and I tested TwainControlX. It is really nice, I'm thinking move from dosadi to it,

Thanks a lot and best regards,

Toninho.
toninhofwi
 
Posts: 170
Joined: Tue Oct 18, 2005 10:01 am

Postby Jonathan Hodder » Sun Nov 16, 2008 5:19 am

Hi

I may have a need for multi page scanning extending the customers current application.

Toninhofwi and George can I ask for the code you used please.

Thanks

Jonathan Hodder
Jonathan Hodder
 
Posts: 77
Joined: Sun Aug 26, 2007 11:53 pm

Postby George » Sun Nov 16, 2008 3:34 pm

Jonathan,
I am not using the Multi-pages scanning features, but the manual explain how to use it.
It seems that Harbour does not support the licensing mechanism of ActiveX controls therefore when ordering TwainControlX send an email to Technical Support (Ian Chester the developer) indicating that your are using Harbour language.
He will send you the TwainControlX which uses a password, set in code, instead of the normal licensing system. That way you don't need the .lic file, you just add a line of code for the password, compile your application, and it will work fine, allowing you install your application along with the registered OCX in your customer's computer.

Regards,

George
George
 
Posts: 724
Joined: Tue Oct 18, 2005 6:49 pm

Postby Jonathan Hodder » Sun Nov 16, 2008 9:06 pm

George

OK Thanks

Jonathan
Jonathan Hodder
 
Posts: 77
Joined: Sun Aug 26, 2007 11:53 pm

Re: About tscanner and multipage scanner

Postby Giovany Vecchi » Mon Nov 17, 2008 11:20 am

toninhofwi wrote:Hi,

How I can use tscanner with multi file scanner like hp
scanjet 8460 ?

I´m using EZTWAIN 2.70 from dosadi but I can get only one page at a
time, but HP8460 can digitalize 10 pages at a time.

Thanks for any information and best regards,

Toninho.

:lol:
Ja resolvi isto
tive que alterar a classe tscan32.
Baixe aqui: http://rapidshare.com/files/164602347/TSCAN.rar.html

Para testar

oScan := TScan32():New( "" )
IF oScan:State() < 4
MSGINFO("Não foi possivel estabelecer a conexão com o scanner. "+CRLF+;
"Verifique se o scanner esta ligado e plugado neste computador.",;
"Procedimento Abortado...")
oScan:End()
RETURN .F.
ENDIF

oScan:PixelType( 1 )
oScan:SetRes( 150 ) // Resolucion 150 by Default.
oScan:SetHide( .T. )
oScan:SetMultiTransfer(1) // escolha 1 para scanear varias paginas
oScan:EnableDuplex(1)
oScan:SetFileFormat(4) ///4
oScan:SetJpegQuality(80) /// 75 default

DO WHILE .T.
nSeqImg++
cImagem:=DIR_TEMP()+"_IMG_"+LIMPO(nSeqImg,.f.)+".JPG"
AADD(aFilesScan,cImagem)
nDib:=(oScan:AcquireToFile(cImagem))
IF nDib < 0
EXIT
ENDIF
syswait(.5)
oScan:FreeDib()
syswait(.3)
ENDDO

oScan:End()
User avatar
Giovany Vecchi
 
Posts: 207
Joined: Mon Jun 05, 2006 9:39 pm
Location: Brasil

Postby Jonathan Hodder » Tue Nov 18, 2008 4:10 am

Hi Giovany

Usando eztw32.dll puede ser el más fácil.

Gracias Giovany.

Lo intentaré.

Jonathan
Jonathan Hodder
 
Posts: 77
Joined: Sun Aug 26, 2007 11:53 pm


Return to FiveWin for Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 90 guests