C#
VB
C++
Gets the height of the video window.
public virtual float VideoWindowHeight { get; }
Public Overridable ReadOnly Property VideoWindowHeight As Single
public:
virtual property float VideoWindowHeight {
float get();
}
A value representing the video window height.
The value is in the units specified by the ScaleMode property.
using Leadtools;
using Leadtools.Multimedia;
using LeadtoolsMultimediaExamples.Fixtures;
public bool _result = false;
public PlayCtrlForm _form = new PlayCtrlForm();
public void VideoWindowExample()
{
// reference the play control
PlayCtrl playctrl = _form.PlayCtrl;
// input file
string inFile = Path.Combine(LEAD_VARS.MediaDir, "PlayCtrl_Source.avi");
try
{
// turn off auto start
playctrl.AutoStart = false;
// set the source file
playctrl.SourceFile = inFile;
// get the video window handle
IntPtr handle = playctrl.VideoWindow;
// get the video and video window info
float vwt = playctrl.VideoWindowTop;
float vwl = playctrl.VideoWindowLeft;
float vwh = playctrl.VideoWindowHeight;
float vww = playctrl.VideoWindowWidth;
float vh = playctrl.VideoHeight;
float vw = playctrl.VideoWidth;
ScaleMode scm = playctrl.ScaleMode;
float sch = playctrl.ScaleHeight;
float scw = playctrl.ScaleWidth;
float sct = playctrl.ScaleTop;
float scl = playctrl.ScaleLeft;
SizeMode sm = playctrl.VideoWindowSizeMode;
bool isFullScreen = playctrl.FullScreenMode;
// check sizes for sizemode setting
if (vw > vww && vh > vwh && sm != SizeMode.Fit)
playctrl.VideoWindowSizeMode = SizeMode.Fit;
else if (vw < vww && vh < vwh)
playctrl.VideoWindowSizeMode = SizeMode.Stretch;
// set the play control to cover the form's client area
playctrl.SetVideoWindowPos(0, 0, this._form.ClientSize.Width, this._form.ClientSize.Height);
// set the result to what we expect
_result = (handle != null);
// run the video
playctrl.Run();
}
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 (playctrl.State == PlayState.Running)
Application.DoEvents();
}
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 PlayCtrlForm = New PlayCtrlForm()
Public Sub VideoWindowExample()
' reference the play control
Dim playctrl As PlayCtrl = _form.PlayCtrl
' input file
Dim inFile As String = Path.Combine(LEAD_VARS.MediaDir, "PlayCtrl_Source.avi")
Try
' turn off auto start
playctrl.AutoStart = False
' set the source file
playctrl.SourceFile = inFile
' get the video window handle
Dim handle As IntPtr = playctrl.VideoWindow
' get the video and video window info
Dim vwt As Single = playctrl.VideoWindowTop
Dim vwl As Single = playctrl.VideoWindowLeft
Dim vwh As Single = playctrl.VideoWindowHeight
Dim vww As Single = playctrl.VideoWindowWidth
Dim vh As Single = playctrl.VideoHeight
Dim vw As Single = playctrl.VideoWidth
Dim scm As ScaleMode = playctrl.ScaleMode
Dim sch As Single = playctrl.ScaleHeight
Dim scw As Single = playctrl.ScaleWidth
Dim sct As Single = playctrl.ScaleTop
Dim scl As Single = playctrl.ScaleLeft
Dim sm As SizeMode = playctrl.VideoWindowSizeMode
Dim isFullScreen As Boolean = playctrl.FullScreenMode
' check sizes for sizemode setting
If vw > vww AndAlso vh > vwh AndAlso sm <> SizeMode.Fit Then
playctrl.VideoWindowSizeMode = SizeMode.Fit
ElseIf vw < vww AndAlso vh < vwh Then
playctrl.VideoWindowSizeMode = SizeMode.Stretch
End If
' set the play control to cover the form's client area
playctrl.SetVideoWindowPos(0, 0, Me._form.ClientSize.Width, Me._form.ClientSize.Height)
' set the result to what we expect
_result = (handle <> Nothing)
' run the video
playctrl.Run()
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 playctrl.State = PlayState.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