Jouer plusieurs sons en même temps

je voudrais savoir comment je peux faire pour jouer plusieurs sons en même temps,pcq je suis entrain de faire un petit jeu et je voudrais qu'en jouant,il y ait une musique de fond et qu'en même temps,il ya des sons qui se déclenchent certains moments suite à des événements.
Et je voudrais aussi savoir si c possible de pouvoir détecter une carte son en vb,car ds mon jeu,on peut choisir de jouer avec ou sans le son,mais si l'utilisateur choisit l'option 'avec son' et qu'il ya pas de carte son,je voudrais afficher un message.
Merci d'avance.

Il y a un truc qu'il faudrait que tu nous dise, est ce que tu utilise direct X pour le son ou si tu utilise le son par API ou autre...

Normalement il devrait pas y avoir de prob, en plus DX est concu pour ca et dans Windows c'est pareil...

Pour detecter la carte son g une soluce, on peut certainement faire mieux mais bon !
Tu vas sur mon site http://www.chez.com/adispagne/Page1Un.htm
Et tu telecharges le controle Activemovie, (il faut le mettre dans Win\System pour que ca marche)
Tu met un ctrl dans vb et il y a une propriete : IsSoundCardEnabled qui te dit si il y a ou pas une carte son !

Je pense que c'est la soluce a ton prob !
@+ et bonne prog !

t'as de la chance, c ce que je cherchais justement :)
voilà le truc : t'as sûrement déjà dû utiliser l'API playsound pour jouer des sons wav ?! Le pb c qu'il peut jouer un seul son à la fois et pas très rapidement.

Mieux vaut donc utiliser l'API :
Private Declare Function mciSendString Lib "winmm.dll" Alias "mciSendStringA" (ByVal lpstrCommand As String, ByVal lpstrReturnString As String, ByVal uReturnLength As Long, ByVal hwndCallback As Long) As Long

de la façon suivante:
Call mciSendString("OPEN " & var_sons & " Alias " & var_alias, 0, 0, 0) 'Ouvrir le son
Call mciSendString("Play " & var_alias, 0, 0, 0) 'Jouer le son en fonction de l'alias

Call mciSendString("Pause " & var_alias, 0, 0, 0) 'Pause ! Play pour continuer
Call mciSendString("Close " & var_alias, 0, 0, 0) 'arrête le son

Voilà !
Par contre,le son ne se lancera pas si le chemin d'accès du son est trop long. Je sais qu'on peut faire un chemin relatif mais je me souvient plus dans quelles conditions :)

Par contre, je peux pas t'aider pour reconnaître la carte son :(

enjoy :)

-------------------------------
Réponse au message :
-------------------------------

> je voudrais savoir comment je peux faire pour jouer plusieurs sons en même temps,pcq je suis entrain de faire un petit jeu et je voudrais qu'en jouant,il y ait une musique de fond et qu'en même temps,il ya des sons qui se déclenchent certains moments suite à des événements.
> Et je voudrais aussi savoir si c possible de pouvoir détecter une carte son en vb,car ds mon jeu,on peut choisir de jouer avec ou sans le son,mais si l'utilisateur choisit l'option 'avec son' et qu'il ya pas de carte son,je voudrais afficher un message.
> Merci d'avance.

au lieu de mettre le chemin complet du son, mieux vaut indiquer le chemin relatif : par ex, si le son se trouve dans le rep. sons de l'appli. :

call mciSendString("OPEN \sons\son.mp3 Alias son",0,0,0)
ne pas oublier le premier '\'

Aussi, les sons ne s'arreteront pas si tu quittes le prog.
pour arrêter tous les sons :

call mciSendString("CLOSE ALL",0,0,0)

enjoy :)


-------------------------------
Réponse au message :
-------------------------------

>
> t'as de la chance, c ce que je cherchais justement :)
> voilà le truc : t'as sûrement déjà dû utiliser l'API playsound pour jouer des sons wav ?! Le pb c qu'il peut jouer un seul son à la fois et pas très rapidement.
>
> Mieux vaut donc utiliser l'API :
> Private Declare Function mciSendString Lib "winmm.dll" Alias "mciSendStringA" (ByVal lpstrCommand As String, ByVal lpstrReturnString As String, ByVal uReturnLength As Long, ByVal hwndCallback As Long) As Long
>
> de la façon suivante:
> Call mciSendString("OPEN " & var_sons & " Alias " & var_alias, 0, 0, 0) 'Ouvrir le son
> Call mciSendString("Play " & var_alias, 0, 0, 0) 'Jouer le son en fonction de l'alias
>
> Call mciSendString("Pause " & var_alias, 0, 0, 0) 'Pause ! Play pour continuer
> Call mciSendString("Close " & var_alias, 0, 0, 0) 'arrête le son
>
> Voilà !
> Par contre,le son ne se lancera pas si le chemin d'accès du son est trop long. Je sais qu'on peut faire un chemin relatif mais je me souvient plus dans quelles conditions :)
>
> Par contre, je peux pas t'aider pour reconnaître la carte son :(
>
> enjoy :)
>
> -------------------------------
> Réponse au message :
> -------------------------------
>
> > je voudrais savoir comment je peux faire pour jouer plusieurs sons en même temps,pcq je suis entrain de faire un petit jeu et je voudrais qu'en jouant,il y ait une musique de fond et qu'en même temps,il ya des sons qui se déclenchent certains moments suite à des événements.
> > Et je voudrais aussi savoir si c possible de pouvoir détecter une carte son en vb,car ds mon jeu,on peut choisir de jouer avec ou sans le son,mais si l'utilisateur choisit l'option 'avec son' et qu'il ya pas de carte son,je voudrais afficher un message.
> > Merci d'avance.
>

bonjour a tous,
voila je n'arrive pas a lire mes sons wav avec ce code

Private Sub form_keypress(keyascii As Integer)
If keyascii = 97 Then 'touche a
Call mciSendString("OPEN \sons\fanfar1.wav alias son", 0, 0, 0)
Call mciSendString("Play \sons\fanfar1.wav alias son", 0, 0, 0)
End If
End Sub

pouriez vous me dire pourquoi?

merci