Discussion :

[poly128]

Comment jouer deux sons qui sont dans un fichier ressource en meme temp sans passer par un mediaplayer ?

[poly128]

Personne ne sait comment ?

[Jipété]

deux sons qui sont dans un fichier ressource

ça devient deux fichiers distincts, une fois extraits du fichier ressources, il me semble ?
Auquel cas ça me semble mission impossible : comment veux-tu envoyer 2 fichiers en même temps à une seule carte son, mmmh ?
--
jp

[Droïde Système7]

Bonjour,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

SndPlaySound('C:\zizique.wav', SND_ASYNC);

Pas possible de placer le second son en thread et de synchroniser les deux ensemble, cela les mixerait-il ?

En électronique cela se nomme le multiplexage, en informatique, j'en sais rien encore

[Jipété]

Salut J-P !

Ah, on reconnait bien là les bidouilleurs !
J'y ai pensé une fraction de nanoseconde, mais ch'suis pas sûr que le pilote de la carte son soit d'accord,
Maintenant, si quelqu'un a déjà réussi ça, vite vite qu'il colle son code ici, qu'on puisse copier !

Sinon, multiplexage, t'es sûr que tu confonds pas avec mixage ?
Car, pour vraiment multiplexer, il faudrait découper chaque fichier en tout 'tits' bouts que les threads (je connais quasiment pas ces bestiaux) enverraient à la carte son, ch'sais pas trop c'que ça pourrait donner...

Mes 2 cts, en attendant d'autres avis éclairés !
--
jp

[Sub0]

Avec DirectSound :
http://sub0.developpez.com/FormatWAV/mixsound.zip

Les samples sont mis en mémoire avant la lecture. Il est possible de choisir la fréquence, le panning (balance canal droit gauche), la position de départ (offset), le volume de chaque piste. La démo utilise des samples mono. Pour jouer un sample stéréo, il faut utiliser 2 pistes. Tu trouveras des démos DirectSound pour enregistrer et jouer des samples direct-to-disk avec DirectSound sur le net. Cela permet de pouvoir jouer simultannément autant de sample que l'on veut (limité par la puissance du système).

[poly128]

Merci a Sub0 ca marche impec.

[LadyWasky]

Allez, hop, j'ai trouvé un machin qui permet de le faire en DirectX (DirectSound)

Vous trouverez une unité snd_main.pas à ajouter à votre projet.
Ensuite l'utilisation est archi-simplissime

1) Vous initialisez DirectX SND_init(Handle) Handle est le Handle de la fenètre principale de votre application
2) et chargez les sons avec SND_add qui renvoi un entier qui identifie votre son de manière unique, à garder au chaud pour la suite
n1:=SND_add('son1.wav');
n2:=SND_add('son1.wav');
n3:=SND_add('son1.wav');

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
procedure TForm1.FormCreate(Sender: TObject);
begin
// Sound engine initialization
  if not SND_init(Handle) then
    Halt;
// Load samples
  Button1.Tag := SND_add('snd1.wav');
  Button2.Tag := SND_add('snd2.wav');
  Button3.Tag := SND_add('snd3.wav');
end;

3) pour jouer un son, vous utilisez SND_play en lui indiquant le numéro de votre son, la position du son (X : à gauche ou à droite, Y : devant ou derrière),si vous souhaitez le jouer en boucle ou non
SND_play(n2);

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
procedure TForm1.ButtonClick(Sender: TObject);
const
  offset = 768;
var
  X : Single;
begin
// Calc X position for sample (not listener)
  if Sender = Button1 then
    X := TrackBar3.Position
  else
    if Sender = Button2 then
      X := TrackBar4.Position
    else
      X := TrackBar5.Position;
// Play selected sample
  SND_play((Sender as TButton).Tag, X * 128);
end;

4) Et pour libérer les ressources, vous terminez par :
SND_free;

Le mieu, c'est essayer l'exemple que je vous fourni dans le zip

[poly128]

La j'ai un probleme avec le code de waskol. Le programme marche très bien avec les sons fourni ,mais avec mes sons il plante: Lecture au-dela de la fin du fichier. Mais si je lui donne un fichier wav de meilleur qualité, il marche.

[LadyWasky]

La j'ai un probleme avec le code de waskol. Le programme marche très bien avec les sons fourni ,mais avec mes sons il plante: Lecture au-dela de la fin du fichier. Mais si je lui donne un fichier wav de meilleur qualité, il marche.

C'est marrant (enfin non ), parce que chez moi ça marche avec des sons pourris (11KHz ou 8KHz, mono).

Par contre, tout mes sons sont au format PCM.

Sinon, la démo est faite pour des sons de 22KHz, si tu as une impression de lecture trop rapide du son ou trop lente, c'est parce que tes sons ont un taux d'échantillonnage différent : dans ce cas utilises la trackbar du bas pour ajuster la vitesse de lecture de directX pour l'ajuster à ta fréquence d'échantillonnage.

Mais alors, je ne comprend pas encore le pourquoi du sa plante chez toi, chez moi je n'ai pas réussi à faire planter la démo
Pourrais-tu poster ici les sons (enfin, un seul peut suffire) qui te posent problème, celà me permettrait d'y voir plus clair. Merci

[poly128]

Tout les sons de basse qualité ne marche pas. Meme les sons qui ont exactement le meme format que ceux fournie avec l'exemple ne marche pas.

Son qui marche pas.zip