Leadtools.Multimedia Namespace > ConvertCtrl Class : GetSubObject Method |
public virtual object GetSubObject( ConvertObject objType )
'Declaration Public Overridable Function GetSubObject( _ ByVal objType As ConvertObject _ ) As Object
'Usage Dim instance As ConvertCtrl Dim objType As ConvertObject Dim value As Object value = instance.GetSubObject(objType)
public virtual object GetSubObject( ConvertObject objType )
function Leadtools.Multimedia.ConvertCtrl.GetSubObject( objType )
public: virtual Object^ GetSubObject( ConvertObject objType )
For more information, refer to the Error Codes.
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