Leadtools.MediaFoundation Namespace > CaptureInputs Class : Current Property |
'Declaration Public ReadOnly Property Current As Object
'Usage Dim instance As CaptureInputs Dim value As Object value = instance.Current
public object Current {get;}
Imports Leadtools Imports Leadtools.MediaFoundation Imports LeadtoolsMediaFoundationExamples.Fixtures 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
using Leadtools; using Leadtools.MediaFoundation; using LeadtoolsMediaFoundationExamples.Fixtures; public bool _result = false; public CaptureCtrlForm _form = new CaptureCtrlForm(); public void CurrentExample() { // reference the capture control and it's video inputs CaptureCtrl capturectrl = _form.CaptureCtrl; // set a video device first, you should use your video device 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; } }