delphi - 有没有办法阻止 TaskMessageDlg 发出声音？

Question

我想显示一个带有信息图标的 TaskMessageDlg，但我不想发出哔哔声。可能吗 ？

Answer 1

我想显示一个带有信息图标的 TaskMessageDlg，但我不想发出哔哔声。

事实上，你可能不会。Windows Vista 中引入的任务对话框的优点在于，如果开发人员正确使用它们，它们在平台上提供了熟悉、一致且易于访问的 UX。

此 UX 的一部分是使用标准系统图标及其相关声音，可由最终用户配置。

对于视障用户来说，声音实际上可能很重要。如果某个特定的最终用户不喜欢这些声音，那么他可以在操作系统中禁用它们。

可能吗？

TaskMessageDlg只是在 VCL 应用程序中显示任务对话框的一种方式，所以让我们将问题扩大到一般的任务对话框。

是的，这是有可能的。不要使用TD_INFORMATION_ICON标准图标，而是使用自定义图标。例如，您可以使用 Print Screen 和 Microsoft Paint 创建一个带有桌面上显示图标的 BMP 文件。LoadIcon或者，您可以使用、或（恐怖！）通过手动LoadIconWithScaleDown挖掘来提取系统图标。User32.dll

---

就像概念证明一样：

  with TTaskDialog.Create(nil) do
    try
      Title := 'Too many frogs have been created.';
      CommonButtons := [tcbOk];
      Flags := [tfUseHiconMain, tfAllowDialogCancellation];
      CustomMainIcon.Handle := LoadIcon(0, IDI_INFORMATION);
      Execute;
    finally
      Free;
    end;