Leadtools.Multimedia Namespace > Classes > CaptureCtrl > Properties > VideoCaptureFormats Property

public virtual Leadtools.Multimedia.VideoFormats VideoCaptureFormats {get;} 

Public Overridable ReadOnly Property VideoCaptureFormats As Leadtools.Multimedia.VideoFormats 

public: 
virtual property Leadtools.Multimedia.VideoFormats^ VideoCaptureFormats { 
   Leadtools.Multimedia.VideoFormats^ get(); 
} 

using Leadtools; 
using Leadtools.Multimedia; 
using LeadtoolsMultimediaExamples.Fixtures; 
 
public CaptureCtrlForm _form = new CaptureCtrlForm(); 
public bool _result = false; 
 
public void VideoFormatExample() 
{ 
   // reference the capture control 
   CaptureCtrl capturectrl = _form.CaptureCtrl; 
 
   int count, compression = 0, bits = 0, width = 0, height = 0; 
   int found, selected = -1; 
 
   // set a video device, use the name of your device here 
   if (capturectrl.VideoDevices["USB"] != null) 
      capturectrl.VideoDevices["USB"].Selected = true; 
 
   // reference the videoformats property 
   VideoFormats videoformats = capturectrl.VideoCaptureFormats; 
 
   try 
   { 
      // get count of available video formats 
      count = videoformats.Count; 
 
      // enumerate formats and select one 
      foreach (VideoFormat vf in videoformats) 
      { 
         // get the properties 
         bits = vf.BitCount; 
         compression = vf.Compression; 
         width = vf.Width; 
         height = vf.Height; 
 
         // select the format if it matches some criteria 
         if (bits == 16 && width == 640 && height == 480) 
         { 
            vf.Selected = true; 
            break; 
         } 
      } 
 
      // get the currently selected format 
      selected = videoformats.Selection; 
 
      // find a format based on subtype name, width and height (YUY2 320 x 240 video) 
      found = videoformats.IndexOf(Constants.MEDIASUBTYPE_YUY2, 320, 240); 
 
      // our found format is not selected, so select it 
      if (found != selected) 
         videoformats.Selection = found; 
 
      // get the new selected format 
      selected = videoformats.Selection; 
 
      // set our result based on what we expect 
      _result = (count > 0 && selected == found); 
   } 
   catch (Exception) 
   { 
      _result = false; 
   } 
} 

Imports Leadtools 
Imports Leadtools.Multimedia 
Imports LeadtoolsMultimediaExamples.Fixtures 
 
Public _form As CaptureCtrlForm = New CaptureCtrlForm() 
Public _result As Boolean = False 
 
Public Sub VideoFormatExample() 
   ' reference the capture control 
   Dim capturectrl As CaptureCtrl = _form.CaptureCtrl 
 
   Dim count As Integer, compression As Integer = 0, bits As Integer = 0, width As Integer = 0, height As Integer = 0 
   Dim found As Integer, selected As Integer = -1 
 
   ' set a video device, use the name of your device here 
   If Not capturectrl.VideoDevices("USB") Is Nothing Then 
      capturectrl.VideoDevices("USB").Selected = True 
   End If 
 
   ' reference the videoformats property 
   Dim videoformats As VideoFormats = capturectrl.VideoCaptureFormats 
 
   Try 
      ' get count of available video formats 
      count = videoformats.Count 
 
      ' enumerate formats and select one 
      For Each vf As VideoFormat In videoformats 
         ' get the properties 
         bits = vf.BitCount 
         compression = vf.Compression 
         width = vf.Width 
         height = vf.Height 
 
         ' select the format if it matches some criteria 
         If bits = 16 AndAlso width = 640 AndAlso height = 480 Then 
            vf.Selected = True 
            Exit For 
         End If 
      Next vf 
 
      ' get the currently selected format 
      selected = videoformats.Selection 
 
      ' find a format based on subtype name, width and height (YUY2 320 x 240 video) 
      found = videoformats.IndexOf(Leadtools.Multimedia.Constants.MEDIASUBTYPE_YUY2, 320, 240) 
 
      ' our found format is not selected, so select it 
      If found <> selected Then 
         videoformats.Selection = found 
      End If 
 
      ' get the new selected format 
      selected = videoformats.Selection 
 
      ' set our result based on what we expect 
      _result = (count > 0 AndAlso selected = found) 
   Catch e1 As Exception 
      _result = False 
   End Try 
End Sub 

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

Leadtools.Multimedia Assembly