Contents ...
udn網路城邦
SoundPlay By AU3
2013/06/16 10:19
瀏覽190
迴響0
推薦0
引用0


#include <Sound.au3>

Local $aSound = _SoundOpen("C://HTSMini/Anna.wma")
If @error = 2 Then
    MsgBox(0, "Error", "The file does not exist")
    Exit
ElseIf @extended <> 0 Then
    Local $iExtended = @extended ; Assign because @extended will be set after DllCall.
    Local $tText = DllStructCreate("char[128]")
    DllCall("winmm.dll", "short", "mciGetErrorStringA", "str", $iExtended, "ptr", DllStructGetPtr($tText), "int", 128)
    MsgBox(0, "Error", "The open failed." & @CRLF & "Error Number: " & $iExtended & @CRLF & "Error Description: " & DllStructGetData($tText, 1) & @CRLF & "Please Note: The sound may still play correctly.")
Else
    MsgBox(0, "Success", "The file opened successfully")
EndIf

_SoundPlay($aSound, 1)

_SoundClose($aSound)

全站分類:興趣嗜好 電腦3C
自訂分類:不分類
上一則: Video Object Repeat player list

限會員,要發表迴響,請先登入