LEADTOOLS Multimedia (Leadtools.Multimedia assembly)

VideoHeight Property (ConvertCtrl)

Show in webframe
Example 



Gets the current video height in pixels.
Syntax
'Declaration
 
Public Overridable ReadOnly Property VideoHeight As Integer
'Usage
 
Dim instance As ConvertCtrl
Dim value As Integer
 
value = instance.VideoHeight
public virtual int VideoHeight {get;}
public:
virtual property int VideoHeight {
   int get();
}

Property Value

A value representing the correct video height in pixels.
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
VideoWidth Property

 

 


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