-
-
Notifications
You must be signed in to change notification settings - Fork 3
/
fSceneGameOver.fmx
103 lines (103 loc) · 2.96 KB
/
fSceneGameOver.fmx
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
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
inherited frmSceneGameOver: TfrmSceneGameOver
inherited btnMenu: TButton
TabOrder = 1
end
object Label1: TLabel
Align = Top
Margins.Left = 10.000000000000000000
Margins.Top = 10.000000000000000000
Margins.Right = 10.000000000000000000
Margins.Bottom = 10.000000000000000000
Position.X = 18.000000000000000000
Position.Y = 20.000000000000000000
Scale.X = 1.799999952316284000
Scale.Y = 2.000000000000000000
Size.Width = 171.111114501953100000
Size.Height = 17.000000000000000000
Size.PlatformDefault = False
TextSettings.HorzAlign = Center
Text = 'Game Over'
TabOrder = 0
end
object edtPseudo: TEdit
Touch.InteractiveGestures = [LongTap, DoubleTap]
Align = Top
TabOrder = 3
KeyboardType = Alphabet
ReturnKeyType = Done
Position.X = 20.000000000000000000
Position.Y = 134.000000000000000000
Margins.Left = 20.000000000000000000
Margins.Top = 10.000000000000000000
Margins.Right = 20.000000000000000000
Size.Width = 304.000000000000000000
Size.Height = 44.000000000000000000
Size.PlatformDefault = False
TextPrompt = 'Your name or pseudo'
KillFocusByReturn = True
end
object btnSaveScore: TButton
Align = Top
Default = True
Margins.Left = 20.000000000000000000
Margins.Top = 10.000000000000000000
Margins.Right = 20.000000000000000000
Margins.Bottom = 10.000000000000000000
Position.X = 20.000000000000000000
Position.Y = 188.000000000000000000
Size.Width = 304.000000000000000000
Size.Height = 50.000000000000000000
Size.PlatformDefault = False
StyleLookup = 'MenuButtonStyle'
TabOrder = 5
Text = 'Save my score'
OnClick = btnSaveScoreClick
end
object GridPanelLayout1: TGridPanelLayout
Align = Top
Margins.Left = 20.000000000000000000
Margins.Right = 20.000000000000000000
Position.X = 20.000000000000000000
Position.Y = 74.000000000000000000
Size.Width = 304.000000000000000000
Size.Height = 50.000000000000000000
Size.PlatformDefault = False
TabOrder = 6
ColumnCollection = <
item
Value = 50.000000000000000000
end
item
Value = 50.000000000000000000
end>
ControlCollection = <
item
Column = 0
Control = txtScore
Row = 0
end
item
Column = 1
Control = txtLevelMax
Row = 0
end>
RowCollection = <
item
Value = 100.000000000000000000
end>
object txtScore: TText
Align = Client
Size.Width = 152.000000000000000000
Size.Height = 50.000000000000000000
Size.PlatformDefault = False
Text = 'score'
end
object txtLevelMax: TText
Align = Client
Size.Width = 152.000000000000000000
Size.Height = 50.000000000000000000
Size.PlatformDefault = False
Text = 'level max'
end
end
end