50分寻求InputBox()函数的用法.要求"ok","cancel"按钮能变成"确定","取消".

Question

如题.

Answer 1

这好象关系到系统的api 查查有关资料吧

Answer 2

打开\program files\borland\delphi6\source\vcl\Consts.pas
把里面的
SMsgDlgOK = 'OK';
SMsgDlgCancel = 'Cancel';
改为
SMsgDlgOK = '确定';
SMsgDlgCancel = '消息';
重新编译后，把Consts.dcu拷贝到\Program Files\Borland\Delphi6\Lib下覆盖到原来的。

Answer 3

SMsgDlgCancel = '取消';

Answer 4

很简单，将 ..Delphi5\Source\VCL\consts.pas内的一些常量从英文改为中文，然后将Consts.pas加入到你的工程中去就可以了。下面只是其中的一部分。
  SMsgDlgWarning = 'Warning';
  SMsgDlgError = 'Error';
  SMsgDlgInformation = 'Information';
  SMsgDlgConfirm = 'Confirm';
  SMsgDlgYes = '&Yes';
  SMsgDlgNo = '&No';
  SMsgDlgOK = '确定';                  //对应于OK
  SMsgDlgCancel = '取消';             //对应于取消 
  SMsgDlgHelp = '&Help';
  SMsgDlgHelpNone = 'No help available';
  SMsgDlgHelpHelp = 'Help';
  SMsgDlgAbort = '&Abort';
  SMsgDlgRetry = '&Retry';
  SMsgDlgIgnore = '&Ignore';
  SMsgDlgAll = '&All';
  SMsgDlgNoToAll = 'N&o to All';
  SMsgDlgYesToAll = 'Yes to &All';

Answer 5

To SukerLord:
    谢谢你回答我的问题如何将inputbox()ok,cancel变成中文
我按你的方法做了，改了consts.pas保存之后，可找不到consts.dcu呀

Answer 6

afei78223:
    谢谢你的回答，我把修改后的Consts.pas改了之后，添加工程中后，字体虽是中文，但不是GB的啊。

Answer 7

修改资源
可以通过添加语言实现
Add Language

Answer 8

To ly_liuyang:
     您好！
     “修改资源，可以通过添加语言实现，Add Language”
     具体如何做呢？谢谢了！！
     致
礼！                        

Answer 9

重新编译一下你修改的单元
c:\Borland\Delphi6\Bin\DCC32.EXE  c:\Borland\Delphi6\Source\Vcl\Consts.pas