Иногда бывает необходимым выяснить, есть ли на компьютере, на котором запускается наша программа, установленная звуковая карта. В первую очередь это полезно программам, которую работают со звуком — например аудио\видео проигрыватели или компьютерные игры. Но также не будет лишним добавить такую проверку и в программу-инсталлятор, которая благодаря этому сможет заблаговременно предупредить пользователя, что у него нет звуковой платы и устанавливаемая программа работать не будет.
Сделать проверку можно при помощи функции модуля MMSystem, которая возвращает количество звуковых плат установленных в системе:
... uses MMSystem; ... if (WaveOutGetNumDevs > 0) then // есть звуковая плата else // нет