In This Topic ▼

TargetVCRControl Property

Summary

Gets the target VCR control object.

Syntax

C++

public virtual VCRControl TargetVCRControl { get; }

Public Overridable ReadOnly Property TargetVCRControl As VCRControl

public: 
virtual property VCRControl^ TargetVCRControl { 
   VCRControl^ get(); 
}

Property Value

A VCRControl object.

Remarks

The VCRControl object is used to control VCR functionality available in the target device.

Example

using Leadtools; 
using Leadtools.Multimedia; 
using LeadtoolsMultimediaExamples.Fixtures; 
 
public bool _result = false; 
public ConvertCtrlForm _form = new ConvertCtrlForm(); 
public ConvertCtrl _convertctrl; 
 
public void TargetDevicesExample() 
{ 
   // reference the convert control 
   _convertctrl = _form.ConvertCtrl; 
 
   // input file 
   string inFile = Path.Combine(LEAD_VARS.MediaDir, "ConvertCtrl_Source.mpeg"); 
 
   try 
   { 
      // check to see if we have the desired target device 
      if (_convertctrl.TargetDevices["Microsoft DV Camera and VCR"] == null) 
         throw new Exception("No Microsoft DV Camera target devices available!"); 
 
      // set the video capture device, use your capture device name here 
      _convertctrl.SourceFile = inFile; 
 
      // select video and audio compressors to none 
      _convertctrl.VideoCompressors.Selection = -1; 
      _convertctrl.AudioCompressors.Selection = -1; 
 
      // select the target format 
      _convertctrl.TargetFormats[TargetFormatType.DVSD].Selected = true; 
 
      // select only Audio for this example 
      _convertctrl.AllowedStreams = StreamFormatType.AudioVideo; 
 
      // set a target device 
      _convertctrl.TargetDevices["Microsoft DV Camera and VCR"].Selected = true; 
 
      // show the target format dialog 
      if (_convertctrl.HasDialog(ConvertDlg.TargetFormat)) 
         _convertctrl.ShowDialog(ConvertDlg.TargetFormat, _form); 
 
      // check the target device VCRControl  
      if (_convertctrl.TargetVCRControl == null 
         || (_convertctrl.TargetVCRControl.DeviceType == VCRControlDeviceType.NotPresent 
            || _convertctrl.TargetVCRControl.DeviceType == VCRControlDeviceType.Unknown)) 
         throw new Exception("MS DV Camera's Target VCR control is not present!"); 
 
      // start recording on the target device VCRControl  
      _convertctrl.TargetVCRControl.Record(); 
 
      // give the camera time to respond 
      System.Threading.Thread.Sleep(2000); 
 
      // subscribe to the convert complete event 
      _convertctrl.Complete += new EventHandler(ConvertCtrl_Completed); 
 
      // convert it now! 
      _convertctrl.StartConvert(); 
 
      // set the result to what we expect 
      _result = true; 
   } 
   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 (_convertctrl.State == ConvertState.Running) 
      Application.DoEvents(); 
} 
 
void ConvertCtrl_Completed(object sender, EventArgs e) 
{ 
   // stop the TargetDevice camera recording and rewind 
   _convertctrl.TargetVCRControl.Stop(); 
   _convertctrl.TargetVCRControl.Rewind(); 
} 
 
static class LEAD_VARS 
{ 
   public const string MediaDir = @"C:\Program Files (x86)\LEAD Technologies\LEADTOOLS 20\Media"; 
}

Imports Leadtools 
Imports Leadtools.Multimedia 
Imports LeadtoolsMultimediaExamples.Fixtures 
 
Public _result As Boolean = False 
Public _form As ConvertCtrlForm = New ConvertCtrlForm() 
Public _convertctrl As ConvertCtrl 
 
Public Sub TargetDevicesExample() 
   ' reference the convert control 
   _convertctrl = _form.ConvertCtrl 
 
   ' input file 
   Dim inFile As String = Path.Combine(LEAD_VARS.MediaDir, "ConvertCtrl_Source.mpeg") 
 
   Try 
      ' check to see if we have the desired target device 
      If _convertctrl.TargetDevices("Microsoft DV Camera and VCR") Is Nothing Then 
         Throw New Exception("No Microsoft DV Camera target devices available!") 
      End If 
 
      ' set the video capture device, use your capture device name here 
      _convertctrl.SourceFile = inFile 
 
      ' set video and audio compressors to none 
      _convertctrl.VideoCompressors.Selection = -1 
      _convertctrl.AudioCompressors.Selection = -1 
 
      ' select the target format 
      _convertctrl.TargetFormats(TargetFormatType.DVSD).Selected = True 
 
      ' select only Audio for this example 
      _convertctrl.AllowedStreams = StreamFormatType.AudioVideo 
 
      ' set a target device 
      _convertctrl.TargetDevices("Microsoft DV Camera and VCR").Selected = True 
 
      ' show the target format dialog 
      If _convertctrl.HasDialog(ConvertDlg.TargetFormat) Then 
         _convertctrl.ShowDialog(ConvertDlg.TargetFormat, _form) 
      End If 
 
      ' check the target device VCRControl  
      If _convertctrl.TargetVCRControl Is Nothing OrElse (_convertctrl.TargetVCRControl.DeviceType = VCRControlDeviceType.NotPresent _ 
                                                          OrElse _convertctrl.TargetVCRControl.DeviceType = VCRControlDeviceType.Unknown) Then 
         Throw New Exception("MS DV Camera's Target VCR control is not present!") 
      End If 
 
      ' start recording on the target device VCRControl  
      _convertctrl.TargetVCRControl.Record() 
 
      ' give the camera time to respond 
      System.Threading.Thread.Sleep(2000) 
 
      ' subscribe to the convert complete event 
      AddHandler _convertctrl.Complete, AddressOf ConvertCtrl_Completed 
 
      ' convert it now! 
      _convertctrl.StartConvert() 
 
      ' set the result to what we expect 
      _result = True 
   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 _convertctrl.State = ConvertState.Running 
      Application.DoEvents() 
   Loop 
End Sub 
 
Private Sub ConvertCtrl_Completed(ByVal sender As Object, ByVal e As EventArgs) 
   ' stop the TargetDevice camera recording and rewind 
   _convertctrl.TargetVCRControl.Stop() 
   _convertctrl.TargetVCRControl.Rewind() 
End Sub 
 
Public NotInheritable Class LEAD_VARS 
   Public Const MediaDir As String = "C:\Program Files (x86)\LEAD Technologies\LEADTOOLS 20\Media" 
End Class

Requirements

Target Platforms

Reference

ConvertCtrl Class

ConvertCtrl Members

Download our FREE evaluation

Help Version 20.0.2020.4.2

Leadtools.Multimedia Assembly

Introduction

Getting Started

Namespaces

Leadtools.Multimedia Namespace

Leadtools.Multimedia.Common Namespace

Assemblies