System Delphi

Title: How to play system sounds
uses
MMSystem;
PlaySound(PChar('SYSTEMSTART'), 0, SND_ASYNC);
{
Other System sounds:
Andere Systemsounds:
SYSTEMSTART
SYSTEMEXIT
SYSTEMHAND
SYSTEMASTERISK
SYSTEMQUESTION
SYSTEMEXCLAMATION
SYSTEMWELCOME
SYSTEMDEFAULT
}