[Roman Go]

процедура Beep воспроизводит стандартный звуковой сигнал

Добавлено:

Оператор PlaySound('c:\win95\media\Звук Microsoft.wav',0,SND_ASYNC); воспроизводит асинхронно и однократно стандартный звук Microsoft, который вы обычно можете слышать при открытии Windows. Оператор PlaySound('SystemStart',0,SND_ASYNC); воспроизведет тот же самый звук, но обращение к нему производится по системному псевдониму. Оператор PlaySound('c:\win95\media\Звук Microsoft.wav', 0,          SND_ASYNC or SND_LOOP); многократно асинхронно воспроизводит стандартный звук Microsoft, начиная его снова и снова, как только он заканчивается. При таком операторе надо предусмотреть в приложении какую-нибудь кнопку, по которой воспроизведение прерывается заданием нового звука или выполнением оператора PlaySound(0,0, SND_PURGE);

[vasketsov]

Soldie
Если надо совсем противный будильник - в kernel32.dll есть функция Beep.