USER mmsystem<br><br><br>var<br> s: MCI_DGV_SETAUDIO_PARMS ;<br> H:Thandle;<br>begin<br> H := FindWindow(nil, 'Windows Media Player');<br> if H > 0 then<br> begin<br> SetForegroundWindow(H);<br> mciSendCommand(H,MCI_SETAUDIO, MCI_SET_OFF ,integer(@s));<br> end;<br>END;<br><br>但是沒有效果(沒有关闭声音)?????