FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
||||
|
||||
Violacion de memoria cuando termina un procedure
Hola Foro, estoy de nuevo por aqui, para comentarles un problema... espero que me ayuden.
Sucede que instalo un ejecutable que accesa una BD oracle en un cliente que tiene una Red NT. el programa falla al terminar un procedimiento en la ultima linea. sin importar lo que haya. Código:
Procedure Maldito; Begin instrucción1; instrucción2; instrucción3; instrucción4; //Aqui se genera el error end; esta ultima isntrucción puede ser algo como: Variable:=Valor; Screen.Cursor:=crDefault; u otras igual de sencillas. Lo curioso es que en otros clientes (con otros ambientes de red w2000 no falla). Cuando digo cliente me refiero al usuario que adquirió el software y no a una máquina cliente. Para hacer las pruebas instalé en mi portatiol las fuentes y las ejecuté perfecto en mi oficina, pero cuando el mismo portatil se conecta a la Red del cliente, falla. El error no tiene nada que ver con la BD. y no hay problemas de creación y destrucción de objetos.... Existe dentro de este mismo procedimiento un segundo problema: Tengo una pantalla que tiene varios checks. los cuales puedo accesar des de cualquier parte de la unidad. pero cuando intento accesarlos dentro de dicho procedimiento, falla si el componente no está "checkeado". Asi: Código:
Unit XXXX; [...] ELForm=Class(TForm) elboton:Tbutton; elcheck:Tcheckbox; private procedure buttonClick; Procedure Maldito; public end; [...] procedure buttonClick; begin if elcheck.Checked then //No hay problema instrucciones; //No hay problema end; Procedure Maldito; begin instrucción1; if Elcheck.checked then //Falla aqui, Access violation //Write in address 3D44FF56 //Cuando el componente //No ha sido checkeado instrucción2; instrucción3; instrucción4; end; [...] |
#2
|
||||
|
||||
Porque no nos muestras el código real para tratar de ver el problema??..
Saludos!
__________________
delphi.com.ar Dedique el tiempo suficiente para formular su pregunta si pretende que alguien dedique su tiempo en contestarla. |
#3
|
||||
|
||||
Hola a todos... ya encontré el error:
Decía que fallaba al terminar un procedimiento, mas o menos asi: Código:
Procedure Maldito; Begin instrucción1; instrucción2; instrucción3; instrucción4; //Aqui se genera el error end; digamos que la matriz al final quedaba con una longitud (15,15), pues bien en este mismo procedimiento se llenaba la matriz en un ciclo que traia valores de una BD. sucede que retornaba un registro mas de lo esperado y se asignaba un valor a la matriz en la posicion (6,16), imposible, por que una posicion 16 no existe. Sin embargo, no se generaba un mensaje de error. simplemente pasaba hasta llegar al procedimiento padre y comenzaba a generar "Access Violations", sobre cualquier componente o instrucción que siguiera. agradezco su atención. bye. |
|
|
|