Veja Também: NoSound
Exemplo:
Uses CRT;
Begin
Sound(220); { Beep }
Delay(200); { Espera 200 ms }
NoSound; { Para de fazer barulho }
End.