在程序运行期间动态创建一个窗体,如何实现?

Question

在程序运行期间动态创建一个窗体,如何实现?
在C++ Builder中我是这样实现的,现学delphi,不知该如何改?
  TAboutNew * AboutNew = new TAboutNew(this);
  AboutNew->ShowModal();
  delete AboutNew;

Answer 1

AboutNew:=TAboutNew.create(application);
AboutNew.showmodal;
AboutNew.free;

Answer 2

AboutNew:=TAboutNew.create(application);
AboutNew.showmodal;
不用加这一句：
AboutNew.free;
你创建了，又释放了还显示什么啊
因此只写前面两句就可以

Answer 3

同意以上的，还可用:AboutNew:=TAboutNew.create(self);
AboutNew.show;

Answer 4

  AddFirstAttribForm:=TAddFirstAttribForm.Create(Application);
  try
 
    AddFirstAttribForm.ShowModal;
  finally    AddFirstAttribForm.Free;
  end;
;

Answer 5

var
  AboutNew: TAboutNew;
begin
  try 
    AboutNew:=TAboutNew.Create(Nil);
    AboutNew.showmodal;
  finally
    FreeAndNil(AboutNew);
  end;
end;