Products | Support | Email a link to this topic. | Send comments on this topic. | Back to Introduction | Help Version 19.0.2.9
|
Leadtools.MediaFoundation Namespace > ConvertCtrl Class : SourceStream Property |
public virtual Stream SourceStream {get; set;}
'Declaration
Public Overridable Property SourceStream As Stream
'Usage
Dim instance As ConvertCtrl Dim value As Stream instance.SourceStream = value value = instance.SourceStream
Assignment can raise error exception. For more information, refer to the Error Codes.
Note: When setting this property, the convert control must be in the stopped state.Imports Leadtools Imports Leadtools.MediaFoundation Imports LeadtoolsMediaFoundationExamples.Fixtures Public _result As Boolean = False Public _form As ConvertCtrlForm = New ConvertCtrlForm() ' input and output file names Public _inFile As String = Path.Combine(LEAD_VARS.MediaDir, "ConvertCtrl_Source.avi") Public _outFile As String = Path.Combine(LEAD_VARS.MediaDir, "ConvertCtrl_SourceStreamExample.wmv") Public Sub SourceStreamExample() ' reference the convert control Dim convertctrl As ConvertCtrl = _form.ConvertCtrl Try ' set the source stream convertctrl.SourceStream = New StreamReader(_inFile).BaseStream ' set the target file convertctrl.TargetFile = _outFile ' select WMV target format convertctrl.TargetFormat = TargetFormatType.WMV ' select video and audio target formats for the output Dim index As Integer = -1 Dim trgvideoformats As TargetVideoFormats = convertctrl.TargetFormats(convertctrl.TargetFormat).VideoFormats index = trgvideoformats.IndexOf("{33564D57-0000-0010-8000-00AA00389B71}") ' Windows Media Video 9 (WMV) trgvideoformats.Selection = index Dim trgaudioformats As TargetAudioFormats = convertctrl.TargetFormats(convertctrl.TargetFormat).AudioFormats index = trgaudioformats.IndexOf("{00000161-0000-0010-8000-00AA00389B71}") ' Windows Media Audio (WMA) trgaudioformats.Selection = index ' subscribe to the complete event to check our result AddHandler convertctrl.Complete, AddressOf ConvertCtrl_Complete ' set the allowed streams convertctrl.AllowedStreams = StreamFormatType.Video ' convert it! 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 Private Sub ConvertCtrl_Complete(ByVal sender As Object, ByVal e As EventArgs) ' set the result _result = File.Exists(_outFile) 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.MediaFoundation; using LeadtoolsMediaFoundationExamples.Fixtures; public bool _result = false; public ConvertCtrlForm _form = new ConvertCtrlForm(); // input and output file names public string _inFile = Path.Combine(LEAD_VARS.MediaDir,"ConvertCtrl_Source.avi"); public string _outFile = Path.Combine(LEAD_VARS.MediaDir,"ConvertCtrl_SourceStreamExample.WMV"); public void SourceStreamExample() { // reference the convert control ConvertCtrl convertctrl = _form.ConvertCtrl; try { // set the source stream convertctrl.SourceStream = new StreamReader(_inFile).BaseStream; // select video and audio target formats for the output int index = -1; TargetVideoFormats targetvideoformats = convertctrl.TargetFormats[convertctrl.TargetFormat].VideoFormats; index = targetvideoformats.IndexOf("{33564D57-0000-0010-8000-00AA00389B71}");// Windows Media Video 9 (WMV) targetvideoformats.Selection = index; TargetAudioFormats targetaudioformats = convertctrl.TargetFormats[convertctrl.TargetFormat].AudioFormats; index = targetaudioformats.IndexOf("{00000161-0000-0010-8000-00AA00389B71}");// Windows Media Audio (WMA) targetaudioformats.Selection = index; // select the WMV target format convertctrl.TargetFormat = TargetFormatType.WMV; // set the target file and format convertctrl.TargetFile = _outFile; // subscribe to the complete event to check our result convertctrl.Complete += new EventHandler(ConvertCtrl_Complete); // set the allowed streams convertctrl.AllowedStreams = StreamFormatType.Video; // convert it! 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(); } void ConvertCtrl_Complete(object sender, EventArgs e) { // set the result _result = File.Exists(_outFile); } static class LEAD_VARS { public const string MediaDir = @"C:\Program Files (x86)\LEAD Technologies\LEADTOOLS 19\Media"; }