Проиграть Wav-файл - Free Pascal

Формулировка задачи:

Привет, каким образом можно в pascal проиграть wav файл? Нашел в интернете про mmsystem, но не знаю, где скачать этот модуль, можете кинуть ссылочки ? Заранее благодарен!

Решение задачи: «Проиграть Wav-файл»

Листинг программы

mciSendString(PChar('Play "H.wav"'), nil, 0, 0);
mciSendString(PChar('Play "S.wav"'), nil, 0, 0);

Объяснение кода листинга программы

mciSendString - функция для управления звуковой картой компьютера, используется для проигрывания аудиофайлов.
PChar - функция для преобразования строки в указатель на строку символов.
`PlayH.wav' - строка, которая содержит команду для проигрывания файла с именем H.wav.
nil - значение, которое указывает на отсутствие указателя.
0 - значение, которое указывает на отсутствие параметров.
`PlayS.wav' - строка, которая содержит команду для проигрывания файла с именем S.wav.