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

Con ese código debería salir tu mensaje, a no ser que no sea ese el error; Prueba con éste:

Código Delphi [-]
 try
    // serie de instrucciones
  except
      on E: EIBInterBaseError do begin
      messageDlg('Error de pass' mterror, [mbyes], 0);
    end
   else begin
       messageDlg('Error desconocido de la clase ' + E.ClassName, mterror, [mbyes], 0);
   end;
  end;