Leadtools.Multimedia Namespace > PlayCtrl Class : GetSubObject Method |
public virtual object GetSubObject( PlayObject objType )
'Declaration Public Overridable Function GetSubObject( _ ByVal objType As PlayObject _ ) As Object
'Usage Dim instance As PlayCtrl Dim objType As PlayObject Dim value As Object value = instance.GetSubObject(objType)
public virtual object GetSubObject( PlayObject objType )
function Leadtools.Multimedia.PlayCtrl.GetSubObject( objType )
public: virtual Object^ GetSubObject( PlayObject objType )
Public _result As Boolean = False Public _form As ConvertCtrlForm = New ConvertCtrlForm() Public Sub GetSubObjectExample() ' reference the convert 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_GetSubObjectExample.avi") Try ' set the input and output files convertctrl.SourceFile = inFile convertctrl.TargetFile = outFile ' set the audio and video compression convertctrl.VideoCompressors.Mpeg2.Selected = True convertctrl.AudioCompressors.AC3.Selected = True ' add the color adjustment processor convertctrl.SelectedVideoProcessors.Add(convertctrl.VideoProcessors.Color) ' access the processor directly Dim lmvc As LMVColor = TryCast(convertctrl.GetSubObject(ConvertObject.SelVideoProcessor), LMVColor) If Not lmvc Is Nothing Then ' change some settings lmvc.Brightness = 85 lmvc.Contrast = 85 lmvc.Enabled = True lmvc.EffectAreaEnabled = False Marshal.ReleaseComObject(lmvc) End If ' start the convert convertctrl.StartConvert() 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 GetSubObjectExample() { // reference the convert 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_GetSubObjectExample.avi"); try { // set the input and output files convertctrl.SourceFile = inFile; convertctrl.TargetFile = outFile; // set the audio and video compression convertctrl.VideoCompressors.Mpeg2.Selected = true; convertctrl.AudioCompressors.AC3.Selected = true; // add the color adjustment processor convertctrl.SelectedVideoProcessors.Add(convertctrl.VideoProcessors.Color); // access the processor directly LMVColor lmvc = convertctrl.GetSubObject(ConvertObject.SelVideoProcessor) as LMVColor; if (lmvc != null) { // change some settings lmvc.Brightness = 85; lmvc.Contrast = 85; lmvc.Enabled = true; lmvc.EffectAreaEnabled = false; Marshal.ReleaseComObject(lmvc); } // start the convert convertctrl.StartConvert(); } 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