Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Coloboración Paypal con ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #3  
Antiguo 08-09-2005
Avatar de sierraja
sierraja sierraja is offline
Miembro
 
Registrado: sep 2004
Posts: 281
Poder: 22
sierraja Va por buen camino
Question

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.

Última edición por dec fecha: 10-09-2005 a las 17:01:58. Razón: Encerrar el código fuente en la etiqueta [DELPHI]
Responder Con Cita
 



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro


La franja horaria es GMT +2. Ahora son las 14:37:15.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi