Last change
on this file was 20, checked in by chronos, 5 years ago |
- Added: Player can undo last move.
- Modified: Optimized code of TGame.CanMove method.
|
File size:
1.5 KB
|
Line | |
---|
1 | object Core: TCore
|
---|
2 | OnCreate = DataModuleCreate
|
---|
3 | OnDestroy = DataModuleDestroy
|
---|
4 | OldCreateOrder = False
|
---|
5 | Height = 534
|
---|
6 | HorizontalOffset = 1092
|
---|
7 | VerticalOffset = 494
|
---|
8 | Width = 635
|
---|
9 | PPI = 144
|
---|
10 | object ThemeManager1: TThemeManager
|
---|
11 | left = 420
|
---|
12 | top = 84
|
---|
13 | end
|
---|
14 | object PersistentForm1: TPersistentForm
|
---|
15 | MinVisiblePart = 50
|
---|
16 | EntireVisible = False
|
---|
17 | left = 120
|
---|
18 | top = 288
|
---|
19 | end
|
---|
20 | object ApplicationInfo1: TApplicationInfo
|
---|
21 | Identification = 1
|
---|
22 | VersionMajor = 1
|
---|
23 | VersionMinor = 0
|
---|
24 | VersionBugFix = 0
|
---|
25 | HomePage = 'https://app.zdechov.net/2048'
|
---|
26 | AuthorsName = 'Chronos'
|
---|
27 | EmailContact = 'robie@centrum.cz'
|
---|
28 | AppName = '2048'
|
---|
29 | Description = 'Classic 2048 puzzle game.'
|
---|
30 | ReleaseDate = 43742
|
---|
31 | RegistryKey = '\Software\Chronosoft\2048'
|
---|
32 | RegistryRoot = rrKeyCurrentUser
|
---|
33 | License = 'CC0'
|
---|
34 | left = 120
|
---|
35 | top = 96
|
---|
36 | end
|
---|
37 | object Translator1: TTranslator
|
---|
38 | POFilesFolder = 'Languages'
|
---|
39 | left = 336
|
---|
40 | top = 295
|
---|
41 | end
|
---|
42 | object ActionList1: TActionList
|
---|
43 | left = 420
|
---|
44 | top = 184
|
---|
45 | object ANew: TAction
|
---|
46 | Caption = 'New...'
|
---|
47 | OnExecute = ANewExecute
|
---|
48 | ShortCut = 113
|
---|
49 | end
|
---|
50 | object AExit: TAction
|
---|
51 | Caption = 'Exit'
|
---|
52 | OnExecute = AExitExecute
|
---|
53 | end
|
---|
54 | object AAbout: TAction
|
---|
55 | Caption = 'About'
|
---|
56 | OnExecute = AAboutExecute
|
---|
57 | end
|
---|
58 | object ASettings: TAction
|
---|
59 | Caption = 'Settings'
|
---|
60 | OnExecute = ASettingsExecute
|
---|
61 | ShortCut = 120
|
---|
62 | end
|
---|
63 | object AUndo: TAction
|
---|
64 | Caption = 'Undo'
|
---|
65 | OnExecute = AUndoExecute
|
---|
66 | ShortCut = 114
|
---|
67 | end
|
---|
68 | end
|
---|
69 | end
|
---|
Note:
See
TracBrowser
for help on using the repository browser.