Error processing SSI file
LEADTOOLS Multimedia (Leadtools.Multimedia assembly)

Show in webframe

VideoWindowSizeMode Property (PlayCtrl)






Gets or sets the current video window size mode.
Syntax
public virtual SizeMode VideoWindowSizeMode {get; set;}
'Declaration
 
Public Overridable Property VideoWindowSizeMode As SizeMode
'Usage
 
Dim instance As PlayCtrl
Dim value As SizeMode
 
instance.VideoWindowSizeMode = value
 
value = instance.VideoWindowSizeMode
public:
virtual property SizeMode VideoWindowSizeMode {
   SizeMode get();
   void set (    SizeMode value);
}

Property Value

A SizeMode value representing the video window size mode. the default value is SizeMode.Fit.
Remarks
The default size mode is SizeMode.Fit. Assignment can raise an error exception. For more information, refer to the Error Codes.
Example
Copy Code  
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
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";
}
Requirements

Target Platforms

See Also

Reference

PlayCtrl Class
PlayCtrl Members

Error processing SSI file
Leadtools.Multimedia requires a Multimedia or Multimedia Suite license and unlock key. For more information, refer to: LEADTOOLS Toolkit Features