←Select platform

SourceStream Property (ConvertCtrl)

Summary

Gets or sets the media source stream.

Syntax

C++

public virtual Stream SourceStream {get; set;}

Public Overridable Property SourceStream As Stream

public: 
virtual property Stream^ SourceStream { 
   Stream^ get(); 
   void set (    Stream^ ); 
}

Property Value

A System.IO.Stream object for the media source stream.

Remarks

This property allows the user to assign a Stream derived object as the media source for the conversion process. The SourceType will be set to SourceObjectType.Stream. 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.

Example

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"; 
}

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