forked from brian-scott-andrews/TurboRisk
-
Notifications
You must be signed in to change notification settings - Fork 0
/
TurboRisk.lpr
57 lines (53 loc) · 1.74 KB
/
TurboRisk.lpr
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
program TurboRisk;
{$MODE Delphi}
uses
Forms, Interfaces,
{HTMLHElpViewerMario,}
SimMap in 'SimMap.pas' {fSimMap},
Globals in 'Globals.pas',
Territ in 'Territ.pas',
NewGame in 'NewGame.pas' {fNewGame},
Computer in 'Computer.pas',
Stats in 'Stats.pas' {fStats},
Human in 'Human.pas',
Rules in 'Rules.pas' {fRules},
Cards in 'Cards.pas' {fCards},
Attack in 'Attack.pas' {fAttack},
Move in 'Move.pas' {fMove},
Players in 'Players.pas' {fPlayers},
Log in 'Log.pas' {fLog},
About in 'About.pas' {fAbout},
ExpSubr in 'ExpSubr.pas',
Map in 'Map.pas' {fMap},
History in 'History.pas' {fHistory},
Programs in 'Programs.pas' {fPrograms},
TRPError in 'TRPError.pas' {fTRPError},
Pref in 'Pref.pas' {fPref},
SplashScreen in 'SplashScreen.pas' {fSplashScreen},
UDialog in 'UDialog.pas' {fUDialog},
Main in 'Main.pas' {fMain};
{.$R *.RES}
begin
Application.Initialize;
fSplashScreen := TfSplashScreen.Create(Application) ;
fSplashScreen.Show;
fSplashScreen.Update;
Application.CreateForm(TfMain, fMain);
Application.CreateForm(TfSimMap, fSimMap);
Application.CreateForm(TfNewGame, fNewGame);
Application.CreateForm(TfStats, fStats);
Application.CreateForm(TfRules, fRules);
Application.CreateForm(TfCards, fCards);
Application.CreateForm(TfAttack, fAttack);
Application.CreateForm(TfMove, fMove);
Application.CreateForm(TfPlayers, fPlayers);
Application.CreateForm(TfLog, fLog);
Application.CreateForm(TfAbout, fAbout);
Application.CreateForm(TfMap, fMap);
Application.CreateForm(TfHistory, fHistory);
Application.CreateForm(TfPrograms, fPrograms);
Application.CreateForm(TfTRPError, fTRPError);
Application.CreateForm(TfPref, fPref);
Application.CreateForm(TfUDialog, fUDialog);
Application.Run;
end.