请问想读取pcm格式的语音文件应该怎么办，有delphi控件可以做到吗？(100分)

我要进行pcm格式的语音文件管理，进行收听，删除等等。

我的e-mail:xujunjie@fm365.com

我也正在找这方面的资料,如果你找到的话也给我一份吧,我的E-MAIL:xujunjie
@fm365.com,谢谢!

Windows有一个PCM WaveFormat的结构（记的不太清楚），填充该结构，然后用
WaveInOpen之类的函数进行操作就可以了。
我的主页有个例子，单不完整，起一个抛砖引玉的效果
Http://person.zy.gz.cn/~bwyclq

Try!

TPCMWaveFormat = record
wf: TWaveFormat;
wBitsPerSample: Word;
end;


WaveFormat:=new(PPCMwaveFormat);
with WaveFormat^.wfdo

begin

WFormatTag := WAVE_FORMAT_PCM;
{PCM format - the only option!}
NChannels:=1;
{mono}
NSamplesPerSec:=11000;
{11kHz sampling}
NAvgBytesPerSec:=11000;
{we aim to use 8 bit sound so only 11k per second}
NBlockAlign:=1;
{only one byte in each sample}
waveformat^.wBitsPerSample:=8;
{8 bits in each sample}
end;


i:=waveOutOpen(nil,0,PWaveFormat(WaveFormat),0,0,WAVE_FORMAT_QUERY);
if i<>0 then

application.messagebox('Error', 'Play format not supported', mb_OK);

i:=waveInOpen(nil,0,PWaveFormat(WaveFormat),0,0,WAVE_FORMAT_QUERY);
if i<>0 then

application.messagebox('Error', 'Record format not supported', mb_OK);