请问如何把inputbox中的ok,canel改为中文确定和取消

Question

请问如何把inputbox中的ok,canel改为中文确定和取消

Answer 1

使用中文版的操作系统和中文版的Delphi难道不是么？

Answer 2

找到路径....\Borland\Delphi7\Source\Vcl\, 将VCL文件夹中的内容考到一个地方，另存，考一个副本,打开此文件夹（副本），找到Consts文件，用Delphi将其打开，你会看到你想要的都在这,将    SMsgDlgWarning = 'Warning';
  SMsgDlgError = 'Error';
  SMsgDlgInformation = 'Information';
  SMsgDlgConfirm = 'Confirm';
  SMsgDlgYes = '&Yes';
  SMsgDlgNo = '&No';
  SMsgDlgOK = 'OK';
  SMsgDlgCancel = 'Cancel';
后面的内容修改为中文，保存
这样就可以将它作为一个资源来用，打开你要编译项目的,在菜单的Option选项的Dir../Condi...小项，在search Path中添加你刚考的副本路径，好了，编译，看看,

Answer 3

新建一个Project，打开...\Borland\Delphi6\Source\Vcl\Consts.pas，另存为自己工程目录下的Consts.pas（这是为了保险起见，怕原文件找不回来）。看看Consts.pas，不用我说，你也知道改什么。例如SOKButton = 'OK';改为SOKButton = '确定';改完后，菜单Project\Compile Project1。编译完后，在你的工程目录下会出现一个Consts.dcu，拷贝它覆盖...\Borland\Delphi6\Lib\Consts.dcu。完事，运行你的InputBox, MassegeBox, ShowMessage... 看看。

Answer 4

pengxuan(网虫先生)对上面的补充
如果通用的话,应该加上条件编译
{$ IFDEG GB2312}
  SMsgDlgError = 'Error';
{$ELSE}
  SMsgDlgError = '错误';
{$END}这样,中文操作系统提示的是中文,替他语言的操作系统提示的是中文.

Answer 5

同意 Kshape([伟大的大伟!])
修改VCL