WinAPI: midiInGetDevCaps 查询输入设备性能

//声明:
midiInGetDevCaps(
  DeviceID: UINT;      {设备 ID}
  lpCaps: PMidiInCaps; {TMidiInCaps 结构的指针}
  uSize: UINT          {TMidiInCaps 结构的大小}
): MMRESULT;       {成功返回 0; 可能的错误值见下:}

MMSYSERR_BADDEVICEID = 2;  {设备ID超界}
MMSYSERR_NODRIVER    = 6;  {没有安装驱动程序}

//TMidiInCaps 是 tagMIDIINCAPSA 结构的重定义:
tagMIDIINCAPSA = record
  wMid: Word;                  {商家 ID}
  wPid: Word;                  {产品 ID}
  vDriverVersion: MMVERSION;   {版本号; 高位字节是主版本号、低位字节是次版本号}
  szPname: array[0..MAXPNAMELEN-1] of AnsiChar;  {产品名称}
  dwSupport: DWORD;            {设备支持的其他功能}
end;

//设备支持的其他功能 dwSupport:
MIDICAPS_VOLUME   = $0001; {支持音量控制}
MIDICAPS_LRVOLUME = $0002; {支持左右声道音量控制}
MIDICAPS_CACHE    = $0004; {支持音色高速缓存}
MIDICAPS_STREAM   = $0008; {设备直接支持 midiStreamOut}


//举例: