Welcome to LEAD Support Forum Login | Register | Faq  

    LEAD Support Forum
  Resource to find answers and post technical questions about LEAD products.
Search    
   

ADF
Started by sgriffin@dataworksplus.com at 05-04-2005 15:50. Topic has 3 replies.

Print Search « Previous Thread Next Thread »
  05-04-2005, 15:50
sgriffin@dataworksplus.com is not online. Last active: 10/6/2005 1:30:12 AM sgriffin@dataworksplus.com

Not Ranked
Joined on 06-23-2004
Posts 1
ADF
Reply Quote

I am trying to tell if an adf has paper loaded in the tray using v14 with VB6.  I am using the following code to get the feeder status:

Set oTwainCap = New LEADTwainCapability
oTwainCap.CapInfo.ConType = L_TWON_ONEVALUE
oTwainCap.CapInfo.Capability = L_CAP_FEEDERLOADED
m_oRasterTwain.EnableMethodErrors = False
intRet = m_oRasterTwain.GetCapability2(oTwainCap, _
                                                                L_LTWAIN_CAPABILITY_GETCURRENT)

This code always returns a true value.  The feeder enabled property is set to true.  Any suggestions?

Thanks


   Report 
  05-25-2005, 15:44
Gabe-Forum@LEADTOOLS.com is not online. Last active: 12/30/2008 3:55:49 PM gabe-forum@LEADTOOLS.com



Top 25 Posts
Joined on 04-27-2005
Posts 236
Re: ADF
Reply Quote

The attached code, show how to get the FEEDERLOADED capability:

 

Option Explicit

 

Public WithEvents RasterTwain As LEADRasterTwain2 Dim TwainCap As LEADTwainCapability

 

Private Sub Command1_Click()

   Dim iRet As Integer

   Set TwainCap = New LEADTwainCapability

 

   TwainCap.CapInfo.ConType = L_TWON_DONTCARE16

   TwainCap.CapInfo.Capability = L_CAP_FEEDERLOADED

   iRet = RasterTwain.GetCapability2(TwainCap, L_LTWAIN_CAPABILITY_GETCURRENT)

   If (iRet <> 0) Then

      MsgBox "Error Getting Capability"

   End If

  

   Select Case TwainCap.CapInfo.ConType

   Case L_TWON_ONEVALUE

      MsgBox "Cap Value = " + CStr(TwainCap.CapOneValue.OneValCapValue)

   End Select

 

   Set TwainCap = Nothing

End Sub

 

Private Sub Form_Load()

   Dim nRet As Integer

   Set RasterTwain = New LEADRasterTwain2

 

   RasterTwain.EnableMethodErrors = False

   RasterTwain.ManName = "LEAD Technologies, Inc."

   RasterTwain.ProdFamily = "LEAD Twain COM Object"

   RasterTwain.Version = "Version 13"

   RasterTwain.AppName = "LEADTools Twain test sample"

   nRet = RasterTwain.InitSession(hWnd)

   If (nRet <> 0) Then

      MsgBox "Error Initializing Twain", vbExclamation

   End If

End Sub

 

Private Sub Form_Unload(Cancel As Integer)

   RasterTwain.EndSession

End Sub

 

Thanks,

Ali Abo Al-Rob

LEADTOOLS Technical Support


   Report 
  10-09-2008, 12:54
newdawn is not online. Last active: 10/9/2008 5:51:09 PM newdawn

Not Ranked
Joined on 10-01-2008
Posts 3
Re: ADF
Reply Quote
I too always get a true result, even if the ADF is empty. I have run twacker, and my scanner does support this capability. When I test it in Twacker it also returns true, regardless of the existance of paper or not. I am using v15 with .NET C#. My scanner is a Xerox 510 DocuMate. Has anyone found a solution to this?
   Report 
  10-10-2008, 10:03
GregR is not online. Last active: 1/2/2009 9:03:27 AM GregR



Top 10 Posts
Joined on 05-31-2006
In House
Posts 1,806
Re: ADF
Reply Quote
If Twacker is having the same problem, then this is a problem with the driver.  You will need to contact Xerox regarding this issue.

Greg Ross
LEADTOOLS Technical Support
   Report 
Post
LEAD Support Fo... » Developer » Scanning/Captur... » ADF

Powered by Community Server, by Telligent Systems