Ferme un son pr�alablement ouvert avec _SoundOpen
#include <Sound.au3>
_SoundClose ( $aSndID )
$aSndID | Tableau d'identification du son retourn� par _SoundOpen() |
Succ�s: | Retourne 1. |
�chec: | Retourne 0 et d�finit @error <> 0. |
@error: |
1 = �chec 3 = ID du son invalide. Utiliser le tableau retourn� par _SoundOpen(). |
#include <MsgBoxConstants.au3> #include <Sound.au3> Local $aSound = _SoundOpen(@WindowsDir & "\media\tada.wav") If @error = 2 Then MsgBox($MB_SYSTEMMODAL, "Erreur", "Le fichier n'existe pas.") Exit ElseIf @extended <> 0 Then Local $iExtended = @extended ; Parce que @extended sera d�fini apr�s DllCall. Local $tText = DllStructCreate("char[128]") DllCall("winmm.dll", "short", "mciGetErrorStringA", "str", $iExtended, "ptr", DllStructGetPtr($tText), "int", 128) MsgBox($MB_SYSTEMMODAL, "Erreur", "L'ouverture du fichier a �chou�." & @CRLF & "Num�ro de l'erreur: " & $iExtended & @CRLF & "Description de l'erreur: " & DllStructGetData($tText, 1) & @CRLF & "Notez SVP: Le son peut encore jouer correctement.") Else MsgBox($MB_SYSTEMMODAL, "Succ�s", "Le fichier est ouvert avec succ�s.") EndIf If _SoundClose($aSound) Then MsgBox($MB_SYSTEMMODAL, "Succ�s", "Le son a �t� ferm� avec succ�s.") Else MsgBox($MB_SYSTEMMODAL, "Erreur", "La fermeture du fichier a �chou�.") EndIf