Jouer et arrêter un son wav
Contenu du snippet
En Delphi pour jouer un son Wav, c'est très simple.
Pour commencer ajoutez mmSystem dans uses.
Le programme n'attend pas la fin que la lecture du son soit finie pour jouer un autre son Wav :
sndPlaySound('c:\monSon.wav', SND_ASYNC);
Le programme attend la fin de la lecture pour jouer le son :
sndPlaySound('c:\monSon.wav', SND_SYNC);
Le programme joue le son Wav en boucle :
sndPlaySound('c:\monSon.wav', SND_LOOP or SND_ASYNC);
Le programme joue un son sauf si un autre son Wav et entrain d'être joué :
sndPlaySound('c:\monSon.wav', SND_NOSTOP or SND_ASYNC);
Par exemple :
uses mmSystem;
procedure TForm1.Button1Click(Sender: TObject);
begin
sndPlaySound('c:\Windows\Media\Notify.wav', SND_ASYNC);
end;
Compatibilité : Delphi 5
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.