C#
VB
C++
Gets or sets the current video window size mode.
public virtual SizeMode VideoWindowSizeMode { get; set; }
Public Overridable Property VideoWindowSizeMode As Leadtools.Multimedia.SizeMode
public:
virtual property Leadtools.Multimedia.SizeMode VideoWindowSizeMode {
Leadtools.Multimedia.SizeMode get();
void set ( Leadtools.Multimedia.SizeMode );
}
A SizeMode value representing the video window size mode. the default value is SizeMode.Fit.
The default size mode is SizeMode.Fit. Assignment can raise an error exception. For more information, refer to the Error Codes.
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