Ver Mensaje Individual
  #1  
Antiguo 01-09-2003
Avatar de javiermorales
javiermorales javiermorales is offline
Miembro
 
Registrado: may 2003
Ubicación: Alicante
Posts: 272
Reputación: 22
javiermorales Va por buen camino
Raised Exception

Buenas Tardes, se me produce el siguiente error:

"Project SIGECO.exe raised exception class EAccessViolation with message 'Violación de acceso en la dirección 00503A36 en módulo 'SIGECO.EXE'. Leer de dirección 'FFFFFFFF'. Process stopped. Use Step or Run to continue"

Le he realizado una traza y no indica el punto exacto del código donde se produce el error, pero ocurre en todos los formularios que cierro a través de código. Dichos formularios se han creado utilizando el siguiente código:

Código:
Application.CreateForm(TFormClass(listaclass[i]),Pantalla[j]);
IndicePantalla := j;
Pantalla[j].Show;
Por su puesto es mucho más largo, pero en concreto este es el momento en que se crea el formulario y no dá ningún problema. Para cerrar dicho formulario, realizo lo siguiente

Código:
  Pantalla[i].Close;
  Pantalla[i].Free;
  Pantalla[i] := nil;
Teniendo en cuenta que el valor de i se le pasa en el momento de la creación del formulario.

Se produce el error, se acepta el mensaje y todo continua,pero claro los usuarios se preocupan y da una imagen muy pobre de la aplicación

Será muy bienvenida cualquier sugerencia. Gracias a todos. Un saludo.
Responder Con Cita