procedure mmm;
var
Form2: TForm;
begin
if not Assigned(Form2) then
Form2 := TForm.Create(Appliation);
…………………………………………………………
Form2.free;
var
Form2: TForm;
begin
if not Assigned(Form2) then
Form2 := TForm.Create(Appliation);
…………………………………………………………
Form2.free;
与appliation.createform有什么区别啊?