-
Notifications
You must be signed in to change notification settings - Fork 0
/
TimeCounterUnit.dfm
509 lines (509 loc) · 16.5 KB
/
TimeCounterUnit.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
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
object TimeCounter: TTimeCounter
Left = 120
Top = 120
BorderStyle = bsNone
Caption = #1057#1088#1072#1074#1085#1077#1085#1080#1077' '#1076#1072#1090
ClientHeight = 292
ClientWidth = 457
Color = clWhite
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
OldCreateOrder = False
Position = poDesigned
PixelsPerInch = 96
TextHeight = 13
object CheckedRadioButton1: TImage
Left = 8
Top = 62
Width = 16
Height = 16
Picture.Data = {
0954506E67496D61676589504E470D0A1A0A0000000D49484452000000100000
001008060000001FF3FF61000000017352474200AECE1CE90000000467414D41
0000B18F0BFC6105000000097048597300000EC300000EC301C76FA864000002
114944415478DAA5933F68D35110C7EF2E55A22876920E1DB28849D3EA92A042
852C6EBAD95D4711ED2F68860C4DAF894E22BFA6545C041D04070585BAE9D0A1
60A542F14FFE8882190A8A2E2914294D72E7BD24C694C4A2F40D3FEEBDF7BBCF
DDF7BDEF435585DD0CEC0738C657871B103829AA27DC9C105F07A0B1FC8EE7D6
7604249807BECBBA07A03905AC2368D9AD5B1CB66F10016E1EA6C11B8BCCF51E
403BF985CD6200922E65F3F3DD95C253DE0544F40DFAF9270D9EAE306F6E038C
6492D72D9A16A2F847BE5D0E310783B03EEAF636E1D00797E0A4D5855615E141
696636D501B4373E2968CA558EF0E4280A3E0674AD3735548460A2CCFE9B2827
CF8BE823A1C0982BD404B416E17E29EB1F7495F74B75B593DC1EF6DB1AD156A4
C077364632DE0F554C9772FEBD262032EDDD428544313B1B0F7332460A2BFDEF
0CCE14D97F6972172CAE1467FC2BDD8071039CDA09A028E74A9C7FDE03E89610
E5CB0754F6BEB71F42DB25E837A2DA11272192F1BE1A6DAA23C11D624DE88B4D
2E1673F987AE0B14788A08C37F9275A2C0F9253BE0B3A8B4D0408A740EB1758D
1E9B6126F75063CC39CE75223090683A11EA8BAE7294534322F515033F73EDF7
3152F595852124BC5460FF49B704571984EE9A9136906A7107ECB1B2BBC27D5A
CDD9BD7B66DBAA6D2FB76CA03173E19085F3885BE9DFC97F7D4C47F95A981A32
8E04C79B0081B712A025A7F99F5EE3FF8C5FF5073AF03E990DD7000000004945
4E44AE426082}
OnClick = CheckedRadioButton1Click
end
object Label1: TLabel
Left = 30
Top = 65
Width = 203
Height = 27
Alignment = taCenter
AutoSize = False
Caption = '... '#1087#1088#1086#1096#1083#1086' '#1089' '#1085#1072#1095#1072#1083#1072' '#1091#1082#1072#1079#1072#1085#1085#1086#1081' '#1076#1072#1090#1099'?'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Roboto'
Font.Style = []
ParentFont = False
WordWrap = True
end
object Label2: TLabel
Left = 8
Top = 43
Width = 441
Height = 16
AutoSize = False
Caption = #1057#1082#1086#1083#1100#1082#1086' '#1076#1085#1077#1081' ...'
Font.Charset = DEFAULT_CHARSET
Font.Color = 7372329
Font.Height = -12
Font.Name = 'Roboto'
Font.Style = [fsBold]
ParentFont = False
end
object UncheckedRadioButton2: TImage
Left = 250
Top = 62
Width = 16
Height = 16
Picture.Data = {
0954506E67496D61676589504E470D0A1A0A0000000D49484452000000100000
001008060000001FF3FF61000000017352474200AECE1CE90000000467414D41
0000B18F0BFC6105000000097048597300000EC300000EC301C76FA864000001
A24944415478DAA593B12F437110C7EFAE240C1293180C362D294B1B2495F803
8CFE0046035E43870E6D4FCB24F25A21160983C46290182D06096210126D8584
412261A94444E8FB9DDFABB669EB458A1B5EEEEE97FBDCBBFB7D7F2822F01F43
27402F4F7558E01A5022FD764C88272EB08E2F78F9FE47C03073C3A37A360024
21807904C9DA79EDBBF5B7090116DAA875FE8039FF0D502CDED7910F408533F1
D44A652777C418434453436F5EA975E88EF9AD0AD01D0DCE6A2FA688FC57BC94
759AD71E2DAFE84C10363373C95019503CB81690506DE75AEBE1E0A852B2ADC8
E5B51B15005F49D8C8C4CD967A36DF1D359E44309C4998EB058027662CA2C070
3A9EF4D70708EE01C25D7ACE9CAC04043460F04F80DF8EE0891A0F2018298F60
2FF143D1AD0EC6D389D4D68FC53C3D82427B1692A7BCC4E262580B66BA912CAF
93E2BE6E20D4AE54FE141176EDDF771052EE48BB9D483871C9E64E6D6750B4A6
85F482F4E1BFE4D5972A806D9DCC4DCD924B68ED1A5AB6397D7C6CE7B53E7C5A
85EDDA5D417C0F978ABF014AD6C5336EB2540009FA0A0005E7CA45874E0AC5FF
3EE74FE310F3E1E95C70180000000049454E44AE426082}
OnClick = UncheckedRadioButton2Click
end
object Label4: TLabel
Left = 272
Top = 65
Width = 177
Height = 27
Alignment = taCenter
AutoSize = False
Caption = '... '#1086#1089#1090#1072#1083#1086#1089#1100' '#1076#1086' '#1091#1082#1072#1079#1072#1085#1085#1086#1081' '#1076#1072#1090#1099'?'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Roboto'
Font.Style = []
ParentFont = False
WordWrap = True
end
object UncheckedRadioButton1: TImage
Left = 8
Top = 62
Width = 16
Height = 16
Picture.Data = {
0954506E67496D61676589504E470D0A1A0A0000000D49484452000000100000
001008060000001FF3FF61000000017352474200AECE1CE90000000467414D41
0000B18F0BFC6105000000097048597300000EC300000EC301C76FA864000001
A24944415478DAA593B12F437110C7EFAE240C1293180C362D294B1B2495F803
8CFE0046035E43870E6D4FCB24F25A21160983C46290182D06096210126D8584
412261A94444E8FB9DDFABB669EB458A1B5EEEEE97FBDCBBFB7D7F2822F01F43
27402F4F7558E01A5022FD764C88272EB08E2F78F9FE47C03073C3A37A360024
21807904C9DA79EDBBF5B7090116DAA875FE8039FF0D502CDED7910F408533F1
D44A652777C418434453436F5EA975E88EF9AD0AD01D0DCE6A2FA688FC57BC94
759AD71E2DAFE84C10363373C95019503CB81690506DE75AEBE1E0A852B2ADC8
E5B51B15005F49D8C8C4CD967A36DF1D359E44309C4998EB058027662CA2C070
3A9EF4D70708EE01C25D7ACE9CAC04043460F04F80DF8EE0891A0F2018298F60
2FF143D1AD0EC6D389D4D68FC53C3D82427B1692A7BCC4E262580B66BA912CAF
93E2BE6E20D4AE54FE141176EDDF771052EE48BB9D483871C9E64E6D6750B4A6
85F482F4E1BFE4D5972A806D9DCC4DCD924B68ED1A5AB6397D7C6CE7B53E7C5A
85EDDA5D417C0F978ABF014AD6C5336EB2540009FA0A0005E7CA45874E0AC5FF
3EE74FE310F3E1E95C70180000000049454E44AE426082}
Visible = False
OnClick = UncheckedRadioButton1Click
end
object CheckedRadioButton2: TImage
Left = 250
Top = 62
Width = 16
Height = 16
Picture.Data = {
0954506E67496D61676589504E470D0A1A0A0000000D49484452000000100000
001008060000001FF3FF61000000017352474200AECE1CE90000000467414D41
0000B18F0BFC6105000000097048597300000EC300000EC301C76FA864000002
114944415478DAA5933F68D35110C7EF2E55A22876920E1DB28849D3EA92A042
852C6EBAD95D4711ED2F68860C4DAF894E22BFA6545C041D04070585BAE9D0A1
60A542F14FFE8882190A8A2E2914294D72E7BD24C694C4A2F40D3FEEBDF7BBCF
DDF7BDEF435585DD0CEC0738C657871B103829AA27DC9C105F07A0B1FC8EE7D6
7604249807BECBBA07A03905AC2368D9AD5B1CB66F10016E1EA6C11B8BCCF51E
403BF985CD6200922E65F3F3DD95C253DE0544F40DFAF9270D9EAE306F6E038C
6492D72D9A16A2F847BE5D0E310783B03EEAF636E1D00797E0A4D5855615E141
696636D501B4373E2968CA558EF0E4280A3E0674AD3735548460A2CCFE9B2827
CF8BE823A1C0982BD404B416E17E29EB1F7495F74B75B593DC1EF6DB1AD156A4
C077364632DE0F554C9772FEBD262032EDDD428544313B1B0F7332460A2BFDEF
0CCE14D97F6972172CAE1467FC2BDD8071039CDA09A028E74A9C7FDE03E89610
E5CB0754F6BEB71F42DB25E837A2DA11272192F1BE1A6DAA23C11D624DE88B4D
2E1673F987AE0B14788A08C37F9275A2C0F9253BE0B3A8B4D0408A740EB1758D
1E9B6126F75063CC39CE75223090683A11EA8BAE7294534322F515033F73EDF7
3152F595852124BC5460FF49B704571984EE9A9136906A7107ECB1B2BBC27D5A
CDD9BD7B66DBAA6D2FB76CA03173E19085F3885BE9DFC97F7D4C47F95A981A32
8E04C79B0081B712A025A7F99F5EE3FF8C5FF5073AF03E990DD7000000004945
4E44AE426082}
Visible = False
OnClick = CheckedRadioButton2Click
end
object Label5: TLabel
Left = 8
Top = 149
Width = 441
Height = 16
AutoSize = False
Caption = #1056#1077#1079#1091#1083#1100#1090#1072#1090
Font.Charset = DEFAULT_CHARSET
Font.Color = 7372329
Font.Height = -12
Font.Name = 'Roboto'
Font.Style = [fsBold]
ParentFont = False
end
object Label6: TLabel
Left = 8
Top = 171
Width = 438
Height = 58
Alignment = taRightJustify
AutoSize = False
Caption = '00:00:00:00 000'
Color = clWhite
Font.Charset = DEFAULT_CHARSET
Font.Color = 7372329
Font.Height = -48
Font.Name = 'Roboto'
Font.Style = []
ParentColor = False
ParentFont = False
end
object Label11: TLabel
Left = 95
Top = 265
Width = 266
Height = 13
Alignment = taCenter
AutoSize = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Roboto'
Font.Style = []
ParentFont = False
end
object Label7: TLabel
Left = 95
Top = 226
Width = 43
Height = 25
Alignment = taCenter
AutoSize = False
Caption = #1076#1085#1077#1081
Font.Charset = DEFAULT_CHARSET
Font.Color = 7372329
Font.Height = -19
Font.Name = 'Roboto'
Font.Style = []
ParentFont = False
end
object Label8: TLabel
Left = 155
Top = 226
Width = 57
Height = 25
Alignment = taCenter
AutoSize = False
Caption = #1095#1072#1089#1086#1074
Font.Charset = DEFAULT_CHARSET
Font.Color = 7372329
Font.Height = -19
Font.Name = 'Roboto'
Font.Style = []
ParentFont = False
end
object Label9: TLabel
Left = 221
Top = 226
Width = 57
Height = 25
Alignment = taCenter
AutoSize = False
Caption = #1084#1080#1085#1091#1090
Font.Charset = DEFAULT_CHARSET
Font.Color = 7372329
Font.Height = -19
Font.Name = 'Roboto'
Font.Style = []
ParentFont = False
end
object Label10: TLabel
Left = 284
Top = 226
Width = 60
Height = 25
Alignment = taCenter
AutoSize = False
Caption = #1089#1077#1082#1091#1085#1076
Font.Charset = DEFAULT_CHARSET
Font.Color = 7372329
Font.Height = -19
Font.Name = 'Roboto'
Font.Style = []
ParentFont = False
end
object Label13: TLabel
Left = 352
Top = 226
Width = 94
Height = 25
Alignment = taCenter
AutoSize = False
Caption = #1084#1080#1083#1083#1080#1089#1077#1082'.'
Font.Charset = DEFAULT_CHARSET
Font.Color = 7372329
Font.Height = -19
Font.Name = 'Roboto'
Font.Style = []
ParentFont = False
end
object Image1: TImage
Left = 0
Top = 126
Width = 457
Height = 17
Center = True
Picture.Data = {
0954506E67496D61676589504E470D0A1A0A0000000D49484452000003200000
001E08020000005B8AED7F000000017352474200AECE1CE90000000467414D41
0000B18F0BFC6105000000097048597300000EC300000EC301C76FA864000000
B84944415478DAEDDD410D00211004C1C3BF1314F1470867A2131252A5609EFD
DA1DE79C0F0080CE105800002D81050010135800003181050010135800003181
0500101358000031810500101358000031810500101B7BEFDB1B00009E32E69C
B73700003C65ACB56E6F0000788AC0020088092C008098C0020088092C008098
C002008839D30000107368140020E6550E00404C600100C4041600404C600100
C4041600404C600100C4041600404C600100C404160040EC07AB5F54618E6082
690000000049454E44AE426082}
end
object Panel8: TPanel
Left = 0
Top = 0
Width = 457
Height = 34
Align = alTop
BevelOuter = bvNone
Color = 7372329
Font.Charset = DEFAULT_CHARSET
Font.Color = clWhite
Font.Height = -19
Font.Name = 'Roboto'
Font.Style = [fsBold]
ParentBackground = False
ParentFont = False
ShowCaption = False
TabOrder = 0
OnMouseDown = Panel8MouseDown
ExplicitLeft = -55
ExplicitWidth = 489
object Label3: TLabel
Left = 6
Top = 6
Width = 374
Height = 23
AutoSize = False
Caption = #1057#1088#1072#1074#1085#1077#1085#1080#1077' '#1076#1072#1090
Font.Charset = DEFAULT_CHARSET
Font.Color = clWhite
Font.Height = -19
Font.Name = 'Roboto'
Font.Style = [fsBold]
ParentFont = False
Layout = tlCenter
OnMouseDown = Label3MouseDown
end
object Panel9: TPanel
Left = 428
Top = 0
Width = 29
Height = 34
Align = alRight
BevelOuter = bvNone
Color = 7372329
Font.Charset = DEFAULT_CHARSET
Font.Color = clWhite
Font.Height = -19
Font.Name = 'Material Icons'
Font.Style = [fsBold]
ParentBackground = False
ParentFont = False
ShowCaption = False
TabOrder = 0
OnClick = Panel9Click
ExplicitLeft = 460
object Image9: TImage
Left = 0
Top = 0
Width = 29
Height = 34
Align = alClient
Center = True
Enabled = False
Picture.Data = {
0954506E67496D61676589504E470D0A1A0A0000000D49484452000000180000
00210806000000C3026B9D000000017352474200AECE1CE90000000467414D41
0000B18F0BFC6105000000097048597300000EC300000EC301C76FA864000000
D94944415478DA63FCFFFF3F032D01E3A805A3168C5A30B016B000F164209E08
C437F0980152D70EC4BD40FC82140B7C8078335493230E4B40862F07E210205E
00C489A406510110F7E3B004D9F02340EC09C45F48B500972544194EAC05E896
B802713D3186936201B2257FA03E206838A916800C3D0DC40650BE29109F21A4
89580B90C3FC0E10AB30E04F5D2459802D42531870A72E922CC0975A0A88B184
504E269414095A82CF021B20DE0FC42718F0A716982533803893D42072815A80
372932408A951D0C90244C92051483510B462D18B5800E16000060C4A0BFC36F
607F0000000049454E44AE426082}
Transparent = True
ExplicitLeft = -1
ExplicitWidth = 12
end
end
object Panel10: TPanel
Left = 411
Top = 0
Width = 17
Height = 34
Align = alRight
BevelOuter = bvNone
Color = 7372329
Font.Charset = DEFAULT_CHARSET
Font.Color = clWhite
Font.Height = -19
Font.Name = 'Material Icons'
Font.Style = [fsBold]
ParentBackground = False
ParentFont = False
ShowCaption = False
TabOrder = 1
OnClick = Panel10Click
ExplicitLeft = 443
object Image10: TImage
Left = 0
Top = 0
Width = 17
Height = 34
Align = alClient
Center = True
Enabled = False
Picture.Data = {
0954506E67496D61676589504E470D0A1A0A0000000D49484452000000180000
0022080600000045961933000000017352474200AECE1CE90000000467414D41
0000B18F0BFC6105000000097048597300000EC300000EC301C76FA864000000
4E4944415478DAEDCDB10D00101040513661139B3182B18C6104A5EE5C610097
5048FE4F7EFDBC88B8977900000000809F81B43F6DE8D502143D1B80AE470B10
F6A74DBD59806B0100000000DC680141E16BBD5501C0BA0000000049454E44AE
426082}
Transparent = True
ExplicitLeft = -1
ExplicitWidth = 12
end
end
end
object DateTimePicker1: TDateTimePicker
Left = 17
Top = 98
Width = 186
Height = 22
Date = 43764.000000000000000000
Time = 0.766632638886221700
DateFormat = dfLong
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Roboto'
Font.Style = []
ParentFont = False
TabOrder = 1
OnChange = DateTimePicker1Change
end
object Button1: TButton
Left = 352
Top = 94
Width = 90
Height = 32
Caption = 'Button1'
TabOrder = 2
end
object Panel1: TPanel
Left = 346
Top = 94
Width = 96
Height = 32
BevelOuter = bvNone
ShowCaption = False
TabOrder = 3
object Label12: TLabel
Left = 0
Top = 0
Width = 96
Height = 32
Align = alClient
Alignment = taRightJustify
Caption = #1042#1067#1063#1048#1057#1051#1048#1058#1068' '
Font.Charset = DEFAULT_CHARSET
Font.Color = 7372329
Font.Height = -12
Font.Name = 'Roboto'
Font.Style = [fsBold]
ParentFont = False
Layout = tlCenter
OnClick = Label12Click
ExplicitLeft = 8
end
end
object DateTimePicker2: TDateTimePicker
Left = 209
Top = 98
Width = 126
Height = 22
Date = 43764.000000000000000000
Time = 0.766632638886221700
DateFormat = dfLong
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Roboto'
Font.Style = []
Kind = dtkTime
ParentFont = False
TabOrder = 4
end
object Timer1: TTimer
Enabled = False
Interval = 500
OnTimer = Timer1Timer
Left = 32
Top = 226
end
end