Наши проекты:
Журнал · Discuz!ML · Wiki · DRKB · Помощь проекту |
||
ПРАВИЛА | FAQ | Помощь | Поиск | Участники | Календарь | Избранное | RSS |
[3.145.186.6] |
|
Сообщ.
#1
,
|
|
|
Win10. В дизайнере звук не проигрывается, в exe проигрывается. Некоторые wav-файлы вообще нигде не проигрываются, но при клике на них в проводнике запускается станд. проигрыватель Винды и всё звучит (не могу вложить из-за ограничений, файл не сжимается, ~2.5МБ).
Public Declare Function PlaySound Lib "winmm.dll" Alias "PlaySoundA" (ByVal lpszName As String, ByVal hModule As Long, ByVal dwFlags As Long) As Long Public Const SND_ASYNC = 1 Public Const SND_NOSTOP = &H10 Public Const SND_NOWAIT = &H2000 Тест (не проигрывается в дизайнере, играет в exe): Dim lRet As Long, sPath As String sPath = "E:\Temp\Музыка\err.wav" lRet = PlaySound(sPath, 0, SND_ASYNC Or SND_NOWAIT) If lRet <> 0 Then MsgBox "Звук проигрывается!" End If Добавлено wav-file https://ru.files.fm/u/qxqp8yz6 |
Сообщ.
#2
,
|
|
|
Оoooooчень длинный mp3, завернутый в wav контейнер. Playsound такое не любит. Используйте mciSendString например.
|
Сообщ.
#3
,
|
|
|
Какая PlaySoundA разница?
|
Сообщ.
#4
,
|
|
|
Почему-то разница есть.
|