Question

Delphi 中 form.create(application)和form.create(nil)的区别

如题

Answer 1

procedure TForm1.Button3Click(Sender: TObject);
begin
form2:=Tform2.create(application);
form2.ShowModal;
form2.Free ;
end;

procedure TForm1.Button4Click(Sender: TObject);
begin
form2:=Tform2.create(nil);
form2.ShowModal;
form2.Free ;
end;
运行效果是一样，不过form2的父是一个应用程序、一个是nil,如果在多线程中求句柄的话一个就是应用程序句柄，一个是nil句柄；在通常的单线程（主线程）中是一样的。