LEADTOOLS Multimedia (Leadtools.Multimedia assembly)

VideoWindowSizeMode Property (ConvertCtrl)

Show in webframe
Example 



Gets or sets the current video window size mode.
Syntax
'Declaration
 
Public Overridable Property VideoWindowSizeMode As SizeMode
'Usage
 
Dim instance As ConvertCtrl
Dim value As SizeMode
 
instance.VideoWindowSizeMode = value
 
value = instance.VideoWindowSizeMode
public virtual SizeMode VideoWindowSizeMode {get; set;}
public:
virtual property SizeMode VideoWindowSizeMode {
   SizeMode get();
   void set (    SizeMode value);
}

Property Value

An SizeMode enumeration value.
Remarks
The value is one of the SizeMode enumeration values. The default size mode is SizeMode.Fit . 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 ConvertCtrlForm = New ConvertCtrlForm()
Public Sub VideoWindowExample()
   ' reference the play control
   Dim convertctrl As ConvertCtrl = _form.ConvertCtrl

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

   Try
      ' set the source for conversion
      convertctrl.SourceFile = inFile

      ' set the video and audio compressors
      convertctrl.VideoCompressors.Mpeg2.Selected = True
      convertctrl.AudioCompressors.AC3.Selected = True

      ' set the target output file and format
      convertctrl.TargetFile = outFile

      ' set the target output format
      convertctrl.TargetFormat = TargetFormatType.AVI

      ' enable preview
      convertctrl.Preview = True

      ' play it!
      convertctrl.StartConvert()

      ' get the video and video window info
      Dim vwt As Integer = convertctrl.VideoWindowTop
      Dim vwl As Integer = convertctrl.VideoWindowLeft
      Dim vwh As Integer = convertctrl.VideoWindowHeight
      Dim vww As Integer = convertctrl.VideoWindowWidth
      Dim vh As Integer = convertctrl.VideoHeight
      Dim vw As Integer = convertctrl.VideoWidth
      Dim sm As SizeMode = convertctrl.VideoWindowSizeMode
      Dim isFullScreen As Boolean = convertctrl.FullScreenMode

      If vw > vww AndAlso vh > vwh AndAlso sm <> SizeMode.Fit Then
         convertctrl.VideoWindowSizeMode = SizeMode.Fit
      ElseIf vw < vww AndAlso vh < vwh Then
         convertctrl.VideoWindowSizeMode = SizeMode.Stretch
      End If

      ' set the play control to cover the form's client area
      convertctrl.SetVideoWindowPos(50, 0, Me._form.ClientSize.Width, Me._form.ClientSize.Height)

      ' set the result
      _result = (convertctrl.VideoWindow <> IntPtr.Zero)
   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 convertctrl.State = ConvertState.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 ConvertCtrlForm _form = new ConvertCtrlForm();
public void VideoWindowExample()
{
   // reference the play control
   ConvertCtrl convertctrl = _form.ConvertCtrl;

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

   try
   {
      // set the source for conversion
      convertctrl.SourceFile = inFile;

      // set the video and audio compressors
      convertctrl.VideoCompressors.Mpeg2.Selected = true;
      convertctrl.AudioCompressors.AC3.Selected = true;

      // set the target output file and format
      convertctrl.TargetFile = outFile;

      // set the target output format
      convertctrl.TargetFormat = TargetFormatType.AVI;

      // enable preview
      convertctrl.Preview = true;

      // play it!
      convertctrl.StartConvert();

      // get the video and video window info
      int vwt = convertctrl.VideoWindowTop;
      int vwl = convertctrl.VideoWindowLeft;
      int vwh = convertctrl.VideoWindowHeight;
      int vww = convertctrl.VideoWindowWidth;
      int vh = convertctrl.VideoHeight;
      int vw = convertctrl.VideoWidth;
      SizeMode sm = convertctrl.VideoWindowSizeMode;
      bool isFullScreen = convertctrl.FullScreenMode;

      if (vw > vww && vh > vwh && sm != SizeMode.Fit)
         convertctrl.VideoWindowSizeMode = SizeMode.Fit;
      else if (vw < vww && vh < vwh)
         convertctrl.VideoWindowSizeMode = SizeMode.Stretch;

      // set the play control to cover the form's client area
      convertctrl.SetVideoWindowPos(50, 0, this._form.ClientSize.Width, this._form.ClientSize.Height);

      // set the result
      _result = (convertctrl.VideoWindow != IntPtr.Zero);
   }
   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 (convertctrl.State == ConvertState.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

ConvertCtrl Class
ConvertCtrl Members
SetVideoWindowPos Method

 

 


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