|
Geschrieben am: 20.04.2008 um 11:32 Uhr
|
|
Also ich will einen Wave Sound aus ner Ressource Datei abspielen.
Also mit SND_SYNC klappt das wunderbar, jedoch wird das Programm solang unterbochen bis der Sound abgespielt wurde und da dieser etwas länger ist, ist das schon ziemlich nervig.
Ich habs jetz stattdessen mal mit SND_ASYNC probiert - funktioniert aber nicht.
An was könnte das liegen? Oder gibt es eine ander Möglichkeit?
Zitat:
Private Declare Function sndPlaySound Lib "winmm" Alias "sndPlaySoundA" (lpszSoundName As Any, ByVal uFlags As Long) As Long
Const SND_SYNC = &H0
Const SND_MEMORY = &H4
Const SND_ASYNC = &H1
Private Sub cmdWave_Click()
Dim bytSound() As Byte
bytSound = LoadResData("sound", "WAVE")
sndPlaySound bytSound(0), SND_ASYNC Or SND_MEMORY
End Sub
|