←Select platform

AudioProcessors Property (CaptureCtrl)

Summary

Gets the registered audio processor collection object.

Syntax

C#
VB
C++
public Leadtools.Mediafoundation.AudioProcessors AudioProcessors {get;} 
Public ReadOnly Property AudioProcessors As Leadtools.Mediafoundation.AudioProcessors 

Property Value

An AudioProcessors collection object representing the available audio processors.

Remarks

The AudioProcessors object is used to enumerate the available audio processing filters. For more information, refer to AudioProcessors.

.

Example

C#
VB
using Leadtools; 
using Leadtools.MediaFoundation; 
using LeadtoolsMediaFoundationExamples.Fixtures; 
 
public bool _result = false; 
public CaptureCtrlForm _form = new CaptureCtrlForm(); 
 
public void ProcessorsExample() 
{ 
   CaptureCtrl capturectrl = _form.CaptureCtrl; 
   string outFile = Path.Combine(LEAD_VARS.MediaDir, "CaptureCtrl_ProcessorsExample.avi"); 
 
   try 
   { 
      // try to find a USB camera 
      if (capturectrl.VideoDevices["USB"] == null) 
         throw new Exception("No USB video device available"); 
 
      capturectrl.VideoDevices["USB"].Selected = true; 
 
      // try to find a USB audio device 
      if (capturectrl.AudioDevices["USB"] == null) 
         throw new Exception("No USB audio device available"); 
 
      capturectrl.AudioDevices["USB"].Selected = true; 
 
      // set the selected video processor to the first one in the video processors list  
      capturectrl.SelectedVideoProcessors.Add(capturectrl.VideoProcessors[0]); 
      Processor vproc = capturectrl.SelectedVideoProcessors[0]; 
 
      // set the selected audio processor to the first one in the audio processors list  
      capturectrl.SelectedAudioProcessors.Add(capturectrl.AudioProcessors[0]); 
      Processor aproc = capturectrl.SelectedAudioProcessors[0]; 
 
      // set the video processor properties 
      if (vproc.HasDialog(ProcessorDlg.Properties)) 
         vproc.ShowDialog(ProcessorDlg.Properties, _form); 
 
      // set the audio processor properties 
      if (aproc.HasDialog(ProcessorDlg.Properties)) 
         aproc.ShowDialog(ProcessorDlg.Properties, _form); 
 
      // set the target output file and format 
      capturectrl.TargetFile = outFile; 
 
      // set the target output format 
      capturectrl.TargetFormat = TargetFormatType.MP4; 
 
      // check if we have can capture video 
      if (capturectrl.IsModeAvailable(CaptureMode.VideoAndAudio)) 
      { 
         capturectrl.FrameRate = 5;       // 5 frames per second  
         capturectrl.UseFrameRate = true; 
         capturectrl.TimeLimit = 10;      // just 10 seconds of capture time 
         capturectrl.UseTimeLimit = true; 
 
         // subscribe to the complete event 
         capturectrl.Complete += new EventHandler(CaptureCtrl_Complete); 
 
         // start the capture process 
         capturectrl.StartCapture(CaptureMode.VideoAndAudio); 
 
         // 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(); 
      } 
   } 
   catch (Exception) 
   { 
      _result = false; 
   } 
} 
 
public void CaptureCtrl_Complete(object sender, EventArgs e) 
{ 
   // set result 
   _result = true; 
} 
 
static class LEAD_VARS 
{ 
   public const string MediaDir = @"C:\Program Files (x86)\LEAD Technologies\LEADTOOLS 19\Media"; 
} 
Imports Leadtools 
Imports Leadtools.MediaFoundation 
Imports LeadtoolsMediaFoundationExamples.Fixtures 
 
Public _result As Boolean = False 
Public _form As New CaptureCtrlForm() 
 
Public Sub ProcessorsExample() 
   Dim capturectrl As CaptureCtrl = _form.CaptureCtrl 
   Dim outFile As String = Path.Combine(LEAD_VARS.MediaDir, "CaptureCtrl_ProcessorsExample.avi") 
 
   Try 
      ' try to find a USB camera 
      If capturectrl.VideoDevices("USB") Is Nothing Then 
         Throw New Exception("No USB video device available") 
      End If 
 
      capturectrl.VideoDevices("USB").Selected = True 
 
      ' try to find a USB audio device 
      If capturectrl.AudioDevices("USB") Is Nothing Then 
         Throw New Exception("No USB audio device available") 
      End If 
 
      capturectrl.AudioDevices("USB").Selected = True 
 
      ' set the selected video processor to the first one in the video processors list  
      capturectrl.SelectedVideoProcessors.Add(capturectrl.VideoProcessors(0)) 
      Dim vproc As Processor = capturectrl.SelectedVideoProcessors(0) 
 
      ' set the selected audio processor to the first one in the audio processors list  
      capturectrl.SelectedAudioProcessors.Add(capturectrl.AudioProcessors(0)) 
      Dim aproc As Processor = capturectrl.SelectedAudioProcessors(0) 
 
      ' set the video processor properties 
      If vproc.HasDialog(ProcessorDlg.Properties) Then 
         vproc.ShowDialog(ProcessorDlg.Properties, _form) 
      End If 
 
      ' set the audio processor properties 
      If aproc.HasDialog(ProcessorDlg.Properties) Then 
         aproc.ShowDialog(ProcessorDlg.Properties, _form) 
      End If 
 
      ' set the target output file and format 
      capturectrl.TargetFile = outFile 
 
      ' set the target output format 
      capturectrl.TargetFormat = TargetFormatType.MP4 
 
      ' check if we have can capture video 
      If capturectrl.IsModeAvailable(CaptureMode.VideoAndAudio) Then 
         capturectrl.FrameRate = 5 
         ' 5 frames per second  
         capturectrl.UseFrameRate = True 
         capturectrl.TimeLimit = 10 
         ' just 10 seconds of capture time 
         capturectrl.UseTimeLimit = True 
 
         ' subscribe to the complete event 
         AddHandler capturectrl.Complete, AddressOf CaptureCtrl_Complete 
 
         ' start the capture process 
         capturectrl.StartCapture(CaptureMode.VideoAndAudio) 
 
         ' 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() 
         End While 
      End If 
   Catch generatedExceptionName As Exception 
      _result = False 
   End Try 
End Sub 
 
Public Sub CaptureCtrl_Complete(ByVal sender As Object, ByVal e As EventArgs) 
   ' set result 
   _result = True 
End Sub 
 
Public NotInheritable Class LEAD_VARS 
   Public Const MediaDir As String = "C:\Program Files (x86)\LEAD Technologies\LEADTOOLS 19\Media" 
End Class 

Requirements

Target Platforms

Products | Support | Contact Us | Copyright Notices
© 1991-2017 LEAD Technologies, Inc. All Rights Reserved.
Leadtools.MediaFoundation Assembly
Click or drag to resize