Top des logiciels
1. HxD Hex Editor 1.6.1 (322 fois)
2. Open Office 2.2.1 (275 fois)
3. Delphi 6 (244 fois)
4. Windows Live Messenger (171 fois)
5. FireFox 2.0.0.12 (130 fois)
En bref
18 Août 2008 
Windows 7 : tout savoir sur le prochain système de Microsoft
13 Août 2008 The Pirate Bay censuré en Italie - L'arrêt de mort du réseau P2P ?
11 Août 2008 Hop : le nouveau téléphone jetable à 15€
04 Août 2008 OVH : la lutte contre le P2P commence
28 Juil 2008 Cuil : le futur concurrent de Google ?
Les derniers dossiers
Google : le maître des noms de domaines
La nouvelle version de GMail en images !
Barème de rémunération pour les disques durs multimédias
Les ressources Delphi et C/C++
Afficher la date et heure du jour
TatNum : gestion des images avec Qt
Membres en ligne :
Nos partenaires
À votre tour, devenez partenaire de mx-dev.net.
Informations sur le snippet :
Auteur : Matt 261
Catégorie : Audio-Vidéo
Niveau : Débutant
Posté le : 29 Octobre 2007 à 21h17
Description :
Avec Delphi, jouer un son Wav est un jeu d'enfant.
Pour commencer ajoutez mmSystem dans uses.
Code Source :
//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;