To answer my own question: MP3, WMA, and AIFF are possible; no sign of M4A.
Here is my version of CreateInputStream:
Private Function CreateInputStream(ByRef fileName As String) As WaveStream
Dim inputStream As WaveChannel32
Dim fReader As WaveStream
If fileName.EndsWith(".aiff") Then
fReader = New AiffFileReader(fileName)
ElseIf fileName.EndsWith(".mp3") Then
fReader = New Mp3FileReader(fileName)
ElseIf fileName.EndsWith(".wma") Then
fReader = New WMAFileReader(fileName)
Else
Throw New InvalidOperationException("Invalid file extension")
End If
inputStream = New WaveChannel32(fReader)
Return inputStream
End Function
↧