有没有一种方法可以使Application.MessageBox()Win11 中的对话框外观现代化？也许通过创建清单文件或其他东西使经典桌面应用程序看起来更新？
问问题
288 次
1 回答
4
一句话，没有。
Application.MessageBox()调用 Win32 MessageBox()API，这是一个旧对话框。
要获得更新的外观，您需要使用 Windows Vista 中引入的 Win32任务对话框 API，而不是使用MessageBox().
现代 Delphi 版本在单元中有一个TTaskDialog组件和TaskMessageDlg...()包装函数(Vcl.)Dialogs。但这些在 Delphi 7 中不存在，因此您必须手动定义和导入任务对话框 API 类型和函数。
于 2021-09-16T14:40:20.460 回答