WinAPI: midiInOpen - 打开 MIDI 输入设备

提示:
因为其中的回调函数是在中断时间内访问的, 必须在 DLL 中; 要访问的数据都必须是在固定的数据段中; 除了
PostMessage
timeGetSystemTime
timeGetTime
timeSetEvent
timeKillEvent
midiOutShortMsg
midiOutLongMsg
OutputDebugString 外, 也不能有其他系统调用.

---

//声明:

midiInOpen(

  lphMidiIn: PHMIDIIN; {用于返回设备句柄的指针; 之后再调用其他函数应该使用这个句柄}

  uDeviceID: UINT;     {设备ID; 不可以指定为常量 MIDI_MAPPER = UINT(-1);}

  dwCallback: DWORD    {回调函数地址或窗口句柄; 若不使用回调机制, 设为 nil}

  dwInstance: DWORD    {给回调函数的实例数据; 不用于窗口}

  dwFlags: DWORD       {打开选项}

): MMRESULT;           {成功返回 0; 可能的错误值见下:}



MMSYSERR_BADDEVICEID = 2;  {设备ID超界}

MMSYSERR_ALLOCATED   = 4;  {指定的资源已被分配}

MMSYSERR_NOMEM       = 7;  {不能分配或锁定内存}



//打开选项 dwFlags 的可选值:

CALLBACK_NULL     = $00000000; {当 dwCallback 是 nil 时指定}

CALLBACK_WINDOW   = $00010000; {当 dwCallback 是窗口句柄时指定}

CALLBACK_FUNCTION = $00030000; {当 dwCallback 是函数指针时指定}



//如果选择窗口接受回调信息, 可能会发送到窗口的消息有:

MM_MIM_OPEN      = $3C1;

MM_MIM_CLOSE     = $3C2;

MM_MIM_DATA      = $3C3;

MM_MIM_LONGDATA  = $3C4;

MM_MIM_ERROR     = $3C5;

MM_MIM_LONGERROR = $3C6;



//如果选择函数接受回调信息, 可能会发送给函数的消息有:

MIM_OPEN      = MM_MIM_OPEN;

MIM_CLOSE     = MM_MIM_CLOSE;

MIM_DATA      = MM_MIM_DATA;

MIM_LONGDATA  = MM_MIM_LONGDATA;

MIM_ERROR     = MM_MIM_ERROR;

MIM_LONGERROR = MM_MIM_LONGERROR;


 
   




//举例: