LEADTOOLS Multimedia (Leadtools.Multimedia assembly)
LEAD Technologies, Inc

Current Property (CaptureSubTypes)

Example 





Gets the current item in the collection.
Syntax
public object Current {get;}
'Declaration
 
Public ReadOnly Property Current As Object
'Usage
 
Dim instance As CaptureSubTypes
Dim value As Object
 
value = instance.Current
public object Current {get;}
 get_Current(); 
public:
property Object^ Current {
   Object^ get();
}

Property Value

The current item in the collection.
Remarks
Gets the current item in the collection.
Example
Copy CodeCopy Code  
Public _result As Boolean = False
Public _form As CaptureCtrlForm = New CaptureCtrlForm()
Public Sub CurrentExample()
   ' reference the capture control
   Dim capturectrl As CaptureCtrl = _form.CaptureCtrl

   ' select a video device, use your device name here instead of USB
   If capturectrl.VideoDevices("Analog") Is Nothing Then
      Throw New Exception("No Analog video device available")
   End If

   capturectrl.VideoDevices("Analog").Selected = True

   ' get the video capture subtypes collection
   Dim subtypes As CaptureSubTypes = capturectrl.VideoCaptureSubTypes

   Try
      ' loop through all video subtypes
      For Each cs As CaptureSubType In subtypes
         ' set the result to what we expect
         _result = (cs Is subtypes.Current)
      Next cs
   Catch e1 As Exception
      _result = False
   End Try

   ' we'll loop on the state and pump messages for this example.
   ' but you should not need to if running from a Windows Forms application.
   Do While capturectrl.State = CaptureState.Running
      Application.DoEvents()
   Loop
End Sub
public bool _result = false;
public CaptureCtrlForm _form = new CaptureCtrlForm();
public void CurrentExample()
{
   // reference the capture control
   CaptureCtrl capturectrl = _form.CaptureCtrl;

   // select a video device, use your device name here instead of USB
   if (capturectrl.VideoDevices["Analog"] == null)
      throw new Exception("No Analog video device available");

   capturectrl.VideoDevices["Analog"].Selected = true;

   // get the video capture subtypes collection
   CaptureSubTypes subtypes = capturectrl.VideoCaptureSubTypes;

   try
   {
      // loop through all video subtypes
      foreach (CaptureSubType cs in subtypes)
      {
         // set the result to what we expect
         _result = (cs == subtypes.Current);
      }
   }
   catch (Exception)
   {
      _result = false;
   }

   // we'll loop on the state and pump messages for this example.
   // but you should not need to if running from a Windows Forms application.
   while (capturectrl.State == CaptureState.Running)
      Application.DoEvents();
}
Requirements

Target Platforms: Windows 7, Windows Vista SP1 or later, Windows XP SP3, Windows Server 2008 (Server Core not supported), Windows Server 2008 R2 (Server Core supported with SP1 or later), Windows Server 2003 SP2

See Also

Reference

CaptureSubTypes Class
CaptureSubTypes Members

 

 


Products | Support | Contact Us | Copyright Notices

© 2006-2012 All Rights Reserved. LEAD Technologies, Inc.

Leadtools.Multimedia requires a Multimedia or Multimedia Suite license and unlock key. For more information, refer to: LEADTOOLS Toolkit Features