midiloop.u32

下载
LoopMidi
语法:result:=LoopMidi(File)
说明:循环播放指定的MIDI文件。
返回值为0表示调用成功,返回值为99表示播放MIDI的设备不可用或者指定的MIDI文件不存在,或者是其它的MCI的出错值。

StopMidi
语法:result:=StopMidi(File)
说明:停止播放当前的MIDI文件。
返回值为0表示调用成功,否则说明MCI出错。