subclass.dpr

来自「Delphi高级开发指南是开发程序的好帮手」· DPR 代码 · 共 16 行

program SubClass;

uses
  Forms,
  SubMain in 'SubMain.pas' {Form1},
  SubSecon in 'SubSecon.pas' {Form2};

{$R *.RES}

begin
  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  Application.CreateForm(TForm2, Form2);
  Application.Run;
end.