project1.dpr

下面又是翻译： 韩国人 Silhwan Hyun 改写。 TMagnetic Class 是一个 Delphi 版本的"cMagneticWnd" 类

program Project1;

uses
  Forms,
  uMain in 'uMain.pas' {frmParent},
  Magnetic in 'Magnetic.pas',
  uSub1 in 'uSub1.pas' {frmChild1},
  uSub2 in 'uSub2.pas' {frmChild2},
  uSub3 in 'uSub3.pas' {frmChild3};

{$R *.res}

begin
  Application.Initialize;
  Application.CreateForm(TfrmParent, frmParent);
  Application.CreateForm(TfrmChild2, frmChild2);
  Application.CreateForm(TfrmChild3, frmChild3);
  Application.Run;
end.