查人人中国名人网龙腾世纪3优化补丁:DELPHI中MESSAGEDLG对话框如何能显示汉语？
来源：百度文库 编辑：查人人中国名人网 时间：2024/04/29 22:38:16
系统中已经有大量用MESSAGEDLG，如何更改
MessageDlg可以显示汉语, 但是它的按钮什么的都是英文的. 没办法,因为这是Delphi自带的代码, 除非你修改它的源代码才能完全变成中文的.
我的办法是用另一个函数: Application.MessageBox. 它是对Windows API的直接调用, 用英文Windows它就是英文的, 用中文Windows它就是中文的, 当然里面的信息是由你来定的.
一个例子:
case Application.MessageBox('保存文件吗?', '警告',
MB_YESNOCANCEL + MB_ICONERROR) of
IDYES: ...
IDNO: ...
IDCANCEL: ...
end;
楼上正解