C#
VB
C++
Gets the top position of the video window in pixels.
public virtual int VideoWindowTop { get; }
Public Overridable ReadOnly Property VideoWindowTop As Integer
public:
virtual property int VideoWindowTop {
int get();
}
A value representing the top position of the video window in pixels.
Gets the top position of the video window in pixels. This value is relative to the Window Property.
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