Lecture musique

Je ne sais pas comment stopper le son durant la lecture, pourriez vous m'aider ?la commande STOP ne semble pas fonctionner avec sound

Code:: Label Open,plays,Stops

dim sound$,ok

ok=0
sound$="_"

sound 4

caption 0,"Lecteur de sons 0.3"
width 0,500
height 0,300

button 1
top 1,220
left 1,400
caption 1,"Lire"
on_click 1,plays

button 3
top 3,220
left 3,320
caption 3,"Stop"
on_click 3,Stops

main_menu 2

sub_menu 23
parent 23,2
caption 23,"Fichier"
sub_menu 231
parent 231,23
caption 231,"Ouvrir"
on_click 231,Open

end

Open:
open_dialog 2311
filter 2311,"Fichiers sons|*.wav;*.mp3"
sound$=file_name$(2311)
file_load 4, sound$
ok = 1
return

plays:
if ok <> 0
play 4
end_if
return

Peut_être utiliser PLAY_WAIT à la place de PLAY Question

Autre chose, tu as déclaré un LABEL stops mais tu ne l'a pas créer, d'ou une erreur.

Code:: Label Open,plays,Stops

dim sound$,ok

ok=0
sound$="_"

sound 4

caption 0,"Lecteur de sons 0.3"
width 0,500
height 0,300

button 1
top 1,220
left 1,400
caption 1,"Lire"
on_click 1,plays

button 3
top 3,220
left 3,320
caption 3,"Stop"
on_click 3,Stops

main_menu 2

sub_menu 23
parent 23,2
caption 23,"Fichier"
sub_menu 231
parent 231,23
caption 231,"Ouvrir"
on_click 231,Open

end

Open:
open_dialog 2311
filter 2311,"Fichiers sons|*.wav;*.mp3"
sound$=file_name$(2311)
file_load 4, sound$
ok = 1
return

plays:
if ok <> 0
play 4: ' VOIR SI PLAY_WAIT serait mieux
end_if
return

Stops:
' ?????????????????????
return

Juste pour montrer le label non déclaré.

A+

Invité

Facile!

Tu fais juste recharger le son ;

Citation :: sound 1
file_load 1,"Son.wav"
play 1
wait 2000
file_load 1,"Son.wav"

merci pour ta réponse Nicolas je vais essayer cela.

PS: Le label stops n'était pas écrit car je ne connaissais pas encore la commande a exécuter pour pouvoi stopper la lecture

» Répertoire de musique
» dessiner une musique
» Lecteur de musique
» Lecture d'une combo sur le web.
» lecture data