FreeAndNil VS Free

[[oscarac]]

mmm me puse a cambiar los...

frmBalance := nil

por

FreeandNil(frmBalance)

y me sale el siguiente mensaje de error cuando cierro un formulario

Invalid Pointer operation


what da faq????

[[oscarac]]

la forma como creo los formularios es asi (dentro de un formulario Main)

Código Delphi [-]
 
frmBalance := TfrmBalance.create(nil);
frmbalance.show;

cuando coloco

freeandnil(frmbalance) en el destroy o en el close....me sale el error mencionado

pero si coloco esto en el destroy no me aparece mensaje

Código Delphi [-]
 
frmbalance := nil;
frmBalance.free;

me libera ? si? no?

antes de llamar al formulario balance coloque esto

Código Delphi [-]
 
if frmBalance = nil
  frmBalance := TfrmBalance.create(nil);

y siempre es nil

me olvidaba
coloco

action := caFree; en el close

esta bien asi?

[Casimiro Noteví]

No, no puedes hacerlo así, primero hay que liberar la memoria y luego asignarle nil a la misma.
Por eso el orden correcto es

x.free;
x:=nil;

o más cómodo:

freeandnil(x);

Si lo haces al revés, asignas nil, entonces cuando llamas a free no hace nada porque está a nil.


Edito: he contestado lo de antes sin haber visto tu último mensaje

[[oscarac]]

Concluyendo....

primero free y despues nil

y nunca nu freeandnil dentro del mismo form

[Casimiro Noteví]

Empezado por oscarac

Concluyendo....
primero free y despues nil
y nunca nu freeandnil dentro del mismo form

Eso sería como levantarte tú mismo del suelo tirando de los cordones de tus botas

El boot

[[oscarac]]

mmmm
deberias ver a los acrobatas que hay por aca...
desafian las reglas de la fisica

[[maeyanes]]

Hola...

oscarac, no es recomendable usar la variable que declara Delphi cuando creas un formulario nuevo:

Código Delphi [-]
type
  TMyForm = class(TForm)
  // ...
  end;

var
  MyForm: TMyForm; // <--- esta

dentro de los métodos o manejadores de eventos del mismo.

Estó es, si haces algo como:

Código Delphi [-]
procedure TMyForm.FormDestroy(Sender: TObject);
begin
  MyForm := nil
end;

Te podría traer problemas posteriores.

Si quieres garantizar que un formulario se destruye al cerrarlo una de las formas de lograrlo es el evento OnClose:

Código Delphi [-]
procedure TMyForm.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  Action := caFree
end;

Saludos...

[[oscarac]]

sigo con el tema...

coloco

frmbalance.free
frmbalance.nil

y me sale stack overflow

[rgstuamigo]

Empezado por oscarac

sigo con el tema...

coloco

frmbalance.free
frmbalance.nil

y me sale stack overflow

Pero.. en qué parte de tu código fuente colocas esas instrucciones? ¿Algun evento específico? ¿dónde?
Saludos...

[[Chris]]

Empezado por maeyanes

oscarac, no es recomendable usar la variable que declara Delphi cuando creas un formulario nuevo:

Código Delphi [-]
type
  TMyForm = class(TForm)
  // ...
  end;

var
  MyForm: TMyForm; // <--- esta

dentro de los métodos o manejadores de eventos del mismo.

Estó es, si haces algo como:

Código Delphi [-]
procedure TMyForm.FormDestroy(Sender: TObject);
begin
  MyForm := nil
end;

Te podría traer problemas posteriores.

Como comentario, no se trata que no sea recomendable utilizar la variable declarada por Delphi. De hecho, sí lo es. Lo que pasa es que nunca se debería utilizar esa variable para controlar aspectos del formulario. Siempre hay que utilizar la referencia Self para este menester. Usa la variable auto declarada por Delphi solo cuándo vallas a crear el formulario.

[roman]

Habría que ver el contexto. Por ejemplo, si llamas FreeAndNil desde el mismo formulario frmBalance, podría suceder el error que pones. En ese caso tendrías que usar Release en lugar de Free.

// Saludos

[[oscarac]]

me atrevo a preguntar

cual es la diferencia entre

frmBalance := TfrmBalance.create(nil) ;

y

frmBalance := TfrmBalance.create(self);

[[oscarac]]

Empezado por roman

Habría que ver el contexto. Por ejemplo, si llamas FreeAndNil desde el mismo formulario frmBalance, podría suceder el error que pones. En ese caso tendrías que usar Release en lugar de Free.

// Saludos

asi es.. lo estaba llamando dentro del mismo formulario frmBalance

entonces lo correcto seria

frmBalance.nil;
frmBalance.free;

???