Crear varios objetos de un mismo tipo

[[maeyanes]]

Hola...

El error Access violation at address... se produce por una omisión mía. Te explico: la clase TObjectList puede 'tomar' posesión de los objetos que se agregan, esto se traduce a que, al eliminar un objeto de la lista, esta lo destruye automáticamente.

Para evitar el error de acceso de memoria, tienes que crear el objeto TObjectList pasando False como valor del parámetro del constructor:

Código Delphi [-]
FNotes := TObjectList.Create(False);

con esto le indicas a la lista que no debe destruir los objetos al eliminarlos de la esta.

Entonces el código del evento OnClose ya te debería funcionar sin errores.

Sobre tu duda al cerrar el formulario, si usas el código que te puse de ejemplo, este se destruirá cada vez que uses el botón cerrar del fomulario (la famosa aspa superior derecha )


Saludos...

[jocaro]

Hola Maeyanes, he cambiado la creación de la lista tal como me comentas, pero sigue produciendo 'Access violation...'

Código Delphi [-]
FNotes := TObjectList.Create(False);

¿Puedes explicarme un poco mas detalladamente el código que me pasas para liberar el formulario? hay detalles que no tengo claros. Por ejemplo:

¿La propiedad sería 'FNotes' o 'Remove'

Código Delphi [-]
    property FNotes: TObjectList< TFrmVerNota >

¿ '.Notes' tengo que definirla a priori?

Código Delphi [-]
FNotes[FNotes.Count - 1).Notes := FNotes;

Gracias una vez mas por todo

[[maeyanes]]

Hola...

¿Podrías poner el código completo de como lo estás haciendo ahora?


Saludos...

[jocaro]

Hola Maeyanes, disculpa el retraso. He tenido un pequeño accidente doméstico y no he podido contestar antes.

No puedo poner el código, ya que lo tengo en mi lugar habitual de trabajo y en un par de semanas no podré pasarme por allí.

Si ves alguna manera de contarme la lógica de declaración de la propiedad en la clase TFrmVerNota para pasar el objeto te lo agradecería.

Un saludo