NAudio prędkość odtwarzania (?)

[kamiljabłko]

Cześć!

 

Mam problem ze stworzeniem IWaveProvider do kontroli prędkości odtwarzania plików MP3.

 

Ten kod tylko odtwarza pliki MP3:

Imports NAudio
Imports NAudio.Wave
Public Class NAudioPlayer

Private Player As NAudio.Wave.WaveOutEvent
	Public Sub ButtonClick()
		Dim op As New OpenFileDialog
		op.Filter = "Mp3|*.mp3|Wszystkie pliki|*.*"
		If op.ShowDialog = DialogResult.OK Then
			Dim waveStream As WaveStream = New Mp3FileReader(op.FileName)
			Player = New WaveOutEvent()
			Player.Init(waveStream)
			Player.Play()
		End If
	End Sub
End Class

A potrzeba czegoś w tym rodzaju:

Imports NAudio
Imports NAudio.Wave
Public Class NAudioPlayer

Private Player As NAudio.Wave.WaveOutEvent
	Public Sub ButtonClick()
		Dim op As New OpenFileDialog
		op.Filter = "Mp3|*.mp3|Wszystkie pliki|*.*"
		If op.ShowDialog = DialogResult.OK Then
			Dim waveStream As WaveStream = New Speed(op.FileName) 'z czego "Speed" to klasa kontrolująca prędkość (implemenująca IWaveProvider)
			Player = New WaveOutEvent()
			Player.Init(waveStream)
			Player.Play()
		End If
	End Sub
End Class

Pomorze ktoś?

[Crossiik]

Masz tutaj "Pomorze"