prun.dpr

来自「一个dos游戏的源代码」· DPR 代码 · 共 30 行

program pRun;

uses
  Forms,
  uRun in 'uRun.pas' {Form_Main},
  uRunning in 'uRunning.pas' {Form_Run},
  uSprite in 'uSprite.pas',
  uInclude in 'uInclude.pas',
  uMap in 'uMap.pas',
  uArrow in 'uArrow.pas',
  uCut in 'uCut.pas',
  uFire in 'uFire.pas',
  uSkinSelect in 'uSkinSelect.pas' {Form_SkinSelect},
  uForm_Info in 'uForm_Info.pas' {Form_Info},
  uForm_Author in 'uForm_Author.pas' {Form_Author};

{$R *.res}

begin
  Application.Initialize;
  Application.Title := '极限1000米';
  Application.CreateForm(TForm_Main, Form_Main);
  Application.CreateForm(TForm_Run, Form_Run);
  Application.CreateForm(TForm_SkinSelect, Form_SkinSelect);
  Application.CreateForm(TForm_Info, Form_Info);
  Application.CreateForm(TForm_Author, Form_Author);
  Application.Run;
end.