LEADTOOLS Multimedia (Leadtools.Multimedia assembly)

VideoProcAmp Property

Show in webframe
Example 



Gets a VideoProcAmp object which enables the user to adjust the qualities of an incoming video signal.
Syntax
'Declaration
 
Public Overridable ReadOnly Property VideoProcAmp As VideoProcAmp
'Usage
 
Dim instance As CaptureCtrl
Dim value As VideoProcAmp
 
value = instance.VideoProcAmp
public virtual VideoProcAmp VideoProcAmp {get;}
public:
virtual property VideoProcAmp^ VideoProcAmp {
   VideoProcAmp^ get();
}

Property Value

A VideoProcAmp object.
Remarks
Gets a VideoProcAmp object which enables the user to adjust the qualities of an incoming video signal, such as brightness, contrast, hue, saturation, gamma, and sharpness.
Example
Copy Code  
Imports Leadtools
Imports Leadtools.Multimedia
Imports LeadtoolsMultimediaExamples.Fixtures

Public _result As Boolean = False
Public _form As CaptureCtrlForm = New CaptureCtrlForm()
Public _outFile As String = Path.Combine(LEAD_VARS.MediaDir, "VideoProcAmp_GetExample.avi")
Public Sub GetExample()
   ' reference the capture control
   Dim capturectrl As CaptureCtrl = _form.CaptureCtrl

   Try
      ' select the first device with analog in it's name
      ' Replace "Analog" with your video capture device name
      If capturectrl.VideoDevices("Analog") Is Nothing Then
         Throw New Exception("No Analog video devices available!")
      End If

      capturectrl.VideoDevices("Analog").Selected = True

      ' set a video compressor
      capturectrl.VideoCompressors.Mpeg2.Selected = True

      ' set the target file
      capturectrl.TargetFile = _outFile

      ' reference the video proc amp 
      Dim videoprocamp As VideoProcAmp = capturectrl.VideoProcAmp

      If Not videoprocamp Is Nothing Then
         ' set the auto brightness property 
         videoprocamp.AutoBrightness = True

         ' set to black and white
         videoprocamp.ColorEnable = False

         ' enable backlight compensation, if available
         videoprocamp.BacklightCompensation = True
      End If

      ' check for video capture available
      If capturectrl.IsModeAvailable(CaptureMode.Video) Then
         ' capture 15 seconds of video
         capturectrl.UseTimeLimit = True
         capturectrl.TimeLimit = 15

         ' subscribe to the compete event
         AddHandler capturectrl.Complete, AddressOf CaptureCtrl_Complete
         ' start the capture
         capturectrl.StartCapture(CaptureMode.Video)
      End If
   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 capturectrl.State = CaptureState.Running
      Application.DoEvents()
   Loop
End Sub

Private Sub CaptureCtrl_Complete(ByVal sender As Object, ByVal e As EventArgs)
   ' set the result to what we expect
   _result = File.Exists(_outFile)
End Sub

Public NotInheritable Class LEAD_VARS
Public Const MediaDir As String = "C:\Program Files (x86)\LEAD Technologies\LEADTOOLS 18\Media"
End Class
using Leadtools;
using Leadtools.Multimedia;
using LeadtoolsMultimediaExamples.Fixtures;

public bool _result = false;
public CaptureCtrlForm _form = new CaptureCtrlForm();
public string _outFile = Path.Combine(LEAD_VARS.MediaDir, "VideoProcAmp_GetExample.avi");
public void GetExample()
{
   // reference the capture control
   CaptureCtrl capturectrl = _form.CaptureCtrl;

   try
   {
      // select the first device with analog in it's name
      // Replace "Analog" with your video capture device name
      if (capturectrl.VideoDevices["Analog"] == null)
         throw new Exception("No Analog video devices available!");

      capturectrl.VideoDevices["Analog"].Selected = true;

      // set a video compressor
      capturectrl.VideoCompressors.Mpeg2.Selected = true;

      // set the target file
      capturectrl.TargetFile = _outFile;

      // reference the video proc amp 
      VideoProcAmp videoprocamp = capturectrl.VideoProcAmp;

      if (videoprocamp != null)
      {
         // set the auto brightness property 
         videoprocamp.AutoBrightness = true;

         // set to black and white
         videoprocamp.ColorEnable = false;

         // enable backlight compensation, if available
         videoprocamp.BacklightCompensation = true;
      }

      // check for video capture available
      if (capturectrl.IsModeAvailable(CaptureMode.Video))
      {
         // capture 15 seconds of video
         capturectrl.UseTimeLimit = true;
         capturectrl.TimeLimit = 15;

         // subscribe to the compete event
         capturectrl.Complete += new EventHandler(CaptureCtrl_Complete);
         // start the capture
         capturectrl.StartCapture(CaptureMode.Video);
      }
   }
   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 (capturectrl.State == CaptureState.Running)
      Application.DoEvents();
}

void CaptureCtrl_Complete(object sender, EventArgs e)
{
   // set the result to what we expect
   _result = File.Exists(_outFile);
}

static class LEAD_VARS
{
public const string MediaDir = @"C:\Program Files (x86)\LEAD Technologies\LEADTOOLS 18\Media";
}
Requirements

Target Platforms

See Also

Reference

CaptureCtrl Class
CaptureCtrl Members

 

 


Products | Support | Contact Us | Copyright Notices
© 2006-2014 All Rights Reserved. LEAD Technologies, Inc.

Leadtools.Multimedia requires a Multimedia or Multimedia Suite license and unlock key. For more information, refer to: LEADTOOLS Toolkit Features