代码如下:
 waveformIn.wFormatTag:=WAVE_FORMAT_PCM;
   waveformIn.nChannels:=1;
   waveformIn.nSamplesPerSec:=11025;
   waveformIn.nAvgBytesPerSec:=22050;
   waveformIn.nBlockAlign:=1;
   waveformIn.wBitsPerSample:=16;
   waveformIn.cbSize:=0;
   if WaveInOpen(@hWaveIn,WAVE_MAPPER,@waveformIn,handle,0,CALLBACK_WINDOW)
    <>MMSYSERR_NOERROR then
   begin
     ShowMessage('录音设备打开失败');
   end;