Interceptar mensajes error ADO Access

[pablonill]

Hola, quisiera saber como puedo interceptar los mensajes de error devueltos por ADO en una tabla access para poder traducirlos y mostrar el mensaje correspondiente!, por ejemplo el de violacion de clave, o el campo debe tener un valor!, muchas gracias.

[Neftali [Germán.Estévez]]

Utiliza Try..Except.
Los errores de ADO generan excepciones de tipo EOLEException (busca en la ayuda de Delphi).

Código Delphi [-]
...
try
  // Por ejemplo
  ADOTabla.Edit;
  ...
except
  on E:EOLEException do begin 
    // tipo de error
    if (E.ErrorCode = -2146825267) then begin
      BoxAviso('El registro ya ha sido borrado...' + E.Message);
    end
    else if (E.ErrorCode = -2147217905)
      BoxAviso('Se ha producido un error al intentar bloquear el registro. ' + E.Message);
    end
    else begin
      BoxAviso('Error ADO Desconocido; ' + E.Message);
    end;
  end
  else begin
    // Capturar otro tipo de excepciones
    raise;
  end;
end;

En un ejemplo, y te lo he puesto de memoria sin compilar, así que tal vez haya algun error de sintaxis, pero la idea es esa.
En cuanto a los códigos de error de ADO, los puedes encontrar por internet; Por ejemplo aquí.

[pablonill]

Muchas gracias, ya lo voy a probar!, muchas gracias de nuevo!

[pablonill]

Hola, te comento que logre interceptar el error, el tema es que el programa me genera un EDataBaseError y un EOleException los cuales no devuelven un ErrorCode, por tal motivo no puedo saber cual es el tipo de error que se genera!, algo me estoy olvidando?. Gracias.
Les recuerdo que estoy usando una tabla Access con ADO y necesito capturar errores tales como El campo ya existe o el campo no puede tener un valor Null. Gracias!

[Neftali [Germán.Estévez]]

Si buscas EOLEException en la ayuda varás que tiene la propiedad ErrorCode. Algo debes estar haciendo mal.
Qué componentes ADO estás usando exactamente.