Delphi - Excepciones

Hola a todos:

Necesito captura esta excepcion, alguno pordria ayudarme?

exception class EIBInterbaseError with message ' violation of PRIMARY or UNIQUE KEY constrain "PK_DT" on table "DT"'

Gacias,

Osmany

checa en la documentación de interbase, el codigo (SQLCode) de la violacion de llave primaria.

lo que tienes que hacer es intentar verificar que SQLCode sea igual al que dice la documentacion, incluso, con ese metodo puedes capturar otros errores como fallo al actualizar, perdida de conexion, entre otros.

En interbase debe haber alguna tabla que almacena los errores.

En el evento OnPostError:

if (E as EIBError).IBErrorCode = ... then

para obtener el ErrorCode yo utilizo primero algo asi como :

showmessage(E.Message + IntToStr(EIBError(E).IBErrorCode)

o bien buscalo en los pas de IBX se llama creo IBErrorCodes.pas