С помощью функции Beep можно выводить звуковой сигнал. напишите это слово по
событию OnTimer для компонента TTimer и вы услышите звуковые сигналы. Теперь вы
сможете запрещать или разрешать подобные Beep'ы.
uses shellapi;
//выключить
systemparametersinfo(spi_setbeep, 0, nil, 0);
//включить
systemparametersinfo(spi_setbeep, 1, nil, 0);
|
| 
