在tcl腳本中播放.wav文件

Question

你好，我試圖在我的tcl腳本中播放一個.wav文件，但我無法這麼做。， 我試過安裝包聲音1.0，但它仍然不工作。我貼的.wav文件在C：/ bin和嘗試exec bell.wav但O/p說

couldn't execute "TTBell.WAV": no such file or directory 

我能幫助在這個或任何Windows API的幫助？

Answer 1

.WAV文件不是可執行文件，所以你不能像那樣運行它們。最簡單的方法就是通過START工具，就像這樣：

set thefile "bell.wav" 
exec {*}[auto_execok start] "" [file nativename [file normalize $thefile]] 

如果您正在使用舊的Tcl的（8.4或之前）改用這種錯綜複雜的形式：

set thefile "bell.wav" 
eval exec [auto_execok start] [list "" [file nativename [file normalize $thefile]]] 

在這兩種情況下，空參數（""）是必要由於在某些情況下START的奇怪...