Estudiando constructores y destructores

[[AgustinOrtu]]

Yo creo que hay algo mas

No esta apuntando a garbage como decis: creo que por alguna feliz coincidencia, siempre apunta a Sender

Creo que tiene que ver con el codigo que emite el compilador; desgraciadamente, no soy capaz de leer lenguaje ensamblador

Código Delphi [-]
var
  Local: TObject;
begin
  Local.Free; // acesss violation aca
  ShowMessage(Local.ClassName);
  Button1.Visible := True; // comentando esta linea, desaparece el access violation
end;

[ecfisa]

Hola Agustin.

Empezado por AgustinOrtu

Yo creo que hay algo mas

No esta apuntando a garbage como decis: creo que por alguna feliz coincidencia, siempre apunta a Sender

...

No parece ser así en todos los casos, por ejemplo reduciendo el código a esto,

Código Delphi [-]
...
procedure TForm1.Button1Click(Sender: TObject);
var
  LocalObj: TObject;
begin
  LocalObj.Free;
end;

end.

cierra Form1 y deja el proyecto residente en memoria.

No sé con seguridad que valor tiene la variable LocalObj al momento de la llamada a Free, pero sin dudas que inicializando la variable local no se produce ninguna anomalía.

Saludos