程序将第一个创建的窗体作为主窗体。如果创建了一个后，在其他窗体尚未创建的时候便释放调，
此时又创建了一个窗体，那么第二次创建的窗体就会变成主窗体了。
关闭主窗体，程序就认为是终止运行，并且调用 Free 释放掉主窗体资源，进而程序结束退出。
而关闭其他非主窗体，程序只是将其隐藏起来了。
子窗体会将主窗体的属性方法继承下来，对于主窗体中手动增加的方法（即声明在访问控制级别
private、protected、published、public 中的方法），除非显示的增加 virtual 关键字，并在子
类中显示的使用 override 关键字，否则不会使用多态的方式来继承（即晚绑定的方式）。而窗体的
元素方法（即那些没有任何控制级别关键字限制的方法，如一个窗体的 FormCreate 方法，或者说窗
体根据用户的操作自动生成的方法），会默认的使用多态的方式来继承。
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs;
type
TForm1 = class(TForm)
procedure FormCreate(Sender: TObject); // 子窗体默认会使用多态的的形式继承
private
{ Private declarations }
public
{ Public declarations }
procedure DoSomething; // 除非使用 virtual 和 override 关键字，否则子窗体不
//会以多态的方式继承
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.DoSomething;
begin
// 除非使用 virtual 和 override 关键字，否则子窗体不会以多态的方式继承
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
// 子窗体默认会使用多态的的形式继承
end;
end.
另注：在继承自己的窗体时，最好先将其加入工程，然后再使用向导来创建对应子类，否则
会存在一个很“隐晦”，而且不易发现，虽然这个错误在运行时并没有发现有什么影
响，但以防万一。（当用Ctrl+鼠标链接到父类窗体单元，再将其关闭，在鼠标放置
到子类声明处class后括号中的父类时，编译器的提示信息好想就部能够检测到父类
的信息了，于是报错了。还有就是创建的方法在使用ctrl + shift + c等自动创建代码
的情况下，不会自动加入"inherited"关键字，似乎无法实现晚绑定。）