Acess Violation

sierraja · #1 08-09-2005

Algunas veces se genera un Acess Violation y me indica alguna dirección o simplemente 00000x000000 y seguidamente la aplicación se detiene y cae en el fuente. Pero, explico: El error se genera dentro de un form y cuando cae en el fuente apunta luego de que pasa por la creación del form, es decir:

Código Delphi [-] Procedure Button1.onclick();
 Begin
   FForm1:=TFForm1.create(Applicatiom);
   FForm1.showmodal;
 end; // aqui es donde se detiene la aplicación, pero el error se genera en el Form1 ;(

Alfredo · #2 08-09-2005

Que tienes codificado en el evento oncreate del form?

sierraja · #3 08-09-2005

En este evento sólo se tiene definición de variables: actualización de variales tipo fecha a la fecha del día, inicialización de variables tipo boolean. En algunas ocasiones se genera una Acess Violation en 0000x00000 de la siguiente rutina

Código Delphi [-] modulo_datos.cds_Alquilando.First;
 while not modulo_datos.cds_Alquilando.Eof do
 Begin
   pb1.Position:=c;
   delay(t);
   c:=c+1;
   xcodigo:=modulo_datos.cds_AlquilandoCodigo_de_Pelicula.AsString;
   modulo_datos.cds_Peliculas.FindKey([xcodigo]);
   modulo_datos.cds_Peliculas.Edit;
   modulo_datos.cds_PeliculasStatus_de_Proceso.AsString:='';
   modulo_datos.cds_Peliculas.Post;
   modulo_datos.cds_Peliculas.Refresh;
   modulo_datos.cds_Detalle_Alquiler.Insert;
 
   modulo_datos.cds_Detalle_AlquilerCodigo_Socio.AsString:=
     modulo_datos.cds_AlquilandoCodigo_Socio.AsString;
 
   modulo_datos.cds_Detalle_AlquilerNumero_de_Alquiler.AsInteger:=
     modulo_datos.cds_AlquilandoNumero_de_Alquiler.AsInteger;
 
   modulo_datos.cds_Detalle_AlquilerCodigo_de_Pelicula.AsString:=
     modulo_datos.cds_AlquilandoCodigo_de_Pelicula.AsString;
 
   modulo_datos.cds_Detalle_AlquilerTitulo_de_Pelicula.AsString:=
     modulo_datos.cds_AlquilandoTitulo_de_Pelicula.AsString;
 
   modulo_datos.cds_Detalle_AlquilerClasificacion.AsString:=
     modulo_datos.cds_AlquilandoClasificacion.AsString;
 
   modulo_datos.cds_Detalle_AlquilerFecha_de_Alquiler.AsDateTime:=
     modulo_datos.cds_AlquilandoFecha_de_Alquiler.AsDateTime;
 
   modulo_datos.cds_Detalle_AlquilerFecha_de_Posible_Entrega.AsDateTime:=
     modulo_datos.cds_AlquilandoFecha_de_Posible_Entrega.AsDateTime;
 
   modulo_datos.cds_Detalle_AlquilerMonto_Alquiler.AsString:=
     modulo_datos.cds_AlquilandoMonto.AsString;
 
   modulo_datos.cds_Detalle_AlquilerStatus_de_Proceso.AsString:='Alquilada';
   modulo_datos.cds_Detalle_Alquiler.Post;
   modulo_datos.cds_Detalle_Alquiler.ApplyUpdates(0);
   modulo_datos.cds_Detalle_Alquiler.Refresh;
   modulo_datos.cds_Alquilando.Next;
 end;

Debe de haber alguna manera que según la dirección del Acess Violation se pueda ubicar directamente la línea donde se generó el error.

PD. Bueno no sé que tan explícito está pero por favor pregunta.

sierraja · #4 10-09-2005

Sólo quiero poder utilizar debug para ubicar los errores a traves de sus direcciones. Cómo se hace....

jmariano · #5 10-09-2005

Según lo que comentas, parece que estás intentando acceder a un objeto que no ha sido inicializado o que fué destruido (es por eso lo de el error "Access Violation"). Te aconsejo visitar la siguiente dirección donde verás un excelente tutorial de como tratar con este tipo de errores: http://delphi.about.com/od/objectpas.../aa052201b.htm

Saludos!

sierraja · #6 10-09-2005

JMariano, excelente aporte, muy oportuno y me has sacado de las tinieblas, muchas gracias....

Problema resuelto.