Ver Mensaje Individual
  #4  
Antiguo 05-10-2005
Avatar de Lepe
[Lepe] Lepe is offline
Miembro Premium
 
Registrado: may 2003
Posts: 7.424
Reputación: 29
Lepe Va por buen camino
Cita:
Empezado por lento manu
Lo que no se es porque algunos objetos existen por si mismos y otros no, no se si es por su componente visual, o sea si debe ser pintado o no... ¿alguén los sabe? o ¿estoy metiendo la pata hasta el fondo?
Al crear un objeto Pepe:TObject tienes que especificar el dueño (parámetro AOwner), si le pones nil a ese parámetro, tienes que hacer un FreeAndNil(Pepe) obligatoriamente. Si en AOwner le das: Application, Form1, panel1, cuando se vaya a destruir ese objeto, él se encargará de liberar a Pepe.
Cita:
Empezado por lento manu
Con respecto al
Código Delphi [-]
 if Assigned(miobjeto) 
    then FreeAndNil(miobjeto);
a veces me explota ya en if Assigned pq ya no existe. ¿Ilógico no?
[/quote]
Si miobjeto está declarado dentro de Form1, y has liberado Form1, entonces si da el error.

Assigned solo comprueba que el valor de esa variable contiene el valor "nil" o bien una dirección de memoria. Recuerda que todos los objetos son, en realidad, punteros de memoria. Assigned solo comprueba el valor que tiene ese puntero. No el objeto en sí.

De hecho, cuando haces un Pepe.Free, el puntero Pepe no apunta a nil, se queda con basura y pueden venir Access violation al intentar acceder a pepe.

Saludando, dejo tranquilo a Pepe

Última edición por Lepe fecha: 05-10-2005 a las 20:19:51.
Responder Con Cita