Problem mit Tform und free

[himitsu]

Delphi-Quellcode:

var Form: TForm_Adressing; // lokale Variable

Form := TForm_Adressing.Create(NIL);
try
  Form.ShowModal;
finally
  Form.Free;
end;

FreeAndNil ist hier eigentlich nicht nötig

Delphi-Quellcode:

with TForm_Adressing.Create(NIL) do
  try
    ShowModal;
  finally
    Free;
  end;