急!急!(100分)

在数据模块中,对table1的onposterror事件做了以下编程
procedure TDMF.Table1PostError(DataSet: TDataSet; E: EDatabaseError;
var Action: TDataAction);
begin
if (E is EDBEngineError) then
If (E as EDBEngineError).errors[0].Errorcode=eKeyViol then
Begin
MessageDlg('此编号已经存在,请更改!',mtWarning,[mbOk],0);
Abort;
end;
end;
编译时出现 Undeclared identifier: 'eKeyViol'的错误,请问如何解决?
(初来报道 ,请大家指教)

你有没有设置永久字段？

你为说明标识符号 ekeyviol

多人接受答案了。