delphi - 如何用现代蜂鸣声替换 Windows.Beep

Question

如何用可调节音量的扬声器发出的现代蜂鸣声替换 Windows.Beep？

Answer 1

如果您想在显示 MessageBox 时使用 Windows 使用的“标准”蜂鸣声，您可以调用 Windows.MessageBeep(MessageID)，其中 MessageID 映射到与 MessageBox 的图标 ID 相同的值(MB_OK、MB_ERROR 等)。

这样做的一个问题是用户可以将任何声音或没有声音映射到特定 ID。