Subversion Repositories jumper

Rev

Blame | Last modification | View Log | RSS feed

  1. program PegSolitaire;
  2.  
  3. uses
  4.   Forms,
  5.   Main in 'Main.pas' {MainForm},
  6.   About in 'About.pas' {AboutBox},
  7.   Finish in 'Finish.pas' {FinishForm},
  8.   Choice in 'Choice.pas' {LevelChoice},
  9.   LevelFunctions in 'LevelFunctions.pas',
  10.   Functions in 'Functions.pas',
  11.   History in 'History.pas' {HistoryForm},
  12.   HighScore in 'HighScore.pas' {HighScoreForm},
  13.   Help in 'Help.pas' {HelpForm},
  14.   Constants in 'Constants.pas';
  15.  
  16. {$R *.res}
  17. {$R ExtraResources.res}
  18.  
  19. begin
  20.   Application.Initialize;
  21.   Application.Title := 'ViaThinkSoft Peg Solitaire';
  22.   Application.CreateForm(TMainForm, MainForm);
  23.   Application.CreateForm(TAboutBox, AboutBox);
  24.   Application.CreateForm(TFinishForm, FinishForm);
  25.   Application.CreateForm(TLevelChoice, LevelChoice);
  26.   Application.CreateForm(THistoryForm, HistoryForm);
  27.   Application.CreateForm(THighScoreForm, HighScoreForm);
  28.   Application.CreateForm(THelpForm, HelpForm);
  29.   Application.Run;
  30. end.
  31.