Bass.dll - Abspielproblem

  • VB.NET

Es gibt 3 Antworten in diesem Thema. Der letzte Beitrag () ist von Schwammekk.

    Bass.dll - Abspielproblem

    Hi,

    ich benutze in meinem Player die Bass.dll.
    Soweit so gut^^
    Nun, wenn ich ein Lied abspielen will, muss ich die wiedergabe 2x starten...
    Das nervt natürlich.
    Wenn ich Manuelles Debuggen mache kommt, dass Stream = 0 ist...was eig. garnicht sein kann.

    Hier mal der Code:

    VB.NET-Quellcode

    1. Sub play()
    2. Bass.BASS_ChannelStop(stream)
    3. 'Bass.BASS_StreamFree(stream)
    4. If Not ListBox1.Items.Count = Nothing Then
    5. stream = Bass.BASS_StreamCreateFile(False, files(num), 0L, 0L, BASSFlag.BASS_STREAM_AUTOFREE Or BASSFlag.BASS_STREAM_PRESCAN)
    6. 'stream = Bass.BASS_StreamCreateFile(Bass.BassBool.BassFalse, files(num), 0, 0, Bass.StreamCreateFile.BASS_CREATEFILE_DEFAULT)
    7. Bass.BASS_ChannelPlay(stream, False)
    8. 'Bass.BASS_StreamPlay(stream, Bass.BassBool.BassTrue, B Bass.BASS_Free()ASSFlag.BASS_STREAM_AUTOFREE And BASSFlag.BASS_STREAM_PRESCAN)
    9. state = True
    10. Statuslabel.Text = "Spielt: " & IO.Path.GetFileName(files(num))
    11. End If
    12. End Sub

    Ich hoffe ihr könnt mir helfen...

    AliveDevil
    ich habs bei meinem Media Player so gemacht :

    VB.NET-Quellcode

    1. Public Sub Play
    2. Bass.BASS_StreamFree(stream)
    3. stream = Bass.BASS_StreamCreateFile(musik_pfad, 0, 0, BASSFlag.BASS_STREAM_AUTOFREE Or BASSFlag.BASS_STREAM_PRESCAN)
    4. Bass.BASS_ChannelPlay(stream, False)
    5. End Sub


    MFG Schwammekk