FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Problema con las Excepciones y OO
Estoy haciendo una aplicacion en 3 capas con Delphi. Por cada clase que me estoy creando en Delphi me creo tamien una clase Excepción para ella, PARA QUE OS ACLAREIS:
Unit DaoConnection: Type EDaoConnection = Class ( Exception ); Type TDaoConnection = Class .... atributos, metodos, properties... end; Unit GINRole Type EGINRole = Class ( Exception ); type TGINRole = class .... atributos, metodos, properties... end; Bien pues lo que me esta pasando es lo siguiente: kuando DaoConnection genera una excepción del tipo EDaoConnection ( EDaoConnection.Create(message) ), la Clase GINRole tiene esto: try ..... Except on E: EDaoConnection do raise EGINRole.Create('TGINRole: Error '+ E.Message); end; //Cuando se lanza una excepción DaoConnection, GINRole la controla i lanza una nueva suya (EGINRole) con el mensaje de la otra. PERO ES QUE ME PETA! da un error de memoria! por que? Alguien me puede ayudar? HELP ME! |
|
|
|