Imports Leadtools
Imports Leadtools.Twain
Public Sub TwainSourceInformationExample(ByVal parent As IntPtr)
Dim buffer As String
Dim session As TwainSession = New TwainSession()
session.Startup(parent, "manufacturer", "productFamily", "version", "application", TwainStartupFlags.None)
Dim srcInfo As TwainSourceInformation() = session.QuerySourceInformation()
Dim i As Integer = 0
Do While i < srcInfo.Length
buffer = String.Format("Source Name = {0}" & Constants.vbLf & "Product Family Name = {1}" & Constants.vbLf & _
"Manufacturer Name = {2}" & Constants.vbLf & "Twain source supported version = {3}" & _
Constants.vbLf, srcInfo(i).Name, srcInfo(i).ProductFamily, srcInfo(i).Manufacturer, _
srcInfo(i).TwainSourceVersion)
MessageBox.Show(buffer)
i += 1
Loop
session.Shutdown()
End Sub
using Leadtools;
using Leadtools.Twain;
public void TwainSourceInformationExample(IntPtr parent)
{
string buffer;
TwainSession session = new TwainSession();
session.Startup(parent, "manufacturer", "productFamily", "version", "application", TwainStartupFlags.None);
TwainSourceInformation[] srcInfo = session.QuerySourceInformation();
for (int i=0; i < srcInfo.Length; i++)
{
buffer = String.Format("Source Name = {0}\nProduct Family Name = {1}\nManufacturer Name = {2}\nTwain source supported version = {3}\n",
srcInfo[i].Name, srcInfo[i].ProductFamily, srcInfo[i].Manufacturer, srcInfo[i].TwainSourceVersion);
MessageBox.Show(buffer);
}
session.Shutdown();
}
Copy Code