如何用delphi实现扬声器发出一定频率的声音

2026-05-18 17:20:26

推荐回答（2个）

回答1：

在 delphi 里，可以使用以下方法来操作系统的声音：

最简单的办法是调用 windows API 里的 Beep 函数，这种办法在指定持续时间内，发出特定频率的声音，具体的音符与频率关系，你可以搜索“音符与频率对照表”：

调用代码如下：

  Winapi.Windows.Beep(频度, 时长);  //高版本delphi
  Windows.Beep(频度, 时长); //XE之前的版本

回答2：

Windows.Beep(800, 500); 800是频率，500是播放毫秒数。