C#
VB
C++
Gets the current video height in pixels.
public virtual int VideoHeight { get; }
Public Overridable ReadOnly Property VideoHeight As Integer
public:
virtual property int VideoHeight {
int get();
}
A value representing the correct video height in pixels.
using Leadtools;
using Leadtools.MediaFoundation;
using LeadtoolsMediaFoundationExamples.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.mp4");
try
{
// set the source for conversion
convertctrl.SourceFile = inFile;
// select MP4 target format
convertctrl.TargetFormat = TargetFormatType.MP4;
// select H264 video target format
int index = -1;
TargetVideoFormats targetvideoformats = convertctrl.TargetFormats[convertctrl.TargetFormat].VideoFormats;
index = targetvideoformats.IndexOf("{34363248-0000-0010-8000-00AA00389B71}");// H264
targetvideoformats.Selection = index;
// select AAC audio target format
TargetAudioFormats targetaudioformats = convertctrl.TargetFormats[convertctrl.TargetFormat].AudioFormats;
index = targetaudioformats.IndexOf("{00001610-0000-0010-8000-00AA00389B71}");// AAC
targetaudioformats.Selection = index;
// set the target output file and format
convertctrl.TargetFile = outFile;
// 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 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 19\Media";
}
Imports Leadtools
Imports Leadtools.MediaFoundation
Imports LeadtoolsMediaFoundationExamples.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.mp4")
Try
' set the source for conversion
convertctrl.SourceFile = inFile
' select MP4 target format
convertctrl.TargetFormat = TargetFormatType.MP4
' select H264 video target format
Dim index As Integer = -1
Dim trgvideoformats As TargetVideoFormats = convertctrl.TargetFormats(convertctrl.TargetFormat).VideoFormats
index = trgvideoformats.IndexOf("{34363248-0000-0010-8000-00AA00389B71}") ' H264
trgvideoformats.Selection = index
' select AAC audio target format
Dim trgaudioformats As TargetAudioFormats = convertctrl.TargetFormats(convertctrl.TargetFormat).AudioFormats
index = trgaudioformats.IndexOf("{00001610-0000-0010-8000-00AA00389B71}") ' AAC
trgaudioformats.Selection = index
' set the target output file and format
convertctrl.TargetFile = outFile
' 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 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 19\Media"
End Class
Raster .NET | C API | C++ Class Library | JavaScript HTML5
Document .NET | C API | C++ Class Library | JavaScript HTML5
Medical .NET | C API | C++ Class Library | JavaScript HTML5
Medical Web Viewer .NET