FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#8
|
|||
|
|||
Perdona, no había visto tu último post!!
Edito: champy se me adelantó Evidentemente, el código que has puesto no te va a funcionar (supongo que será al escribirlo en el navegador, pero por si acaso...):
¡¡¡pones a nil el formulario antes de destruirlo!!!! Debe ser de la siguiente forma, incluyendo código para destruirlo, de tal forma que cuando pulses el botón TIENES que volver a crearlo:
o alternativamente:
Pero ya te digo, que lo más "elegante" es usar la opción 1 que te planteaba en el anterior post, creas el form cuando lo muestres, haces lo que sea con él (ShowModal, etc, etc...), cuando pulsas el botón ese de cerrar SÓLO llamas a Close, en el evento FormClose de este formulario cierras el DataModule, y cuando regrese del ShowModal, entonces se hace el Free. Resumiendo:
Fíjate que he separado lo que tú haces en el botón de cerrar en dos métodos FormClose y el evento de cerrar. ¿Por qué? Porque si cierras el formulario SIN pulsar el botón (por ejemplo Alt+F4), entonces no cerrarías el dataModule, y de ésta forma sí. Una última cosa. Si creas y destruyes formularios manualmente, te recomiendo que borres las variables que Delphi crea automáticamente al añadir un formulario nuevo al proyecto, como por ejemplo las del estilo Form1, Form2, etc... Así no te liarán, ya que estas variables las usa Delphi para crearte el formulario por tí, no para que tú lo hagas por Delphi. Espero haberte ayudado. Un saludo, LoPiTaL Última edición por LoPiTaL fecha: 30-05-2012 a las 22:56:31. |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Access violation al cerrar un formulario | elaguna | Varios | 2 | 12-11-2010 19:35:46 |
Access Violation al cerrar .exe | mArTaLF | Varios | 3 | 16-10-2007 09:11:37 |
Cerrar forms de manera independiente | coleleon | OOP | 8 | 01-12-2005 22:54:15 |
Access Violation al cerrar ClientSocket | auveele | Internet | 0 | 15-11-2004 00:39:53 |
Cerrar Forms | javiermorales | OOP | 3 | 30-06-2003 10:29:32 |
|