source: trunk/Settings.lfm

Last change on this file was 666, checked in by chronos, 3 days ago
  • Added: Music volume option in game settings form.
File size: 4.5 KB
Line 
1object SettingsDlg: TSettingsDlg
2 Left = 766
3 Height = 448
4 Top = 240
5 Width = 483
6 BorderStyle = bsNone
7 Caption = 'Settings'
8 ClientHeight = 448
9 ClientWidth = 483
10 Color = clBtnFace
11 DesignTimePPI = 144
12 Font.Color = clWindowText
13 Font.Height = -17
14 Font.Name = 'MS Sans Serif'
15 FormStyle = fsStayOnTop
16 Position = poScreenCenter
17 LCLVersion = '4.0.0.4'
18 Scaled = False
19 OnClose = FormClose
20 OnCreate = FormCreate
21 OnDestroy = FormDestroy
22 OnPaint = FormPaint
23 OnShow = FormShow
24 object ListLanguages: TListBoxEx
25 Tag = 15360
26 Left = 16
27 Height = 280
28 Top = 32
29 Width = 144
30 BorderStyle = bsNone
31 Color = clBlack
32 ExtendedSelect = False
33 Font.Color = 4176863
34 Font.Height = -15
35 Font.Name = 'Times New Roman'
36 Font.Style = [fsBold]
37 IntegralHeight = True
38 ItemHeight = 20
39 ParentFont = False
40 ScrollWidth = 144
41 Style = lbOwnerDrawVariable
42 TabOrder = 1
43 TabStop = False
44 TopIndex = -1
45 end
46 object ButtonOk: TButtonA
47 Left = 364
48 Height = 25
49 Top = 400
50 Width = 100
51 Down = False
52 Permanent = False
53 OnClick = ButtonOkClick
54 end
55 object ButtonCancel: TButtonA
56 Left = 244
57 Height = 25
58 Top = 400
59 Width = 100
60 Down = False
61 Permanent = False
62 OnClick = ButtonCancelClick
63 end
64 object ButtonFullscreen: TButtonC
65 Left = 16
66 Height = 18
67 Top = 368
68 Width = 18
69 Down = False
70 Permanent = False
71 OnClick = ButtonFullscreenClick
72 ButtonIndex = 0
73 end
74 object ButtonGammaUp: TButtonC
75 Tag = 6912
76 Left = 452
77 Height = 12
78 Top = 360
79 Width = 12
80 Down = False
81 Permanent = False
82 OnClick = ButtonGammaUpClick
83 ButtonIndex = 1
84 end
85 object ButtonGammaDown: TButtonC
86 Tag = 6912
87 Left = 452
88 Height = 12
89 Top = 372
90 Width = 12
91 Down = False
92 Permanent = False
93 OnClick = ButtonGammaDownClick
94 ButtonIndex = 0
95 end
96 object ListKeyBindings: TListBoxEx
97 Tag = 15360
98 Left = 176
99 Height = 232
100 Top = 32
101 Width = 288
102 BorderStyle = bsNone
103 Color = clBlack
104 ExtendedSelect = False
105 Font.Color = 4176863
106 Font.Height = -15
107 Font.Name = 'Times New Roman'
108 Font.Style = [fsBold]
109 IntegralHeight = True
110 ItemHeight = 20
111 ParentFont = False
112 ScrollWidth = 288
113 Style = lbOwnerDrawVariable
114 TabOrder = 0
115 TabStop = False
116 TopIndex = -1
117 OnSelectionChange = ListKeyBindingsSelectionChange
118 end
119 object ButtonReset: TButtonA
120 Left = 16
121 Height = 25
122 Top = 400
123 Width = 100
124 Down = False
125 Permanent = False
126 OnClick = ButtonResetClick
127 end
128 object ButtonCustomDpi: TButtonC
129 Left = 176
130 Height = 18
131 Top = 334
132 Width = 18
133 Down = False
134 Permanent = False
135 OnClick = ButtonCustomDpiClick
136 ButtonIndex = 0
137 end
138 object ButtonDpiUp: TButtonC
139 Tag = 6912
140 Left = 452
141 Height = 12
142 Top = 328
143 Width = 12
144 Down = False
145 Permanent = False
146 OnClick = ButtonDpiUpClick
147 ButtonIndex = 1
148 end
149 object ButtonDpiDown: TButtonC
150 Tag = 6912
151 Left = 452
152 Height = 12
153 Top = 340
154 Width = 12
155 Down = False
156 Permanent = False
157 OnClick = ButtonDpiDownClick
158 ButtonIndex = 0
159 end
160 object ButtonMusicVolumeDown: TButtonC
161 Tag = 6912
162 Left = 136
163 Height = 12
164 Top = 340
165 Width = 12
166 Down = False
167 Permanent = False
168 OnClick = ButtonMusicVolumeDownClick
169 ButtonIndex = 0
170 end
171 object ButtonMusicVolumeUp: TButtonC
172 Tag = 6912
173 Left = 136
174 Height = 12
175 Top = 328
176 Width = 12
177 Down = False
178 Permanent = False
179 OnClick = ButtonMusicVolumeUpClick
180 ButtonIndex = 1
181 end
182 object EditShortCutPrimary: TEdit
183 AutoSize = True
184 ClientHeight = 27
185 ClientWidth = 136
186 Top = 296
187 Left = 176
188 Width = 136
189 Height = 27
190 Enabled = False
191 ShowHint = False
192 Font.Color = 4176863
193 Font.Name = 'Times New Roman'
194 Font.Style = [fsBold]
195 Font.PixelsPerInch = 96
196 Font.Height = -15
197 Align = alNone
198 Color = clBlack
199 TabStop = True
200 OnKeyUp = EditShortCutPrimaryKeyUp
201 BorderStyle = bsNone
202 ParentFont = False
203 end
204 object EditShortCutSecondary: TEdit
205 AutoSize = True
206 ClientHeight = 27
207 ClientWidth = 136
208 Top = 296
209 Left = 328
210 Width = 136
211 Height = 27
212 Enabled = False
213 ShowHint = False
214 Font.Color = 4176863
215 Font.Name = 'Times New Roman'
216 Font.Style = [fsBold]
217 Font.PixelsPerInch = 96
218 Font.Height = -15
219 Align = alNone
220 Color = clBlack
221 TabStop = True
222 OnKeyUp = EditShortCutSecondaryKeyUp
223 BorderStyle = bsNone
224 ParentFont = False
225 end
226end
Note: See TracBrowser for help on using the repository browser.