Ver Mensaje Individual
  #1  
Antiguo 26-05-2005
Garion Garion is offline
Registrado
 
Registrado: may 2005
Posts: 2
Reputación: 0
Garion Va por buen camino
manual de excepciones de object pascal para free pascal???

Hola, estoy buscando algun manual sobre las excepciones en object pascal. Se algo sobre ellas xo hay cosas que no entiendo como el uso de raise. Se que existen tb las instrucciones try - expect y try - finally y se usarlas para crear procedimientos o simplemente instrucciones que se ejecuten en caso de que se produzca una excepcion para que no salga del programa xo no se muy bien cual es el uso de la clase exception
Por ejemplo, tengo que hacer un programa en el que, en una parte de él, necesito acceder a un fichero y tengo que crear una excepcion para el caso de que no exista. Usando try - expect es facil hacer un procedimiento para que, en el caso de que no exista, simplemente lo cree. Pero la practica (es para la universidad) consiste en crear objetos que hereden de la clase exception y ademas quiero entender como se usa la instruccion raise.
Lo he intentado haciendo que en caso de error haga "raise mem.crear" donde mem.crear es

Código Delphi [-]
            constructor mem.crear
            begin
                    inherited Create ('Fichero no encontrado');
                    {esta parte es la que intento que haga xo supongo que asi no se usa esto}
                    rewrite (memoria);
                    mensaje ('Fichero no encontrado') //Muestra una ventana en gtk
           end;

y al ejecutar el programa, en lugar de EInOutError: file not exist me sale EAccessViolation: Access Violation pero no se para que me sirve esto
Alguna ayuda?
Gracias

Última edición por jachguate fecha: 26-05-2005 a las 20:24:44.
Responder Con Cita