-
-
Notifications
You must be signed in to change notification settings - Fork 1
/
Copy pathUnitLabelName.dfm
279 lines (279 loc) · 7.64 KB
/
UnitLabelName.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
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
object LabelNameForm: TLabelNameForm
Width = 600
Height = 206
Caption = 'Label Name'
Color = clNone
CSSLibrary = cssBootstrap
ElementClassName = 'border-0 draggable'
ElementFont = efCSS
Shadow = False
OnKeyDown = WebFormKeyDown
OnShow = WebFormShow
object divDialog: TWebHTMLDiv
Left = 0
Top = 0
Width = 600
Height = 206
ElementClassName = 'overflow-hidden rounded border border-3 border-success bg-dark'
ElementID = 'divDialog'
Align = alClient
ChildOrder = 2
ElementFont = efCSS
Role = ''
ExplicitHeight = 204
object Title: TWebLabel
Left = 0
Top = 0
Width = 600
Height = 40
Cursor = crSizeAll
Align = alTop
Alignment = taCenter
AutoSize = False
Caption = 'Label Name'
ChildOrder = 1
Color = clOlive
ElementClassName = 'border-bottom border-4 border-success'
ElementLabelClassName = 'bg-success text-white fs-6'
ElementFont = efCSS
HeightStyle = ssAuto
HeightPercent = 100.000000000000000000
Layout = tlCenter
Transparent = False
WidthPercent = 100.000000000000000000
ExplicitWidth = 647
end
object WebLabel1: TWebLabel
AlignWithMargins = True
Left = 10
Top = 45
Width = 585
Height = 21
Margins.Left = 10
Margins.Top = 5
Margins.Right = 5
Margins.Bottom = 5
Align = alClient
Caption = 'Please select a new Group and Label Name.'
ElementLabelClassName = 'text-white'
ElementFont = efCSS
HeightStyle = ssAuto
HeightPercent = 100.000000000000000000
Layout = tlCenter
WidthPercent = 100.000000000000000000
ExplicitWidth = 209
ExplicitHeight = 13
end
object divFormLabelGroup: TWebHTMLDiv
AlignWithMargins = True
Left = 5
Top = 71
Width = 590
Height = 42
Margins.Left = 5
Margins.Top = 0
Margins.Right = 5
Margins.Bottom = 0
ElementClassName = 'rounded border border-1 border-secondary bg-dark'
ElementID = 'divFormLabelGroup'
Align = alBottom
ChildOrder = 2
ElementFont = efCSS
Role = ''
ExplicitTop = 69
object labelGroup: TWebLabel
AlignWithMargins = True
Left = 3
Top = 3
Width = 80
Height = 36
Align = alLeft
Alignment = taCenter
AutoSize = False
ElementClassName = 'text-white bg-secondary rounded-1'
ElementID = 'labelGroup'
ElementFont = efCSS
HeightPercent = 100.000000000000000000
HTML = '<div style="font-size: 12px;" class="px-2">Group Name</div>'
Layout = tlCenter
WidthPercent = 100.000000000000000000
ExplicitHeight = 35
end
object cmbGroupName: TWebComboBox
AlignWithMargins = True
Left = 86
Top = 3
Width = 501
Height = 21
Margins.Left = 0
Align = alClient
ElementClassName = 'rounded-1 border-0 ps-2'
ElementID = 'cmbGroupName'
ElementFont = efCSS
HeightPercent = 100.000000000000000000
Style = csDropDown
TextHint = 'Select Group'
WidthPercent = 100.000000000000000000
OnChange = edtLabelNameChange
OnKeyDown = WebFormKeyDown
ItemIndex = -1
Items.Strings = (
'a'
'b'
'c'
'd')
end
end
object divFormLabelName: TWebHTMLDiv
AlignWithMargins = True
Left = 5
Top = 118
Width = 590
Height = 42
Margins.Left = 5
Margins.Top = 5
Margins.Right = 5
Margins.Bottom = 5
ElementClassName = 'rounded border border-1 border-secondary bg-dark'
ElementID = 'divFormLabelName'
Align = alBottom
ChildOrder = 3
ElementFont = efCSS
Role = ''
ExplicitTop = 116
object labelName: TWebLabel
AlignWithMargins = True
Left = 3
Top = 3
Width = 80
Height = 36
Align = alLeft
Alignment = taCenter
AutoSize = False
Caption = 'Label Name'
ElementClassName = 'text-white bg-secondary rounded-1'
ElementID = 'labelName'
ElementFont = efCSS
HeightPercent = 100.000000000000000000
HTML = '<div style="font-size: 12px;" class="px-2">Label Name</div>'
Layout = tlCenter
WidthPercent = 100.000000000000000000
ExplicitHeight = 35
end
object edtLabelName: TWebEdit
AlignWithMargins = True
Left = 86
Top = 3
Width = 501
Height = 36
Margins.Left = 0
Align = alClient
ChildOrder = 1
ElementClassName = 'ps-2 rounded-1 border-0'
ElementID = 'edtLabelName'
ElementFont = efCSS
HeightPercent = 100.000000000000000000
Text = 'edtLabelName'
TextHint = 'Enter a Label Name'
WidthPercent = 100.000000000000000000
OnChange = edtLabelNameChange
OnKeyDown = WebFormKeyDown
ExplicitHeight = 35
end
end
object WebHTMLDiv3: TWebHTMLDiv
Left = 0
Top = 165
Width = 600
Height = 41
Align = alBottom
ChildOrder = 4
ElementFont = efCSS
Role = ''
ExplicitTop = 163
object labelFormError: TWebLabel
AlignWithMargins = True
Left = 10
Top = 0
Width = 380
Height = 38
Margins.Left = 10
Margins.Top = 0
Align = alClient
AutoSize = False
Caption = 'This is an error message'
ElementLabelClassName = 'text-warning fst-italic'
ElementID = 'labelFormError'
ElementFont = efCSS
HeightPercent = 100.000000000000000000
Layout = tlCenter
WidthPercent = 100.000000000000000000
ExplicitLeft = 104
ExplicitTop = 24
ExplicitWidth = 53
ExplicitHeight = 13
end
object btnFormCancel: TWebButton
AlignWithMargins = True
Left = 499
Top = 0
Width = 96
Height = 36
Margins.Left = 5
Margins.Top = 0
Margins.Right = 5
Margins.Bottom = 5
Align = alRight
Caption =
'<i style="color: #f99;" class="fa-solid fa-times pe-1 fa-lg"></i' +
'> Cancel'
ChildOrder = 2
ElementClassName = 'btn btn-danger'
ElementID = 'btnFormCancel'
ElementFont = efCSS
HeightPercent = 100.000000000000000000
TabOrder = 1
WidthStyle = ssAuto
WidthPercent = 100.000000000000000000
OnClick = btnFormCancelClick
end
object btnFormOK: TWebButton
AlignWithMargins = True
Left = 398
Top = 0
Width = 96
Height = 36
Margins.Left = 5
Margins.Top = 0
Margins.Right = 0
Margins.Bottom = 5
Align = alRight
Caption =
'<i style="color:yellow;" class="fa-solid fa-check pe-1 fa-lg"></' +
'i> OK'
ChildOrder = 1
Default = True
ElementClassName = 'btn btn-success'
ElementID = 'btnFormOK'
ElementFont = efCSS
HeightPercent = 100.000000000000000000
WidthStyle = ssAuto
WidthPercent = 100.000000000000000000
OnClick = btnFormOKClick
end
end
object btnFormClose: TWebButton
Left = 566
Top = 0
Width = 26
Height = 26
Caption = '<i class="fa-solid fa-xmark"></i>'
ElementClassName = 'btn btn-success btn-sm m-0 p-0'
ElementID = 'btnFormClose'
ElementFont = efCSS
HeightPercent = 100.000000000000000000
WidthPercent = 100.000000000000000000
OnClick = btnFormCloseClick
end
end
end