close Warning: Can't synchronize with repository "(default)" (No changeset 184 in the repository). Look in the Trac log for more information.

source: trunk/Forms/UFormSettings.lfm

Last change on this file was 145, checked in by chronos, 7 years ago
  • Modified: Do not create settings form on application start but just if form is opened.
  • Fixed: Removed various compilation warnings.
File size: 3.5 KB
Line 
1object FormSettings: TFormSettings
2 Left = 404
3 Height = 327
4 Top = 574
5 Width = 554
6 ActiveControl = ButtonOk
7 Caption = 'Settings'
8 ClientHeight = 327
9 ClientWidth = 554
10 Constraints.MinHeight = 327
11 Constraints.MinWidth = 554
12 OnCreate = FormCreate
13 OnShow = FormShow
14 Position = poMainFormCenter
15 LCLVersion = '1.8.0.4'
16 object ButtonOk: TButton
17 Left = 444
18 Height = 25
19 Top = 284
20 Width = 75
21 Anchors = [akRight, akBottom]
22 Caption = 'Ok'
23 ModalResult = 1
24 TabOrder = 0
25 end
26 object ButtonCancel: TButton
27 Left = 322
28 Height = 25
29 Top = 284
30 Width = 75
31 Anchors = [akRight, akBottom]
32 Caption = 'Cancel'
33 ModalResult = 2
34 TabOrder = 1
35 end
36 object PageControl1: TPageControl
37 Left = 4
38 Height = 264
39 Top = 4
40 Width = 546
41 ActivePage = TabSheetGeneral
42 Align = alTop
43 Anchors = [akTop, akLeft, akRight, akBottom]
44 BorderSpacing.Around = 4
45 TabIndex = 0
46 TabOrder = 2
47 object TabSheetGeneral: TTabSheet
48 Caption = 'General'
49 ClientHeight = 220
50 ClientWidth = 540
51 object Label2: TLabel
52 Left = 27
53 Height = 26
54 Top = 78
55 Width = 150
56 Caption = 'Animation speed:'
57 ParentColor = False
58 end
59 object SpinEditAnimSpeed: TSpinEdit
60 Left = 232
61 Height = 36
62 Top = 72
63 Width = 122
64 TabOrder = 0
65 end
66 object Label3: TLabel
67 Left = 368
68 Height = 26
69 Top = 82
70 Width = 15
71 Caption = '%'
72 ParentColor = False
73 end
74 object CheckBoxAutoSaveTurn: TCheckBox
75 Left = 8
76 Height = 27
77 Top = 112
78 Width = 586
79 Anchors = [akTop, akLeft, akRight]
80 AutoSize = False
81 Caption = 'Autosave game on each turn'
82 TabOrder = 1
83 end
84 object Label1: TLabel
85 Left = 20
86 Height = 26
87 Top = 26
88 Width = 88
89 Caption = 'Language:'
90 ParentColor = False
91 end
92 object ComboBoxLanguage: TComboBox
93 Left = 178
94 Height = 40
95 Top = 24
96 Width = 196
97 ItemHeight = 0
98 Style = csDropDownList
99 TabOrder = 2
100 end
101 end
102 object TabSheetDebug: TTabSheet
103 Caption = 'Debug'
104 ClientHeight = 220
105 ClientWidth = 540
106 object CheckBoxDevelMode: TCheckBox
107 Left = 16
108 Height = 27
109 Top = 136
110 Width = 512
111 Anchors = [akTop, akLeft, akRight]
112 AutoSize = False
113 Caption = 'Developer mode'
114 TabOrder = 0
115 end
116 object Label4: TLabel
117 Left = 14
118 Height = 25
119 Top = 67
120 Width = 32
121 Caption = 'DPI:'
122 ParentColor = False
123 end
124 object SpinEditX: TSpinEdit
125 Left = 104
126 Height = 33
127 Top = 64
128 Width = 96
129 MaxValue = 500
130 MinValue = 20
131 TabOrder = 1
132 Value = 50
133 end
134 object SpinEditY: TSpinEdit
135 Left = 232
136 Height = 33
137 Top = 64
138 Width = 90
139 MaxValue = 500
140 MinValue = 20
141 TabOrder = 2
142 Value = 20
143 end
144 object Label5: TLabel
145 Left = 208
146 Height = 25
147 Top = 67
148 Width = 8
149 Caption = 'x'
150 ParentColor = False
151 end
152 object CheckBox2: TCheckBox
153 Left = 16
154 Height = 24
155 Top = 32
156 Width = 508
157 Anchors = [akTop, akLeft, akRight]
158 AutoSize = False
159 Caption = 'Automatic DPI'
160 OnChange = CheckBox2Change
161 TabOrder = 3
162 end
163 end
164 end
165end
Note: See TracBrowser for help on using the repository browser.