othello.dpr

来自「实现黑白棋的游戏」· DPR 代码 · 共 29 行

//工程单元 Othello.dpr
//BY Lishun,1999,all rights reserved
program Othello;

uses
  Forms,
  main in 'main.pas' {mainfrm},
  help in 'help.pas' {aboutfrm},
  all in 'all.pas',
  table in 'table.pas' {tablefrm},
  setting in 'setting.pas' {setfrm},
  Uwait in 'Uwait.pas' {waitfrm},
  Ueval in 'Ueval.pas',
  Udm in 'Udm.pas' {Dm: TDataModule};

{$R *.RES}

begin
  Application.Initialize;
  Application.Title := '黑白棋';
  Application.CreateForm(Tmainfrm, mainfrm);
  Application.CreateForm(Tsetfrm, setfrm);
  Application.CreateForm(Taboutfrm, aboutfrm);
  Application.CreateForm(Ttablefrm, tablefrm);
  Application.CreateForm(Tsetfrm, setfrm);
  Application.CreateForm(Twaitfrm, waitfrm);
  Application.CreateForm(TDm, Dm);
  Application.Run;
end.