Imports Leadtools
Imports Leadtools.Twain
Public Sub TwainEnumerationCapabilityGetValueExample(ByVal parent As IWin32Window)
Dim session As TwainSession = New TwainSession()
session.Startup(parent, "manufacturer", "productFamily", "version", "application", TwainStartupFlags.None)
Dim twCap As TwainCapability = session.GetCapability(TwainCapabilityType.ImageUnits, TwainGetCapabilityMode.GetValues)
If twCap.Information.ContainerType <> TwainContainerType.Enumeration Then
Dim enumCap As TwainEnumerationCapability = twCap.EnumerationCapability
Dim i As Integer
For i = 0 To enumCap.Count - 1
Dim capVal As TwainCapabilityValue = CType(enumCap.GetValue(i), TwainCapabilityValue)
Dim msg As String = String.Format("Capability Value(%d) = %s", i, capVal.ToString())
MessageBox.Show(msg)
Next
Else
MessageBox.Show("Container type is not enumeration")
End If
session.Shutdown()
End Sub
using Leadtools;
using Leadtools.Twain;
public void TwainEnumerationCapabilityGetValueExample(IWin32Window parent)
{
TwainSession session = new TwainSession();
session.Startup(parent, "manufacturer", "productFamily", "version", "application", TwainStartupFlags.None);
TwainCapability twCap = session.GetCapability(TwainCapabilityType.ImageUnits, TwainGetCapabilityMode.GetValues);
if (twCap.Information.ContainerType == TwainContainerType.Enumeration)
{
TwainEnumerationCapability enumCap = twCap.EnumerationCapability;
for (int i = 0; i < enumCap.Count ; i++)
{
TwainCapabilityValue capVal = (TwainCapabilityValue)enumCap.GetValue(i);
string msg = string.Format("Capability Value(%d) = %s", i, capVal.ToString());
MessageBox.Show(msg);
}
}
else
MessageBox.Show("Container type is not enumeration");
}