Идея метода
Идея заключается в том, чтобы запустить приложение SndRec32 с ключами -play -embedding -close методом ЗапуститьПриложение() с параметром ДожидатьсяОкончанияВыполнения = Ложь. это приводит к тому, что запускается программа с невидимым окном, воспроизводится звук, затем программа закрывается.
SndRec32 вопроизводит только файлы формата .wav, но это не мешает пожать звук кодеком mp3
Для работы требуется следующее:
- Программа SndRec32(есть среди стандартных программ в Windows XP, нет в Windows 7)
- Сам звуковой файл, который нужно вопроизвести в формате Wave(.wav)
Пример программы
// Распаковываем ресурсы
ФайлSndRec32 = ПолучитьИмяВременногоФайла(".exe");
ПолучитьМакет("SndRec32").Записать(ФайлSndRec32);
ФайлЗвукМонетка = ПолучитьИмяВременногоФайла(".wav");
ПолучитьМакет("ЗвукМонетка").Записать(ФайлЗвукМонетка);
// Запускаем SndRec32 и не дожидаемся окончания выполнения
ЗапуститьПриложение(ФайлSndRec32 + " """ + ФайлЗвукМонетка + """ -play -embedding -close ",, Ложь);
Приложена обработка-пример для обычного приложения
Так же советую почитать комментарии к этой публикации - в них размещены интересные методы