请问如何让DBGird删除一条数据的时候弹出的确认对话框为中文！！！

Question

急啊
哪位大哥做过呀

Answer 1

.....
Application.Messagebox('确定要删除此条记录吗?','提示',64);
       ....

Answer 2

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

Answer 3

VDBConsts的SDeleteRecordQuestion = 'Delete record?';改了就好了
谢谢

Answer 4

怎么直接修改....\Borland\Delphi7\Source\Vcl\下的文件不行的呢？

Answer 5

当然不行，给你这个主意的人不知道自己试验过没有。
不过Delphi 3.0里面这个办法是可行的。

Answer 6

直接把dbctrls.pas文件的          
if not FConfirmDelete or
(MessageDlg(SDeleteRecordQuestion, mtConfirmation,
mbOKCancel, 0) <> idCancel) then Delete;改为
if not FConfirmDelete or
            (MessageBox(0,PChar('确实要删除此条记录吗？'),'删除记录？',
                        MB_ICONQUESTION or MB_YESNO) <> IDNO) then Delete;就可以了  爽！！！

Answer 7

我可以再告诉你一招，下载一个外挂，装上就不用烦心了，名字叫CnPack ID 专家包,有邮箱的话，我可以发一个给你