Usar eventos de som do Windows no Delphi

{ Evento Som Padrão }
MessageBeep(0); { ou Beep; }

{ Evento Parada Crítica }
MessageBeep(16);



{ Evento Pergunta }
MessageBeep(32);

{ Evento Exclamação }
MessageBeep(48);

{ Evento Asterisco }
MessageBeep(64);