Leadtools.Multimedia Namespace > CaptureInputs Class : Current Property |
public object Current {get;}
'Declaration Public ReadOnly Property Current As Object
'Usage Dim instance As CaptureInputs Dim value As Object value = instance.Current
public object Current {get;}
get_Current();
Public _result As Boolean = False Public _form As CaptureCtrlForm = New CaptureCtrlForm() Public Sub CurrentExample() ' reference the capture control and it's video inputs Dim capturectrl As CaptureCtrl = _form.CaptureCtrl ' set a video device first, you should use your video device name here If capturectrl.VideoDevices("Analog") Is Nothing Then Throw New Exception("No Analog video tuner device available") End If capturectrl.VideoDevices("Analog").Selected = True Dim inputs As CaptureInputs = capturectrl.VideoInputs Try ' enumerate through the list of inputs ' demonstrating the current property For Each ci As CaptureInput In inputs ' set the result to what we expect _result = (ci Is inputs.Current) Next ci Catch e1 As Exception _result = False End Try End Sub
public bool _result = false; public CaptureCtrlForm _form = new CaptureCtrlForm(); public void CurrentExample() { // reference the capture control and its video inputs CaptureCtrl capturectrl = _form.CaptureCtrl; // set a video device first. use your video device's name here if (capturectrl.VideoDevices["Analog"] == null) throw new Exception("No Analog video tuner device available"); capturectrl.VideoDevices["Analog"].Selected = true; CaptureInputs inputs = capturectrl.VideoInputs; try { // enumerate through the list of inputs // demonstrating the current property foreach (CaptureInput ci in inputs) { // set the result to what we expect _result = (ci == inputs.Current); } } catch (Exception) { _result = false; } }
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