Leadtools.Multimedia Namespace > PlayCtrl Class : Rate Property |
Reverse playback is supported only for ISO/MP4 files and only for video streams. In reverse playback mode, only the key frames are played, so playback is jerky (especially at low speeds).
Imports Leadtools Imports Leadtools.Multimedia Imports LeadtoolsMultimediaExamples.Fixtures Public _result As Boolean = False Public _form As PlayCtrlForm = New PlayCtrlForm() Private _duration As Double = 0.0 Private _currentPos As Double = -1 Public Sub PlayExample() ' reference the play control Dim playctrl As PlayCtrl = _form.PlayCtrl ' input file Dim inFile As String = Path.Combine(LEAD_VARS.MediaDir, "PlayCtrl_Source.avi") Try ' set autostart to false playctrl.AutoStart = False ' set the play count to 2 playctrl.PlayCount = 2 ' set our source media file playctrl.SourceFile = inFile ' get the reported duration _duration = playctrl.Duration ' set the playback rate to 2x If playctrl.IsRateSupported(2.0) Then playctrl.Rate = 2.0 End If ' set event handler to get tracking position changes AddHandler playctrl.TrackingPositionChanged, AddressOf PlayCtrl_TrackingPositionChanged ' run 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 ' set the result to determine if the reported duration ' is the same as the final position from tracking _result = (_duration = _currentPos AndAlso _duration > 0.0) End Sub Private Sub PlayCtrl_TrackingPositionChanged(ByVal sender As Object, ByVal e As TrackingPositionChangedEventArgs) ' get the frame and tracking positions for demonstration only Dim frame As Integer = _form.PlayCtrl.CurrentFramePosition Dim tracking As Integer = _form.PlayCtrl.CurrentTrackingPosition ' get the current position _currentPos = Math.Max(_currentPos, _form.PlayCtrl.CurrentPosition) End Sub Public NotInheritable Class LEAD_VARS Public Const MediaDir As String = "C:\Program Files (x86)\LEAD Technologies\LEADTOOLS 18\Media" End Class
using Leadtools; using Leadtools.Multimedia; using LeadtoolsMultimediaExamples.Fixtures; public bool _result = false; public PlayCtrlForm _form = new PlayCtrlForm(); double _duration = 0.0; double _currentPos = -1; public void PlayExample() { // reference the play control PlayCtrl playctrl = _form.PlayCtrl; // input file string inFile =Path.Combine(LEAD_VARS.MediaDir,"PlayCtrl_Source.avi"); try { // set autostart to false playctrl.AutoStart = false; // set the play count to 2 playctrl.PlayCount = 2; // set our source media file playctrl.SourceFile = inFile; // get the reported duration _duration = playctrl.Duration; // set the playback rate to 2x if (playctrl.IsRateSupported(2.0)) playctrl.Rate = 2.0; // set event handler to get tracking position changes playctrl.TrackingPositionChanged += new TrackingPositionChangedEventHandler(PlayCtrl_TrackingPositionChanged); // run 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(); // set the result to determine if the reported duration // is the same as the final position from tracking _result = (_duration == _currentPos && _duration > 0.0); } void PlayCtrl_TrackingPositionChanged(object sender, TrackingPositionChangedEventArgs e) { // get the frame and tracking positions for demonstration only int frame = _form.PlayCtrl.CurrentFramePosition; int tracking = _form.PlayCtrl.CurrentTrackingPosition; // get the current position _currentPos = Math.Max(_currentPos, _form.PlayCtrl.CurrentPosition); } static class LEAD_VARS { public const string MediaDir = @"C:\Program Files (x86)\LEAD Technologies\LEADTOOLS 18\Media"; }