5,386
社区成员
发帖
与我相关
我的任务
分享
procedure TDataModule2.ADOQueryJZFBeforeDelete(DataSet: TDataSet);
begin
If MessageDlg('Hi,注意啦,真的要删除记录吗?',
mtConfirmation,
mbYesNoCancel,
0
)<>mrYes then
Abort; {取消删除操作}
end;
interface
uses
SysUtils, Classes, FMTBcd, DB, SqlExpr, ADODB, frxDBSet,Math,
Dialogs, frxClass;
我在前面加已经申明了的。