LEADTOOLS Multimedia (Leadtools.Multimedia assembly)

UseFrameRate Property

Show in webframe
Example 



Gets or sets the option to use the frame rate specified in the FrameRate property.
Syntax
'Declaration
 
Public Overridable Property UseFrameRate As Boolean
'Usage
 
Dim instance As CaptureCtrl
Dim value As Boolean
 
instance.UseFrameRate = value
 
value = instance.UseFrameRate
public virtual bool UseFrameRate {get; set;}
public:
virtual property bool UseFrameRate {
   bool get();
   void set (    bool value);
}

Property Value

true if the FrameRate property is enabled; false, otherwise.
Remarks

Assignment can raise an error exception. For more information, refer to the Error Codes.

Example
Copy Code  
Imports Leadtools
Imports Leadtools.Multimedia
Imports LeadtoolsMultimediaExamples.Fixtures

Public _result As Boolean = False
Public _form As CaptureCtrlForm = New CaptureCtrlForm()
Public Sub GetSubObjectExample()
   ' reference the capture control
   Dim capturectrl As CaptureCtrl = _form.CaptureCtrl

   ' input and output files
   Dim inFile As String = Path.Combine(LEAD_VARS.MediaDir, "CaptureCtrl_Source.avi")
   Dim outFile As String = Path.Combine(LEAD_VARS.MediaDir, "CaptureCtrl_GetSubObjectExample.avi")

   Try
      ' set the source video device
      If capturectrl.VideoDevices("USB") Is Nothing Then
         Throw New Exception("No USB video device available")
      End If

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

      ' set the source 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 output files
      capturectrl.TargetFile = outFile

      ' set the audio and video compression
      capturectrl.VideoCompressors.Mpeg2.Selected = True
      capturectrl.AudioCompressors.AC3.Selected = True

      ' add the color adjustment processor
      capturectrl.SelectedVideoProcessors.Add(capturectrl.VideoProcessors.Color)

      ' access the Color filter directly via the GetSubObject method
      Dim lmvc As LMVColor = TryCast(capturectrl.GetSubObject(CaptureObject.SelVideoProcessor), LMVColor)

      If Not lmvc Is Nothing Then
         ' change some settings
         lmvc.Brightness = 85
         lmvc.Contrast = 85
         lmvc.Enabled = True
         lmvc.EffectAreaEnabled = False

         Marshal.ReleaseComObject(lmvc)
      End If

      ' 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

         ' 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.
         Do While capturectrl.State = CaptureState.Running
            Application.DoEvents()
         Loop
      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

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 void GetSubObjectExample()
{
   // reference the capture control
   CaptureCtrl capturectrl = _form.CaptureCtrl;

   // input and output files
   string inFile =Path.Combine(LEAD_VARS.MediaDir,"CaptureCtrl_Source.avi");
   string outFile = Path.Combine(LEAD_VARS.MediaDir,"CaptureCtrl_GetSubObjectExample.avi");

   try
   {
      // set the source video device
      if (capturectrl.VideoDevices["USB"] == null)
         throw new Exception("No USB video device available");

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

      // set the source audio device
      if (capturectrl.AudioDevices["USB"] == null)
         throw new Exception("No USB audio device available");

      capturectrl.AudioDevices["USB"].Selected = true;

      // set the output files
      capturectrl.TargetFile = outFile;

      // set the audio and video compression
      capturectrl.VideoCompressors.Mpeg2.Selected = true;
      capturectrl.AudioCompressors.AC3.Selected = true;

      // add the color adjustment processor
      capturectrl.SelectedVideoProcessors.Add(capturectrl.VideoProcessors.Color);

      // access the Color filter directly via the GetSubObject method
      LMVColor lmvc = capturectrl.GetSubObject(CaptureObject.SelVideoProcessor) as LMVColor;

      if (lmvc != null)
      {
         // change some settings
         lmvc.Brightness = 85;
         lmvc.Contrast = 85;
         lmvc.Enabled = true;
         lmvc.EffectAreaEnabled = false;

         Marshal.ReleaseComObject(lmvc);
      }

      // check whether we 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;

         // 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;
   }

   // 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();
}

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