Leadtools.Multimedia Namespace > ConvertCtrl Class : VideoWindowTop Property |
public virtual int VideoWindowTop {get;}
'Declaration Public Overridable ReadOnly Property VideoWindowTop As Integer
'Usage Dim instance As ConvertCtrl Dim value As Integer value = instance.VideoWindowTop
public virtual int VideoWindowTop {get;}
get_VideoWindowTop();
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.avi") Try ' set the source for conversion convertctrl.SourceFile = inFile ' set the video and audio compressors convertctrl.VideoCompressors.Mpeg2.Selected = True convertctrl.AudioCompressors.AC3.Selected = True ' set the target output file and format convertctrl.TargetFile = outFile ' set the target output format convertctrl.TargetFormat = TargetFormatType.AVI ' 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 play control to cover the form's client area convertctrl.SetVideoWindowPos(50, 0, Me._form.ClientSize.Width, Me._form.ClientSize.Height) ' 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 175\Media"; End Class
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.avi"); try { // set the source for conversion convertctrl.SourceFile = inFile; // set the video and audio compressors convertctrl.VideoCompressors.Mpeg2.Selected = true; convertctrl.AudioCompressors.AC3.Selected = true; // set the target output file and format convertctrl.TargetFile = outFile; // set the target output format convertctrl.TargetFormat = TargetFormatType.AVI; // 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 play control to cover the form's client area convertctrl.SetVideoWindowPos(50, 0, this._form.ClientSize.Width, this._form.ClientSize.Height); // 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 175\Media"; }
Target Platforms: Windows 7, Windows Vista SP1 or later, Windows XP SP3, Windows Server 2008 (Server Core not supported), Windows Server 2008 R2 (Server Core supported with SP1 or later), Windows Server 2003 SP2