//声明: waveOutGetErrorText( mmrError: MMRESULT; {错误号} lpText: PChar; {缓冲区} uSize: UINT {缓冲区大小} ): MMRESULT; {成功返回 0; 可能的错误值见下:} MMSYSERR_BADERRNUM = 9; {错误号超界} //举例: