Помогите с звуком

[Killbrum]

Как мне зделать так чтоб програма подгружала звук с каталога где она установлена?

[AlDelta]

MediaPlayer1.FileName := ExtractFilePath(Application.Exename)+ИмяФайла;
MediaPlayer1.Open;