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

Question

哪位大侠说说
急!

Answer 1

编辑Source目录下的DBConsts.Pas文件,将其中的
  SDeleteRecordQuestion = 'Delete record?';
改为:
  SDeleteRecordQuestion = '删除记录?';
保存它,然后编译,生成DBConsts.dcu,拷贝到LIB目录下.
其它的类似.

Answer 2

procedure TFmMain.grdMasterKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if (Shift = [ssCtrl]) and (Key =  VK_DELETE) then
  begin
    if MessageBox(Application.Handle, '删除记录?', 'Question', MB_YESNO + MB_ICONQUESTION) = ID_YES then
      grdMaster.DataSet.Delete;
    Key := 0;
  end
  else
    inherited;
end;