Музыка в файле delphi
копируем в project из codegear 'brcc32.exe'
копируем в project wav файл например с названием 'sound'
создаем в project текстовый файл с названием wav файла например 'sound'
редактируем текстовый дописывая в него 'sound WAVE sound.wav'
переименовываем текстовый в .rc например 'sound.rc'
создаем батник и открываем cmd
пишем и выполняем 'brcc32.exe sound.rc'
в папке должен появиться файл 'sound.RES'
лезем в codegear дописываем
в 'uses' MMSystem
в 'implementation' название своего файла '{$R sound.RES}'
там где надо проиграть 'PlaySound('sound', HInstance, SND_RESOURCE + SND_ASYNC + SND_LOOP);'
в project manager добавляем свой .rc файл
!Если убрать 'SND_ASYNC' не будет выполнения пока файл не проиграет, с 'SND_ASYNC' выполнение с цикличным повтором музыки