Products | Support | Email a link to this topic. | Send comments on this topic. | Back to Introduction | Help Version 19.0.2.9
|
Leadtools.Multimedia Namespace > PlayCtrl Class : SourceStream Property |
public virtual Stream SourceStream {get; set;}
'Declaration
Public Overridable Property SourceStream As Stream
'Usage
Dim instance As PlayCtrl Dim value As Stream instance.SourceStream = value value = instance.SourceStream
Imports Leadtools Imports Leadtools.Multimedia Imports LeadtoolsMultimediaExamples.Fixtures Public _result As Boolean = False Public _form As PlayCtrlForm = New PlayCtrlForm() Public Sub SourceStreamExample() ' reference the play control Dim playctrl As PlayCtrl = _form.PlayCtrl ' input and output file names Dim inFile As String = Path.Combine(LEAD_VARS.MediaDir, "PlayCtrl_Source.avi") Try ' turn off auto start playctrl.AutoStart = False ' subscribe to the complete event to check our result AddHandler playctrl.MediaEvent, AddressOf PlayCtrl_MediaEvent ' set the source stream playctrl.SourceStream = New StreamReader(inFile).BaseStream ' set the allowed streams playctrl.AllowedStreams = StreamFormatType.AudioVideoCC ' play it! playctrl.Run() 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 playctrl.State = PlayState.Running Application.DoEvents() Loop End Sub Private Sub PlayCtrl_MediaEvent(ByVal sender As Object, ByVal e As MediaEventArgs) ' set the result If e.eventCode = MediaEventCode.EC_COMPLETE Then _result = True End If 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.Multimedia; using LeadtoolsMultimediaExamples.Fixtures; public bool _result = false; public PlayCtrlForm _form = new PlayCtrlForm(); public void SourceStreamExample() { // reference the play control PlayCtrl playctrl = _form.PlayCtrl; // input and output file names string inFile = Path.Combine(LEAD_VARS.MediaDir,"PlayCtrl_Source.avi"); try { // turn off auto start playctrl.AutoStart = false; // subscribe to the complete event to check our result playctrl.MediaEvent += new MediaEventHandler(PlayCtrl_MediaEvent); // set the source stream playctrl.SourceStream = new StreamReader(inFile).BaseStream; // set the allowed streams playctrl.AllowedStreams = StreamFormatType.AudioVideoCC; // play it! playctrl.Run(); } 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 (playctrl.State == PlayState.Running) Application.DoEvents(); } void PlayCtrl_MediaEvent(object sender, MediaEventArgs e) { // set the result if (e.eventCode == MediaEventCode.EC_COMPLETE) _result = true; } static class LEAD_VARS { public const string MediaDir = @"C:\Program Files (x86)\LEAD Technologies\LEADTOOLS 19\Media"; }