sudoku.dpr

来自「Sudoku is a logic-based number placement」· DPR 代码 · 共 22 行

program SuDoku;

uses
  Forms,
  MainFrm in 'MainFrm.pas' {MainForm},
  SplashScr in 'SplashScr.pas' {SplashScreen},
  QRGridSolution in 'QRGridSolution.pas' {QPGridSolution: TQuickRep};

{$R *.res}

begin
  SplashScreen  :=  TSplashScreen.Create(Application);
  SplashScreen.Show;
  Application.Initialize;
  SplashScreen.Update;
  Application.Title := 'Sudoku';
  Application.CreateForm(TMainForm, MainForm);
  SplashScreen.Hide;
  SplashScreen.Release;
  Application.Run;
end.