←Select platform

ScaleMode Property (CaptureCtrl)

Summary

Specifies the unit of measure for the control.

Syntax

C#
VB
C++
public virtual Leadtools.Multimedia.ScaleMode ScaleMode {get; set;} 
Public Overridable Property ScaleMode As Leadtools.Multimedia.ScaleMode 
public: 
virtual property Leadtools.Multimedia.ScaleMode ScaleMode { 
   Leadtools.Multimedia.ScaleMode get(); 
   void set (    Leadtools.Multimedia.ScaleMode ); 
} 

Property Value

A ScaleMode value representing the unit of measure.

Remarks

The value should be one of the ScaleMode enumeration values. Assignment can raise an error exception. For more information, refer to the Error Codes.

Example

C#
VB
using Leadtools; 
using Leadtools.Multimedia; 
using LeadtoolsMultimediaExamples.Fixtures; 
 
public bool _result = false; 
public CaptureCtrlForm _form = new CaptureCtrlForm(); 
 
// capture control 
CaptureCtrl capturectrl; 
 
// output file 
string outFile = Path.Combine(LEAD_VARS.MediaDir, "CaptureCtrl_ScaleModeExample.avi"); 
 
public void ScaleModeExample() 
{ 
   // reference the capture control 
   capturectrl = _form.CaptureCtrl; 
 
   try 
   { 
      // set the source video device, select using your device name here 
      if (capturectrl.VideoDevices["USB"] == null) 
      { 
         throw new Exception("No USB video device available"); 
      } 
 
      capturectrl.VideoDevices["USB"].Selected = true; 
 
      // select a video compressor 
      capturectrl.VideoCompressors.Mpeg4.Selected = true; 
 
      // set the target output file 
      capturectrl.TargetFile = outFile; 
 
      // subscribe to the started event 
      capturectrl.Started += new System.EventHandler(CaptureCtrl_Started); 
 
      // set scale mode 
      capturectrl.ScaleMode = ScaleMode.Pixels; 
 
      // start capture 
      capturectrl.StartCapture(CaptureMode.Video); 
 
      // get the scale mode 
      ScaleMode Mode = capturectrl.ScaleMode; 
 
      // set the result to what we expect 
      _result = (Mode == ScaleMode.Pixels); 
   } 
   catch (COMException) 
   { 
      _result = false; 
   } 
   catch (Exception) 
   { 
      _result = false; 
   } 
} 
 
void CaptureCtrl_Started(object sender, EventArgs e) 
{ 
   // stop the capture (we do not need a complete capture for this example) 
   capturectrl.StopCapture(); 
} 
 
static class LEAD_VARS 
{ 
   public const string MediaDir = @"C:\Program Files (x86)\LEAD Technologies\LEADTOOLS 19\Media"; 
} 
Imports Leadtools 
Imports Leadtools.Multimedia 
Imports LeadtoolsMultimediaExamples.Fixtures 
 
Public _result As Boolean = False 
Public _form As CaptureCtrlForm = New CaptureCtrlForm() 
Public _capturectrl As CaptureCtrl 
 
Public Sub ScaleModeExample() 
   ' reference the capture control 
   _capturectrl = _form.CaptureCtrl 
 
   ' output file 
   Dim outFile As String = Path.Combine(LEAD_VARS.MediaDir, "CaptureCtrl_ScaleModeExample.avi") 
 
   Try 
      ' set the source video device, select using your device name here 
      If _capturectrl.VideoDevices("USB") Is Nothing Then 
         Throw New Exception("No USB video device available") 
      End If 
 
      _capturectrl.VideoDevices("USB").Selected = True 
 
      ' select a video compressor 
      _capturectrl.VideoCompressors.Mpeg4.Selected = True 
 
      ' set the target output file 
      _capturectrl.TargetFile = outFile 
 
      If _capturectrl.IsModeAvailable(CaptureMode.Video) Then 
 
         ' subscribe to the started event 
         AddHandler _capturectrl.Started, AddressOf CaptureCtrl_Started 
 
         ' set scale mode 
         _capturectrl.ScaleMode = ScaleMode.Pixels 
 
         ' start capture 
         _capturectrl.StartCapture(CaptureMode.Video) 
 
         ' get the scale mode 
         Dim Mode As ScaleMode = _capturectrl.ScaleMode 
 
         ' set the result to what we expect 
         _result = (Mode = ScaleMode.Pixels) 
      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_Started(ByVal sender As Object, ByVal e As EventArgs) 
   ' stop the capture (we don't need a complete capture for this example) 
   _capturectrl.StopCapture() 
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.Multimedia Assembly
Click or drag to resize