pascal - Lazarus Pascal 蜂鸣命令

Question

我在 Windows 上运行 Lazarus。我真的很想制作“Beep”程序。看来你可以在 Pascal 中使用:

windows.beep(300,500);

但不是在拉撒路!我可以使用另一个命令吗？

更新:

sysutils.beep()

这有效，但我真的很想设置声音的频率和持续时间

Answer 1

Afaik 这是一个长期有效的功能。 (Dev Pascal 已经十多岁了)。

不同的是，Lazarus 不会像 Delphi 那样自动将 Windows 添加到 uses 子句中。