Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   OOP (https://www.clubdelphi.com/foros/forumdisplay.php?f=5)
-   -   Excepciones con Forms Heredados (https://www.clubdelphi.com/foros/showthread.php?t=65158)

Napoleon_5 24-11-2009 22:22:17

Excepciones con Forms Heredados
 
Saludos señores.

Tengo un fuerte dolor de cabeza causado por la siguiente situacion en Delphi 7:
Un formulario principal que tiene un ADOQuery y un dataset, con botones para al manejo de los datos. Este Query lo asigno en el formulario padre a una propiedad global tipo TCustomADODataset, luego lo manipulo con medotos publicos para agregar, editar y guardar los datos desde formularios hijos.

Todo me funciona a la perfeccion en lo referente a la manipulacion de los datos, pero el gran problema surge cuando habiendo mostrado y cerrado un formulario hijo (heredado), trato de abrirlo de nuevo antes de cerrar la aplicación. me devuelve una excepcion de violacion de acceso (Access Violation) que no de dice exactamente cual es el problema.

Supongo que debo liberar la instancia del formulario o algo que ver con el dataset al cerrar el hijo o algo asi. Aunque en el evento close del padre tengo Action := caFree establecido.

Ya he revisado que se abra bien el query y que se guarden los datos. A veces hasta cuando cierro el formulario hijo me da violacion de acceso.

Mi tranque esta en que no se como evitar este error


¿Alguna idea..?

Si me pueden ayudar... Gracias mil...

duilioisola 25-11-2009 09:10:35

Yo empezaría por aislar la zona donde se produce el error.
Pon un breakpoint en el procedimiento OnClose y OnDestroy del fromulario
Pon otro en el OnCreate.
Luego ve saltando por las instrucciones con F8.
Cuando llegues a la que te da el Access Violation podremos ayudarte.

Cuando abres el Form lo creas o solo le dices Form.Show?
Si le pones caFree, el Form, desaparece completamente de la aplicación. Deberás volver a crearlo si deseas usarlo.

gerardus 25-11-2009 09:43:05

Si el form2 es heredado del form1, y el form1 tiene caFree en el OnClose, el Form2 tiene el mismo comportamiento: se libera el form2 al cerrar.
Cualquier intento de volverlo a mostrar (.Show o .ShowModal) sin haberlo creado de nuevo -> Access Violation.
Como bien dice duilioisola, intenta trazar que pasa cuando cierras el form y lo vuelves a mostrar.
Otra pista: Si observas el valor de un form creado y liberado desde el debugger, no tiene porque ser nil aunque ya no exista.

Neftali [Germán.Estévez] 25-11-2009 10:42:39

También estaría bien que colocaras algo de código de cómo creas y cómo liberas(cierras) el formulario. Incluyendo los OnClose, Destroy,... si es que los has programado.

Napoleon_5 27-11-2009 13:56:07

Cada vez que voy a utilizar una instancia del form padre lo creco de la siguiente manera:

frmHijo:=TfrmHijo.Create(self);
frmHijo.Show;

Considerando que el form padre es MDIChild y que los muestro en una aplicacion con un form MDIForm.

Todos los forms, excepto el principal, los creo solo al momento de utilizarlos y al cerrarlos los libero con Action := caFree;

Al parecer, el error se produce cuando creo varios forms hijos del mismo padre.

Sigo probando...


La franja horaria es GMT +2. Ahora son las 10:42:24.

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