-
Notifications
You must be signed in to change notification settings - Fork 57
/
Copy pathuMain.dfm
179 lines (179 loc) · 3.27 KB
/
uMain.dfm
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
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
object ToggleSwitch: TToggleSwitch
Left = 0
Top = 0
Caption = 'ToggleSwitch'
ClientHeight = 399
ClientWidth = 442
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Segoe UI'
Font.Style = []
PixelsPerInch = 96
TextHeight = 15
object lblVclStyle: TLabel
Left = 173
Top = 101
Width = 49
Height = 15
Caption = 'VCL Style'
end
object cbxVclStyles: TComboBox
Left = 236
Top = 98
Width = 193
Height = 23
Style = csDropDownList
TabOrder = 0
end
object chkEnabled: TCheckBox
Left = 296
Top = 190
Width = 133
Height = 17
Caption = 'Enabled'
Checked = True
State = cbChecked
TabOrder = 1
end
object chkReadOnly: TCheckBox
Left = 296
Top = 224
Width = 133
Height = 17
Caption = 'Read Only'
TabOrder = 2
end
object chkShowStateCaptions: TCheckBox
Left = 296
Top = 156
Width = 133
Height = 17
Caption = 'ShowStateCaptions'
Checked = True
State = cbChecked
TabOrder = 3
end
object grpAlignment: TRadioGroup
Left = 288
Top = 268
Width = 141
Height = 117
Caption = 'Alignment'
ItemIndex = 1
Items.Strings = (
'taLeftJustify'
'taRightJustify')
TabOrder = 4
end
object grpColors: TGroupBox
Left = 16
Top = 268
Width = 249
Height = 117
Caption = 'Colors (Windows Style Only)'
TabOrder = 5
object lblColor: TLabel
Left = 8
Top = 31
Width = 29
Height = 15
Caption = 'Color'
end
object lblThumbColor: TLabel
Left = 8
Top = 59
Width = 70
Height = 15
Caption = 'Thumb Color'
end
object lblFrameColor: TLabel
Left = 8
Top = 87
Width = 65
Height = 15
Caption = 'Frame Color'
end
object cbxColor: TColorBox
Left = 92
Top = 28
Width = 145
Height = 22
Selected = clWindow
TabOrder = 0
end
object cbxThumbColor: TColorBox
Left = 92
Top = 56
Width = 145
Height = 22
Selected = clWindowText
TabOrder = 1
end
object cbxFrameColor: TColorBox
Left = 92
Top = 84
Width = 145
Height = 22
Selected = clWindowText
TabOrder = 2
end
end
object grpState: TRadioGroup
Left = 16
Top = 80
Width = 133
Height = 49
Caption = 'State'
Columns = 2
ItemIndex = 0
Items.Strings = (
'Off'
'On')
TabOrder = 6
end
object grpStateCaptions: TGroupBox
Left = 16
Top = 152
Width = 249
Height = 89
Caption = 'State Captions'
TabOrder = 7
object lblCaptionOff: TLabel
Left = 8
Top = 26
Width = 59
Height = 15
Caption = 'CaptionOff'
end
object lblCaptionOn: TLabel
Left = 8
Top = 57
Width = 58
Height = 15
Caption = 'CaptionOn'
end
object edtCaptionOff: TEdit
Left = 92
Top = 23
Width = 145
Height = 23
TabOrder = 0
end
object edtCaptionOn: TEdit
Left = 92
Top = 54
Width = 145
Height = 23
TabOrder = 1
end
end
object TS: TToggleSwitch
Left = 200
Top = 30
Width = 73
Height = 20
TabOrder = 8
end
end