Comment arrêter la lecture en cours de l'API
sndSoundPlay, lisant un fichier wav, par exemple
???
--
Merci beaucoup, au revoir et à bientôt :o)
------
Romans, logiciels, email, site personnel
http://irolog.free.fr/joe.htm
------------------------------------------------------------------------------------
Private Sub Command1_Click() ' Play sndPlaySound "C:WINDOWSMediaWindows XP Démarrage.wav", SND_ASYNC End Sub
Private Sub Command2_Click() ' Stop sndPlaySound 0&, SND_MEMORY End Sub
-- Cordialement,
Jacques.
LE TROLL
Bonjour Jacques, merci, oui, c'est la bonne API, je me suis trompé :o)
-- Merci beaucoup, au revoir et à bientôt :o) ------ Romans, logiciels, email, site personnel http://irolog.free.fr/joe.htm ------------------------------------------------------------------------------------ "Jacques93" a écrit dans le message de news:
| Bonjour LE TROLL, | LE TROLL a écrit : | > Bonjour, | > | > Comment arrêter la lecture en cours de l'API | > sndSoundPlay, lisant un fichier wav, par exemple | > ??? | > | | avec sndSoundPlay, je ne sais pas ;-) , mais avec sndPlaySound, par | exemple : | | Private Declare Function sndPlaySound Lib "winmm.dll" Alias _ | "sndPlaySoundA" (ByVal lpszSoundName As String, _ | ByVal uFlags As Long) As Long | | Private Const SND_ASYNC = &H1 | Private Const SND_MEMORY = &H4 | | Private Sub Command1_Click() | ' Play | sndPlaySound "C:WINDOWSMediaWindows XP Démarrage.wav", SND_ASYNC | End Sub | | Private Sub Command2_Click() | ' Stop | sndPlaySound 0&, SND_MEMORY | End Sub | | | -- | Cordialement, | | Jacques.
Bonjour Jacques, merci, oui, c'est la
bonne API, je me suis trompé :o)
--
Merci beaucoup, au revoir et à bientôt :o)
------
Romans, logiciels, email, site personnel
http://irolog.free.fr/joe.htm
------------------------------------------------------------------------------------
"Jacques93" <jacques@Nospam> a écrit dans le
message de news:
OT0KFceVIHA.5980@TK2MSFTNGP04.phx.gbl...
| Bonjour LE TROLL,
| LE TROLL a écrit :
| > Bonjour,
| >
| > Comment arrêter la lecture en cours de
l'API
| > sndSoundPlay, lisant un fichier wav, par
exemple
| > ???
| >
|
| avec sndSoundPlay, je ne sais pas ;-) , mais
avec sndPlaySound, par
| exemple :
|
| Private Declare Function sndPlaySound Lib
"winmm.dll" Alias _
| "sndPlaySoundA" (ByVal lpszSoundName As
String, _
| ByVal uFlags As Long) As Long
|
| Private Const SND_ASYNC = &H1
| Private Const SND_MEMORY = &H4
|
| Private Sub Command1_Click()
| ' Play
| sndPlaySound "C:WINDOWSMediaWindows XP
Démarrage.wav", SND_ASYNC
| End Sub
|
| Private Sub Command2_Click()
| ' Stop
| sndPlaySound 0&, SND_MEMORY
| End Sub
|
|
| --
| Cordialement,
|
| Jacques.
Bonjour Jacques, merci, oui, c'est la bonne API, je me suis trompé :o)
-- Merci beaucoup, au revoir et à bientôt :o) ------ Romans, logiciels, email, site personnel http://irolog.free.fr/joe.htm ------------------------------------------------------------------------------------ "Jacques93" a écrit dans le message de news:
| Bonjour LE TROLL, | LE TROLL a écrit : | > Bonjour, | > | > Comment arrêter la lecture en cours de l'API | > sndSoundPlay, lisant un fichier wav, par exemple | > ??? | > | | avec sndSoundPlay, je ne sais pas ;-) , mais avec sndPlaySound, par | exemple : | | Private Declare Function sndPlaySound Lib "winmm.dll" Alias _ | "sndPlaySoundA" (ByVal lpszSoundName As String, _ | ByVal uFlags As Long) As Long | | Private Const SND_ASYNC = &H1 | Private Const SND_MEMORY = &H4 | | Private Sub Command1_Click() | ' Play | sndPlaySound "C:WINDOWSMediaWindows XP Démarrage.wav", SND_ASYNC | End Sub | | Private Sub Command2_Click() | ' Stop | sndPlaySound 0&, SND_MEMORY | End Sub | | | -- | Cordialement, | | Jacques.