Delphi ACM控件音频录播播放组件

Delphi 的音频开发里,ACM 控件真是个老朋友了,用得好的话,录音、播放、转码都不在话下。

TACMWaveIn控件是用来干嘛的?说白了就是录音,从声卡、麦克风抓音频数据挺方便。你设个DeviceID选输入源,配好Format,一招StartRecord就开始录了,录完StopRecord停下来,响应也快。

和它一对好搭档的就是TACMWaveOut控件,专门负责音频播放。操作方法差不多,设好FormatDeviceID,用Write把缓冲区的音频推过去就能放。做个播放器、语音提示系统之类的都挺适合。

要是你想让用户自己挑选编码器,那TACMDialog控件就派上用场了。它会弹出系统默认的 ACM 选择框,让人选压缩格式、采样率这些,自己调节音质也不是问题。

这些控件底层靠的是 Windows 的ACM API,支持不少格式,像PCMMP3ADPCM都能玩。更重要的是,你不用自己研究音频编解码的细节,控件全帮你封装好了,调用也不复杂。

如果你手上有那个叫delphi_componenty的压缩包,别急着删,里面有控件源码、使用例子,还有点文档,尤其对新接触 ACM 的朋友来说,挺值一看的。

如果你还想拓展下,不妨看看Delphi ACM 控件,语音聊天经典之作这篇文章,有些实战经验还蛮有启发的。

rar
delphi_acm.rar 预估大小:12个文件
folder
delphi_componenty 文件夹
folder
ACM-distribuce 文件夹
folder
ACMDialog 文件夹
file
acmdialog.txt 712B
file
ACMDialog.dcr 476B
file
ACMDialog.pas 1KB
file
msacm.pas 34KB
folder
ACMWaveOut 文件夹
file
acmwaveout.txt 316B
file
ACMWaveOut.dcr 716B
file
ACMWaveOut.pas 3KB
file
msacm.pas 34KB
folder
ACMWaveIn 文件夹
file
ACMWaveIn.pas 5KB
file
ACMWaveIn.dcr 716B
file
acmwavein.txt 580B
file
msacm.pas 34KB
rar 文件大小:21.5KB