source: trunk/Settings.lfm

Last change on this file was 473, checked in by chronos, 5 months ago
  • Added: Custom DPI configuration in Settings dialog.
  • Fixed: Better High DPI support.
File size: 3.7 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 FormStyle = fsStayOnTop
13 OnClose = FormClose
14 OnCreate = FormCreate
15 OnDestroy = FormDestroy
16 OnPaint = FormPaint
17 OnShow = FormShow
18 Position = poScreenCenter
19 LCLVersion = '2.2.6.0'
20 Scaled = False
21 object ListLanguages: TListBox
22 Tag = 15360
23 Left = 16
24 Height = 291
25 Top = 32
26 Width = 144
27 BorderStyle = bsNone
28 Color = clBlack
29 ExtendedSelect = False
30 Font.Color = 4176863
31 Font.Height = -15
32 Font.Name = 'Times New Roman'
33 Font.Style = [fsBold]
34 IntegralHeight = True
35 ItemHeight = 0
36 ParentFont = False
37 ScrollWidth = 144
38 TabOrder = 1
39 TabStop = False
40 TopIndex = -1
41 end
42 object ButtonOk: TButtonA
43 Left = 364
44 Height = 25
45 Top = 400
46 Width = 100
47 Down = False
48 Permanent = False
49 OnClick = ButtonOkClick
50 end
51 object ButtonCancel: TButtonA
52 Left = 244
53 Height = 25
54 Top = 400
55 Width = 100
56 Down = False
57 Permanent = False
58 OnClick = ButtonCancelClick
59 end
60 object ButtonFullscreen: TButtonC
61 Left = 24
62 Height = 18
63 Top = 368
64 Width = 18
65 Down = False
66 Permanent = False
67 OnClick = ButtonFullscreenClick
68 ButtonIndex = 0
69 end
70 object ButtonGammaUp: TButtonC
71 Tag = 6912
72 Left = 452
73 Height = 12
74 Top = 360
75 Width = 12
76 Down = False
77 Permanent = False
78 OnClick = ButtonGammaUpClick
79 ButtonIndex = 1
80 end
81 object ButtonGammaDown: TButtonC
82 Tag = 6912
83 Left = 452
84 Height = 12
85 Top = 372
86 Width = 12
87 Down = False
88 Permanent = False
89 OnClick = ButtonGammaDownClick
90 ButtonIndex = 0
91 end
92 object ListKeyBindings: TListBox
93 Tag = 15360
94 Left = 176
95 Height = 232
96 Top = 32
97 Width = 288
98 BorderStyle = bsNone
99 Color = clBlack
100 ExtendedSelect = False
101 Font.Color = 4176863
102 Font.Height = -15
103 Font.Name = 'Times New Roman'
104 Font.Style = [fsBold]
105 IntegralHeight = True
106 ItemHeight = 0
107 OnSelectionChange = ListKeyBindingsSelectionChange
108 ParentFont = False
109 ScrollWidth = 288
110 TabOrder = 0
111 TabStop = False
112 TopIndex = -1
113 end
114 object EditShortCutPrimary: TEdit
115 Left = 176
116 Height = 27
117 Top = 296
118 Width = 136
119 BorderStyle = bsNone
120 Color = clBlack
121 Enabled = False
122 Font.Color = 4176863
123 Font.Height = -15
124 Font.Name = 'Times New Roman'
125 Font.Style = [fsBold]
126 OnKeyUp = EditShortCutPrimaryKeyUp
127 ParentFont = False
128 TabOrder = 2
129 end
130 object EditShortCutSecondary: TEdit
131 Left = 328
132 Height = 27
133 Top = 296
134 Width = 136
135 BorderStyle = bsNone
136 Color = clBlack
137 Enabled = False
138 Font.Color = 4176863
139 Font.Height = -15
140 Font.Name = 'Times New Roman'
141 Font.Style = [fsBold]
142 OnKeyUp = EditShortCutSecondaryKeyUp
143 ParentFont = False
144 TabOrder = 3
145 end
146 object ButtonReset: TButtonA
147 Left = 16
148 Height = 25
149 Top = 400
150 Width = 100
151 Down = False
152 Permanent = False
153 OnClick = ButtonResetClick
154 end
155 object ButtonCustomDpi: TButtonC
156 Left = 24
157 Height = 18
158 Top = 336
159 Width = 18
160 Down = False
161 Permanent = False
162 OnClick = ButtonCustomDpiClick
163 ButtonIndex = 0
164 end
165 object ButtonDpiUp: TButtonC
166 Tag = 6912
167 Left = 452
168 Height = 12
169 Top = 328
170 Width = 12
171 Down = False
172 Permanent = False
173 OnClick = ButtonDpiUpClick
174 ButtonIndex = 1
175 end
176 object ButtonDpiDown: TButtonC
177 Tag = 6912
178 Left = 452
179 Height = 12
180 Top = 340
181 Width = 12
182 Down = False
183 Permanent = False
184 OnClick = ButtonDpiDownClick
185 ButtonIndex = 0
186 end
187end
Note: See TracBrowser for help on using the repository browser.