Сообщество Чайников

Вопрос

В файл ресурсов поместил звуковой файл. А как его проиграть?

Ответ

Если не считать неудобных способов с сохранением этого файла на диск, то можно вот так:

Private ZvBufer() As Byte
Private Const SND_ASYNC = &H1
Private Const SND_NODEFAULT = &H2
Private Const SND_MEMORY = &H4
Private Declare Function sndPlaySound Lib "WINMM.DLL" Alias "sndPlaySoundA" _
(lpszSoundName As Any, ByVal uFlags As Long) As Long

Использовать:

ZvBufer = LoadResData(101, "WAVE")
sndPlaySound ZvBufer(0), SND_ASYNC Or SND_NODEFAULT Or SND_MEMORY

shadow