cambiar los mensajes de error de interbase

[dungeon]

Perdona que te moleste, pero te envio este e-mail para ver si me podrias ayudar a resolver un problema que tengo con una aplicacion que estoy realizando.
el problema es el siguiente:
lo que me interesa hacer es que los mensajes de error que da la aplicacion es cambiarlos a forma humana y que me enseñe el numero de error en question la primera parte la tengo hecho lo que me falla es la segunda, yo lo he hecho asi para verlo i me da errores:

procedure TFrmvehiculodetalles.tratarexcepciones(sender: tobject; e : exception);
begin
	if e.ClassNameIs('eibinterbaseerror') then
		showmessage(format('iberrorcode: %d - sqlerrorcode: %d',[EIBInterbaseError(e).IBErrorCode,EIBInterbaseError(e).SQLCode])+#13+ 'Mensaje: '+e.Message)
  else
	ShowMessage(E.Message);

el error que me da es undeclared identifier('eibinterbaseerror').

gracias por todod y disculpa las molestias.