Ver Mensaje Individual
  #1  
Antiguo 02-04-2009
Avatar de fide_uci
fide_uci fide_uci is offline
Miembro
 
Registrado: ene 2009
Ubicación: Cuba - La Habana
Posts: 226
Reputación: 16
fide_uci Va por buen camino
Lightbulb Control de excepciones en delphi

Hola amigos. Resulta ser que existe un componente que se llama ApplicationEvents, el cual controla ciertos eventos de la aplicacion.

En un programa que estoy desarrollando, estoy implementando una
forma o metodo de controlar todas las excepciones que se generan.

Lo que hago es agregar a cada metodo, procedimiento, funcion etc,
dos lineas de codigo parecidas a esto.

Código Delphi [-]
procedure (....................);
begin
  ModuloEnEjecucion := 'Nombre Foemulario o Unit Eje: Form 1';
  EventoEnEjecucion := 'On....';
  (....)
end;

Si se produce un error en ese trozo de codigo, entonces el componente
ApplicationEvents me ejecuta el evento OnException, y ahi es donde muestro un formulario con los datos de las variables en donde de donde fue que se genero, si en el form 1, el 2 etc. La hora, la fecha, y el evento eje: OnButton1Click.

Mi pregunta es.

¿Este metodo es malo, elcaico?
¿Existe otro mejor para controlar todas las excepciones que suceden en la aplicacion?

¿Como, mediante el Api o lo que sea puedo capturar el modulo, el evento y esas cosas de donde ocurre el error.?

Un problema que sucede con esto es que tengo que agregar a cada funcion, procedimiento. etc, que valla a utilizar, las dos lineas de codigo que mencione, estableciendo en esas variables el nombre del modulo en ejecucion, y el nombre del evento. Asi si ocurre el error, saldra como que fue en ese modulo, y dentro de ese evento.

Diganme que creen de esto. Y si lo puedo mejorar.
Responder Con Cita