Для работы со звуковыми файлами на форму нужно поместить объект "MediaPlayer".
Чтобы открыть звуковой файл, можно воспользоваться следующим кодом: Procedure Open_Wav(f:string);
begin
form1.MediaPlayer1.close;
form1.MediaPlayer1.FileName:=f;
try
form1.MediaPlayer1.Open;
except
end;
end;
Здесь "f" - это имя звукового файла.
Если указан не полный путь, то файл ищется в текущем каталоге.
Пример открытия и проигрывания звукового файла:
Open_Wav('zv4.wav');
try
form1.MediaPlayer1.Play;
except
end;
