Como puedo recoger los errores de Oracle

[albertillo]

Hola gente, tengo un problema.
No puedo recoger bien los errores que proporciona oracle xq delphi lo interpreta siempre con el mismo codigo de error.

yo dispongo de una funcion que dependiendo del codigo de error que me proporcione e.errors[e.errorcount-1].errorcode muestro un mensaje u otro pero el problema es que siempre tengo el mismo codigo de error aunq sea el error de oracle distinto.
Ahi os muestro la funcion q utilizo para mostrar los errores, que es llamada en el try de abajo