LEADTOOLS Multimedia (Leadtools.Multimedia assembly)

ScaleWidth Property (PlayCtrl)

Show in webframe
Example 



Specifies the width of the client area of the control.
Syntax
'Declaration
 
Public Overridable Property ScaleWidth As Single
'Usage
 
Dim instance As PlayCtrl
Dim value As Single
 
instance.ScaleWidth = value
 
value = instance.ScaleWidth
public virtual float ScaleWidth {get; set;}
public:
virtual property float ScaleWidth {
   float get();
   void set (    float value);
}

Property Value

A value representing the width.
Remarks
Assigning a value to this property does not change the actual width of the control, instead the current width is expressed using the value provided. This makes it possible to use a custom coordinate system. For example, if the ScaleWidth and ScaleHeight are both set to 100; then all coordinates can be expressed as percentage offsets.
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 18\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 18\Media";
}
Requirements

Target Platforms

See Also

Reference

PlayCtrl Class
PlayCtrl Members

 

 


Products | Support | Contact Us | Copyright Notices
© 2006-2014 All Rights Reserved. LEAD Technologies, Inc.

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