当 vcl 样式激活时，如何为我的应用程序的消息框设置外观？
我使用 Application.MessageBox 在我的 VCL 应用程序上显示消息，但是当应用程序应用了 vcl 样式时，消息窗口将使用 windows 样式而不是当前的 vcl 样式显示。
示例代码
Application.MessageBox('Hello World', 'Hello', MB_OK + MB_ICONINFORMATION);
示例图像
如何显示具有当前 vcl 样式的消息框？
I'm using the Application.MessageBox to show messages on my VCL application, but when the application had a vcl style applied the message window is shown with the windows style instead of the current vcl style.
Sample code
Application.MessageBox('Hello World', 'Hello', MB_OK + MB_ICONINFORMATION);
Sample Image
How I can show a message box with the current vcl style?
如果你对这篇内容有疑问，欢迎到本站社区发帖提问 参与讨论，获取更多帮助，或者扫码二维码加入 Web 技术交流群。
绑定邮箱获取回复消息
由于您还没有绑定你的真实邮箱，如果其他用户或者作者回复了您的评论，将不能在第一时间通知您！
发布评论
评论（1）
Application.MessageBox 函数在内部调用 MessageBox WinAPi 函数，该窗口不是delphi 创建的窗体，因此无法使用Vcl 样式进行换肤。相反，您必须使用 Vcl.Dialogs 单元中声明的对话框类和函数之一，例如
MessageDlg函数。The Application.MessageBox function internally call the MessageBox WinAPi function, that window is not a form created by delphi so can't be skinned with the Vcl styles. Instead you must use one of the dialogs classes and functions declarated in the Vcl.Dialogs unit like the
MessageDlgfunction.