Imports Leadtools
Imports Leadtools.Twain
Public Sub twain_AcquireMulti(ByVal sender As Object, ByVal e As TwainAcquireMultiPageEventArgs)
Dim msg As String
If e.FinishScan Then
msg = String.Format("The page # {0} is scanned and saved to file name {1}", e.PageNumber, e.FileName)
MessageBox.Show(msg)
End If
e.Cancel = False
End Sub
Public Sub AcquireFastExample(ByVal parent As IntPtr)
Dim session As TwainSession = New TwainSession()
session.Startup(parent, "manufacturer", "productFamily", "version", "application", TwainStartupFlags.None)
session.EnableAcquireMultiPageEvent = True
AddHandler session.AcquireMultiPage, AddressOf twain_AcquireMulti
session.AcquireFast(Path.Combine(LEAD_VARS.ImagesDir, "test.tif"), TwainFastUserInterfaceFlags.Show, TwainTransferMode.Buffer, RasterImageFormat.Tif, 1, True, 0, True)
session.Shutdown()
End Sub
Public NotInheritable Class LEAD_VARS
Public Const ImagesDir As String = "C:\Users\Public\Documents\LEADTOOLS Images"
End Class
using Leadtools;
using Leadtools.Twain;
public void twain_AcquireMulti(object sender, TwainAcquireMultiPageEventArgs e)
{
string msg;
if (e.FinishScan)
{
msg = String.Format("The page # {0} is scanned and saved to file name {1}", e.PageNumber, e.FileName);
MessageBox.Show(msg);
}
e.Cancel = false;
}
public void AcquireFastExample(IntPtr parent)
{
TwainSession session = new TwainSession();
session.Startup(parent, "manufacturer", "productFamily", "version", "application", TwainStartupFlags.None);
session.EnableAcquireMultiPageEvent = true;
session.AcquireMultiPage += new EventHandler<TwainAcquireMultiPageEventArgs>(twain_AcquireMulti);
session.AcquireFast(Path.Combine(LEAD_VARS.ImagesDir, "Out_test.tif"),
TwainFastUserInterfaceFlags.Show,
TwainTransferMode.Buffer,
RasterImageFormat.Tif, 1, true, 0, true);
session.Shutdown();
}
static class LEAD_VARS
{
public const string ImagesDir = @"C:\Users\Public\Documents\LEADTOOLS Images";
}