Eigene Playlist will nicht
Verfasst: 19.09.2004 13:08
Hallo,
ich habe ein Problem, ich möchte eine Fuktion in meinem Programm, die es Erlaubt zwischen 2 Sachen hin- und herzuschalten. Ich habe eine Art Playlist in meinem MP3 Player, man zieht einfach MP3 hinein, diese werden danach alle hintereinander abgespielt, ohne dass der Player jetzt neu anfängt zu Spielen. Jetzt möchte ich dies Abschaltbar machen, dass bei jeder neuen MP3 die hineingezogen wird, diese Gleich abgespielt wird und die alte stoppt.
Die Playlist läuft so:
Ich Schreibe alles in eine Liste:
Hier Listplaying() (wird durch Thread aufgerufen):
Ich habe jetzt schon lange Probiert wie ich die Playliste belassen kann, aber er soll bei jedem Drag gleich die Neue abspielen, nicht einträge in die Playlist hinzufügen. Habe schon mit KillThread Probiert geht alles nicht. Komme einfach nicht auf ne lösung *aufreg*
MFG Lukaso[/list]
ich habe ein Problem, ich möchte eine Fuktion in meinem Programm, die es Erlaubt zwischen 2 Sachen hin- und herzuschalten. Ich habe eine Art Playlist in meinem MP3 Player, man zieht einfach MP3 hinein, diese werden danach alle hintereinander abgespielt, ohne dass der Player jetzt neu anfängt zu Spielen. Jetzt möchte ich dies Abschaltbar machen, dass bei jeder neuen MP3 die hineingezogen wird, diese Gleich abgespielt wird und die alte stoppt.
Die Playlist läuft so:
Ich Schreibe alles in eine Liste:
Code: Alles auswählen
*dropped = DropFiles ()
num.l = DragQueryFile_ (*dropped , $FFFFFFFF, temp$, 0)
f$ = ""
If anstellen = 0
ClearList(playlist())
EndIf
For files = 0 To num - 1
AddElement(playlist())
playlist() = GetDropFile (*dropped, files)
Next
Disablemenu(0)
files.l = CountList(playlist())
ResetList(playlist())
count.l = 0
CreateThread(@Listplaying(), 0)
FreeDropFiles (*dropped) Code: Alles auswählen
Procedure Listplaying()
Repeat
If FSOUND_Stream_GetLength(hstream) = FSOUND_Stream_GetPosition(hstream)
SelectElement(playlist(), count)
Fmod_Close()
Fmod_Open(playlist())
Fmod_Play()
count + 1
EndIf
Delay(1)
Until files = count And FSOUND_Stream_GetLength(hstream) = FSOUND_Stream_GetPosition(hstream)
SetGadgetState(#Gadget_1, icon_stop)
EndProcedureMFG Lukaso[/list]