Beep
Génère un son d'une fréquence donnée.
Syntaxe
procedure Beep(frequency: Integer; duration: Integer)
frequency: fréquence du son en Hertz
duration: durée du son en millisecondes
Remarques
- Le son est émis par le haut-parleur interne de la carte mère (PC speaker). Dans ce cas, le volume n'est généralement pas réglable.
S'il n'y a pas de PC speaker, le son est émis par les haut-parleurs externes via la carte son. Dans ce cas, il faut faire attention au réglage du volume. - La fonction Beep est synchrone, c'est-à-dire que la suite du programme n'est exécutée que quand la durée duration est écoulée.
- Pour jouer un son ou une musique, il est possible d'utiliser la fonction PlaySound.
- NB : Microsoft a supprimé la fonctionnalité Beep dans certaines versions de Windows (notamment Vista et XP64) mais l'a réintroduit dans Windows 7 (source http://msdn.microsoft.com/en-us/library/ms679277(VS.85).aspx).
Exemples
// Produit un LA 440 pendant une seconde
Beep(440, 1000);
// "Au clair de la lune"
Beep(392, 300);
Beep(392, 300);
Beep(392, 300);
Beep(440, 300);
Beep(494, 600);
Beep(440, 600);
Beep(392, 300);
Beep(494, 300);
Beep(440, 300);
Beep(440, 300);
Beep(392, 600);
Beep(440, 1000);
// "Au clair de la lune"
Beep(392, 300);
Beep(392, 300);
Beep(392, 300);
Beep(440, 300);
Beep(494, 600);
Beep(440, 600);
Beep(392, 300);
Beep(494, 300);
Beep(440, 300);
Beep(440, 300);
Beep(392, 600);