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.
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()