//声明:
midiInGetErrorText(
mmrError: MMRESULT; {错误号}
lpText: PChar; {缓冲区}
uSize: UINT {缓冲区大小}
): MMRESULT; {成功返回 0; 失败再返回错误号, 可能的错误是:}
MMSYSERR_BADERRNUM = 9; {错误号超界}
//举例:
//声明:
midiInGetErrorText(
mmrError: MMRESULT; {错误号}
lpText: PChar; {缓冲区}
uSize: UINT {缓冲区大小}
): MMRESULT; {成功返回 0; 失败再返回错误号, 可能的错误是:}
MMSYSERR_BADERRNUM = 9; {错误号超界}
//举例:
本文转载自:http://www.cnblogs.com/del/archive/2008/02/22/1078257.html