inputbox有问题(20分)

  • 主题发起人 主题发起人 94132195
  • 开始时间 开始时间
9

94132195

Unregistered / Unconfirmed
GUEST, unregistred user!
InputBox('请输入产品批号', '批号名称:', '')希望其对话框的yes,no显示为中文的是与
否,有没有办法做?
 
汉化.PAS源文件
 
将borland/source/vcl/Consts.pas内的相关字符用相应的汉字替换,保存,选择install
component 菜单重新安装,保存即可,安装时有出错提示,不用管他
 
/borland/delphi6/source/vcl/Consts.pas

SMsgDlgOK = 'OK';
SMsgDlgCancel = 'Cancel';

改为中文,编译即可(不是运行阿)
 
或者自己用dialog做一个,呵呵,只要不嫌麻烦
 
接受答案了.
 
后退
顶部