怎样使messagedlg等函数显示的对话框的按键的Caption为中文呢？

Question

你的操作系统要是中文
还要修改delphi的vcl源代码
把相应的英文字符串换成中文

Answer 1

Delphi的字符串常量多半都在Consts和SysConst两个单元中，你可以修改其中的内容，然后将这两个文件编译出来的dcu文件放在比Delphi的Lib更优先的搜索路径中。不过更好的办法可以参考Delphi的RichEdit例子，使用资源库，效果更好。

Answer 2

最简单的方法是用　Application.MessageBox
如：
Application.MessageBox('没什么，测试一下！','测试',64);第一个参数是显示内容，第二个是标题，第三个是选项，其值和MessageDlg中的一样，返回值也一样，如按“确定”返回IDOk，按“是”返回IDYes等等。

Answer 3

其实，调用api： MessageBox就可以了，MessageBox中的按钮文字与操作系统有关，如果windows是中文版的，则按钮显示中文，如果操作系统是英文版的，则显示英文。

Answer 4

其实Application的MessageBox用的就是API 的MessageBox，只不过不用写窗口句柄，更安全。要知道句柄不对就有可能不是模式方式的了。

Answer 5

我以前做的程序也有这个问题。最后我用MessgeBox就好用了。
而且由于时调用系统的api，那么你在日文系统下编程的时候她自己就可以变成日文的了。
呵呵

Answer 6

请问"Application.MessageBox('没什么，测试一下！','测试',64);”中，参数64是根据什么与具体的对话框类型对应的？

Answer 7

64是显示Infomation图标的
32是Warning
16是Error

Answer 8

*****************************************************************************
1. 打开文件consts.pas(在Delphi安装目录的\source\vcl下) 
2. 将以下资源字符串常量的值进行改动： 
  SMsgDlgWarning = '警告';
  SMsgDlgError = '错误';
  SMsgDlgInformation = '信息';
  SMsgDlgConfirm = '确认';
  SMsgDlgYes = '(&Y)是';
  SMsgDlgNo = '(&N)否';
  SMsgDlgOK = '确定';
  SMsgDlgCancel = '放弃';
  SMsgDlgHelp = '(&H)帮助';
  SMsgDlgHelpNone = '无效的帮助';
  SMsgDlgHelpHelp = '帮助';
  SMsgDlgAbort = '(&A)放弃';
  SMsgDlgRetry = '(&R)重试';
  SMsgDlgIgnore = '(&I)忽略';
  SMsgDlgAll = '(&A)全部';
  SMsgDlgNoToAll = '(&o)全不';
  SMsgDlgYesToAll = '(&A)全是';
---- 经过这样改动后，对应按钮的热键仍然可以使用。
******************************************************************************** 

Answer 9

再补：
3. 编译成consts.dcu文件，具体方法如下： 
     建立一application，并引用consts.pas;将consts.pas拷贝到对应的目录下；运行程序，可得到consts.dcu。 
4. 并将编译生成consts.dcu文件拷贝到..\delphi4.0\lib目录下。***************************************************************************剩下看你的！祝你好运！
 

Answer 10

再补：
3. 编译成consts.dcu文件，具体方法如下： 
   建立一application，并引用consts.pas;将consts.pas拷贝到对应的目录下；运行程序，可得到consts.dcu。 
4. 并将编译生成consts.dcu文件拷贝到..\delphi4.0\lib目录下。 ********************************************************************
祝你好运！

Answer 11

直接用API的 MessageBox 不就行了！

Answer 12

第三个参数的取值：
0 只显示 OK 按钮。
1 显示 OK 及 Cancel 按钮。
2 显示 Abort、Retry 及 Ignore 按钮。
3 显示 Yes、No 及 Cancel 按钮。
4 显示 Yes 及 No 按钮。
5 显示 Retry 及 Cancel 按钮。
16 显示 Critical Message 图标。
32 显示 Warning Query 图标。
48 显示 Warning Message 图标。
64 显示 Information Message 图标。
0 第一个按钮是缺省值。
256 第二个按钮 是缺省值。
512 第三个按钮是缺省值。
768 第四个按钮是缺省值。
0 应用程序强制返回；应用程序一直被挂起，直到用户对消息框作出响应才继续工作。
4096 系统强制返回；全部应用程序都被挂起，直到用户对消息框作出响应才继续工作。
第一组值 (0-5) 描述了对话框中显示的按钮的类型与数目；第二组值 (16, 32, 48, 64) 描述了图标的样式；第三组值 (0, 256, 512) 说明哪一个按钮是缺省值；而第四组值 (0, 4096) 则决定消息框的强制返回性。将这些数字相加以生成 参数值的时候，只能由每组值取用一个数字。
（请注意最后一句“将这些数字相加……”）
返回值： 值 描述
1 OK
2 Cancel
3 Abort
4 Retry
5 Ignore
6 Yes
7 No