【发布时间】:2015-06-24 17:28:52
【问题描述】:
我有一个功能可以从运行良好的资源中读取我的 mp3。
不幸的是,如果我将鼠标按在按钮上 30、40 或 50 次,最终会导致 waveOut.init 崩溃:( {" AlreadyAllocated calling waveOutOpen "} )
Public waveOut As WaveOut = New WaveOut
Private Sub Panel_Bouton_MouseEnter(sender As Object, e As EventArgs) Handles Panel_Bouton.MouseEnter
Play_Sound()
End Sub
Public Sub Play_Sound()
Dim mp3file As MemoryStream = New MemoryStream(My.Resources.Clic)
'Clic.mp3 is in my Resources
Dim mp3Reader As Mp3FileReader = New Mp3FileReader(mp3file)
If waveOut.PlaybackState = PlaybackState.Playing Then
waveOut.Stop()
' I tried this but no effect...
End If
waveOut.Init(mp3Reader)
waveOut.Play()
End Sub
【问题讨论】: