Leadtools.Multimedia Namespace > TargetDevices Class : Current Property |
'Declaration Public ReadOnly Property Current As Object
'Usage Dim instance As TargetDevices Dim value As Object value = instance.Current
public object Current {get;}
Imports Leadtools Imports Leadtools.Multimedia Imports LeadtoolsMultimediaExamples.Fixtures Public _result As Boolean = False Public _form As ConvertCtrlForm = New ConvertCtrlForm() Public Sub CurrentExample() ' reference the convert control Dim convertctrl As ConvertCtrl = _form.ConvertCtrl Dim devices As TargetDevices = convertctrl.TargetDevices Try ' enumerate through the list of inputs ' demonstrating the current property For Each dev As TargetDevice In devices ' set the result to what we expect _result = (dev Is devices.Current) Next dev Catch e1 As Exception _result = False End Try End Sub
using Leadtools; using Leadtools.Multimedia; using LeadtoolsMultimediaExamples.Fixtures; public bool _result = false; public ConvertCtrlForm _form = new ConvertCtrlForm(); public void CurrentExample() { // reference the convert control ConvertCtrl convertctrl = _form.ConvertCtrl; TargetDevices devices = convertctrl.TargetDevices; try { // enumerate through the list of inputs // demonstrating the current property foreach (TargetDevice dev in devices) { // set the result to what we expect _result = (dev == devices.Current); } } catch (Exception) { _result = false; } }