求各位指导下小弟- -

Question

procedure TDataModule2.ADOQueryJZFBeforeDelete(DataSet: TDataSet);
begin
  If MessageDlg('Hi，注意啦，真的要删除记录吗?',
                 mtConfirmation,
                 mbYesNoCancel,
                 0
                )<>mrYes then
    Abort;  {取消删除操作}
end;报错
[Error]Unit2.pas[96]:';' Statement expected but 'PROCEDURE' found
[Error]Unit2.pas[102]: Undeclared identifier:'mrYes'声明预期但是发现程序。
未申报的标识符： “ mrYes ”的实在是不懂怎么改- -  求各位指导。

Answer 1

Dialogs单元加了吗，或其他那单元没加。

Answer 2

interfaceuses
  SysUtils, Classes, FMTBcd, DB, SqlExpr, ADODB, frxDBSet,Math,
  Dialogs, frxClass;我在前面加已经申明了的。

Answer 3

后面那个问题是你用错了，应该用idYes而不是mrYes

Answer 4

if MessageDlg('Hi，注意啦，真的要删除记录吗?',mtInformation,[mbyes,mbCancel],0)<>mryes then楼主语法错误。

Answer 5

mtConfirmation和mtInformation差不多啊。还是报一样的错- -

Answer 6

if MessageDlg('Hi，注意啦，真的要删除记录吗?',mtInformation,[mbyes,mbCancel],0)<>mryes then

Answer 7

改用你的代码以后  依旧报错
[Error]Unit2.pas[101]: Undeclared identifier:'mrYes'
在程序前面我已经申明了 uses Dialogs的了。