Discussion :

[Monsieur Griboux]

Bonjour,

Je voudrais faire un programme pascal qui joue des sons, mais avec le code ci-dessous :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
program musique;
uses MMSystem;
 
begin
 
	sndPlaySound('C:\Users\Roger\Documents\pascal\la.wav',SND_NODEFAULT Or SND_ASYNC);
	delay(500);
	sndPlaySound('C:\Users\Roger\Documents\pascal\mi.wav',SND_NODEFAULT Or SND_ASYNC);
	readln;	
 
end.

le fait de jouer le second son coupe le premier son au lieu de se superposer à lui.

Y a-t-il un moyen de jouer deux sons simultanément, c'est-à-dire sur deux pistes distinctes ?

[Roland Chastain]

Bonjour !

En faisant une recherche sur le sujet je suis tombé sur cet exemple qui montre comment jouer plusieurs sons en même temps mais ce n'est pas à partir de fichiers.

Ci-joint l'exemple monté en version console. Testé avec la version courante de Free Pascal : ça fonctionne.

[Paul TOTH]

Roland, ton exemple c'est pour un son MIDI pas pour du WAV

Pour joueur plusieurs son en même temps il y a deux solutions, mixer soit même les fichiers en un seul WAV ou passer par DirectSound.

Mon MP3Player en est un exemple.

[Monsieur Griboux]

Merci pour vos réponses qui me sont d'une grande aide