Как проверить наличие возможности проиграть WAV (+)

← →
EarlVadim © (2005-09-26 09:55) [0]

Сорри, делаю первые шаги в Delphi.
В программе надо проиграть WAV, но не на всех компах есть звуковые платы. Нужна проверка возможности использования компонента MPlayer. Подскажите как организовать...

← →
Jeer © (2005-09-26 11:15) [1]

uses MMSystem;
//
WaveOutGetNumDevs > 0

← →
EarlVadim © (2005-09-26 11:18) [2]

СПАСИБО

← →
EarlVadim © (2005-09-26 11:21) [3]

А ещё вопрос назрел, как WAV внедрить в сам EXE, чтобы программа была одним файлом и не требовала наличия других файлов?

← →
Jeer © (2005-09-26 11:30) [4]

в ресурс ?

← →
k.e.a (2005-09-26 12:52) [5]

1) создаешь файл *.rc (mycool.rc)
2) в него пишешь: ly-ly rcdata loadoncall mywav.wav (имена файлов <= 8 символов)
3) компилируешь в ресфайл (brcc32.exe mycool.rc) получается *.res
4) подключаешь свой ресурс в пограмме ( {$R mycool.res} )
5) всё.

← →
EarlVadim © (2005-09-26 17:02) [6]

> ресурс ?

Да.
K.E.A. тут кой-чего описал, но у меня не получилось.
В тупик поставило "ly-ly".
Ну в общем mycool.res у меня не компилируется.

← →
k.e.a (2005-09-26 17:47) [7]

имя ресурса это, по нему в программе обращаться будешь к нужному ресурсу. Убери "-" это недопустимый символ

← →
EarlVadim © (2005-09-26 18:00) [8]

:) пасиб...

а всё-равно не работает. BRCC32.EXE после вызова с параметром имя файла сразу же закрывается ничего не произведя на свет....

СОРРИ - сделал, подцепил.
А как использовать в этот ресурс в MPlayer - буксую.
Ну объявил {$R...} но в свойствах MPlayer.FileName - всё-равно файл указать с диска надо....

EarlVadim © (26.09.05 18:36) [10]

Находишь ресурс, загружаешь, цепляешь на указатель и проигрываешь
sndPlaySound(wavPtr, SND_ASYNC or SND_MEMORY);

Можно попроще через PlaySound

см. win32.hlp

http://delphimaster.net/view/2-1127885290/

Как проверить наличие возможности проиграть WAV (+) Найти похожие ветки