Mapa.dfm
17.8 KB
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
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
object frmMapaCacic: TfrmMapaCacic
Left = 274
Top = 200
Caption = 'Mapa Cacic'
ClientHeight = 461
ClientWidth = 789
Color = clBtnFace
TransparentColorValue = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
Icon.Data = {
0000010001002020000001000800A80800001600000028000000200000004000
0000010008000000000000000000000000000000000000000000000000000000
000000020B00060B1100080D14000B111C00132517001A3116001E3D15001C3E
1D000B12230011192B00131D320016223A0029551E00366D1E001C4026002348
20002B542500366D21003F7F2700336530003C773900000D460001114F000011
5A00192641001A2844001D2C4A00243A4C002232550023365D00071D6200081E
6D00001A7F000B2766000B28640008216B000B2A6D00112167000D2675000C30
7000263A6100283D62002B5E48002B455500375E5B0030604200377A47002C6A
58003C6B53003B655B003E6B5C002F4C63002A416A002E51680034576000385F
6300304879003E6C60002F726600377E650030756E00347B6B002B6D7300457E
520040735A0040716600406F71004A7C7F004285250054AA2B005EBD2F0060C3
310065C831003C854C003A855D003C8874003A867B004D9F4000408758004795
52004D9C54004F915D004B9858004EA44D004FA857004DA15A0056AB54005CB3
5A004E8B6300408E6800449466004A9E61005AAE63000017810000188400011A
8800001D90000F3191000E319B0010349900163C9B000021AD00072AA8000023
B0000025BB000026BC00184B83001B518A001C449700334E8200355085003956
90003B5893003B5995003E5D9C00256582003E6194001F51BA003F65A5003B7F
BB00457694004060A0004263A5004264A5004365A9004568AD00476AB100486D
B4004A6FB9004971B4004B71BC00042CC3000028C800012AD300042ED000002B
D700002CDD00002CE200002EEE00083EE1000030F3000131F4000031F8000032
FD000C42CA001344C2001445CA001951C6000A40DE001643D100194FD0001B4D
DC00245DCB00204FD4002B61DC002F6BDD00316DD6003374DC001B4CE1001D54
E5002153E200225DE2002763EF002C68E8003D7EE7003A7AEB002A66F0003979
F1004F77C600537CCC00537DD000368884003D9A94005996990041A29F004C84
A1005E9EA00042A4A00061A1A40062A4A50067A9A70066A8A90067ACB70069B4
B4006CB5B60072CB8C0074CF920072C5980077D194007AD7900075CBA6007AD5
A4007BD9A1007BD7A90076CBB80079CFB8007AD1B3007FDEB30079D1BB003E89
CB003E94D400349DD2003E98D7003F99D9003DA0DF003EA4E3003BA9E5003DAB
E90034B1E60034B4EA005680D0005884D6005682D9005883D8005C89DB004394
D8004994DE006BB6C00066B1C90065B0D5005A87E1005C8AE3005E8DEA00459C
E2004A9AE5005690E6005793E9005A93ED005D95F0006090E6006191EE006194
F4006298F7006396F8006699FD00689CFE0078CEC70074C3CB007AD2C0007BD6
D2007CD8D40081DFAA0082DCBF0085E9AB0081D0CE0081CFD10081D7D60086DC
DC008BE2E30094F2F20095F4F3009DF2F30099FCFB00A2FBFA00FFFFFF000000
0000000000000000000000000000000000000000000000000000000000000000
616A000000000000000000000000000000000000000000000000852100000018
8E906A0000000000000000000000000000000000000000000086908A00000066
9090890000000000000000000000000000000000000000000088909068000064
8D8E8400000000000000000000000000000000000000000000878F8B620000DA
6563B00000000000000000000000000000000000000000000079676DB70044FB
F7B9FCB30000000000000000727C7C830000000000000000AEFEB4F8F90000F9
FDFDFBB40000000083D3E6E8EBECECEAE7DEAB7E00000000B1FDFDFDF6000041
F9FDF52D0000AAEBECEBEBECE6D6D7E7ECECECECE77C000038F8FDF83100000E
59B6400583E6ECECEBEBECAA7C7D7D7DD4ECEBECEBEBDE000659B5520E000007
48461375E0E1EBEBECEBD37BE8EBECE77AD3EBECECEAE0D92C45464700000000
45492EC8CBD1E1EAECEBD5DEEBECEBECDEABECEBE8E1D2D87814491200000000
1C1177E0D1CCD1CEE9EBEBECEBECEBECEBEBEBE5D0D1C9D2E07511340000006F
DF82EAE9CDD2CBCAE4EBEBECEBECEBECEBECEBE3CACBD2CDE9E782D6000071DF
EBECEBEBE9E0CEE5EBECEBECEBECEBECEBECEBEBE2CFE1E9EBECEBECAB0039EB
EBECEBECEBEAE5EBEBEBEBEBEBECEBECEBEBEBECEBE5EBEBEBECEBEBEB716EEA
EBECEBECEBECEAE8E7DFDEDFEBECEBECEADFDEDFE7E8EBEBECECEBECE86F0083
ECECEBEBEBEBAA7D7E8080D5ECEBEBECEAA9807F7E7DDFECECEBECE973000001
81DFE8EBEBECECECEBECEBEBEBECEBEBEBECEBECECECEBEBE9E8D62A00000000
04193573ABDDDFDFE7E7E8EAEBEBEBEBEAE8E7DFDFDED5836E1E0B0200000000
00000000000002040A0C1B1D297A7A291B190B09030100000000000000000000
000000000000000000000000000C1A0000000000000000000000000000000000
0101010101010101010101010101090101010101010101010101010100000000
175F5F5F5F5F605F605F5F5F5F60605F5F605F5F605F605F5F5F5E1600000000
00286C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6B230000000000
0000ADAFB2AFB2B2AFB2B2B2AFB2B2AFB2AFB2B2AFB2B2B2B2AC000000000000
0000001536241132250843200D421F1137271033220F3A262B00000000000000
00009157DB9651BF972FED984AC57650B89A4FBC9930BF9B3DC0000000000000
00008C56F1A15CF4A24BC7A73EC69E5AC49C4DBEA53FBDA874BAEE0000000000
00009555F0A156F2A24BEFA33CC69D5BC49B4CBEA63FC1A874BB000000000000
00009158DC935DC3944AF0A04EF39254EE9F53C5993BC5A44BC2000000000000
000000000000000000000000000000000000000000000000000000000000FFFF
FFFFCFFFFFF387FFFFE387FFFFE187FFFFE187FFFFE103FC3FC183C003C18300
00C18000004180000003C0000003C00000038000000300000001000000000000
00008000000180000003800000018000000180000003C0000003C0000003E000
0007F000000FF800001FF000000FF0000007F000000FF000000FFFFFFFFF}
OldCreateOrder = False
PopupMode = pmAuto
Position = poDesigned
ScreenSnap = True
OnActivate = FormActivate
OnClose = FormClose
OnCreate = FormCreate
OnKeyDown = FormKeyDown
DesignSize = (
789
461)
PixelsPerInch = 96
TextHeight = 13
object edWebManagerAddress: TLabel
Left = 155
Top = 439
Width = 500
Height = 14
Anchors = [akBottom]
AutoSize = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
ExplicitTop = 426
end
object lbWebManagerAddress: TLabel
Left = 3
Top = 442
Width = 153
Height = 13
Anchors = [akLeft, akBottom]
AutoSize = False
Caption = 'Endere'#231'o do Servidor de Aplica'#231#227'o:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -9
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
ExplicitTop = 429
end
object pnVersao: TPanel
Left = 683
Top = 433
Width = 105
Height = 20
Anchors = [akRight, akBottom]
BevelInner = bvLowered
Caption = 'Vers'#227'o'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
end
object gbInformacoesSobreComputador: TGroupBox
Left = 1
Top = 59
Width = 780
Height = 374
Anchors = []
Caption =
' Informa'#231#245'es sobre localiza'#231#227'o f'#237'sica e patrimonial deste comput' +
'ador '
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
DesignSize = (
780
374)
object lbEtiqueta2: TLabel
Left = 420
Top = 33
Width = 250
Height = 13
Hint = 'Insira o n'#250'mero do patrim'#244'nio do monitor, se o tiver.'
AutoSize = False
Caption = 'Patrim'#244'nio do Monitor Principal'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
ParentShowHint = False
ShowHint = True
Visible = False
end
object lbEtiqueta3: TLabel
Left = 420
Top = 82
Width = 250
Height = 13
Hint = 'Insira o n'#250'mero do patrim'#244'nio do segundo monitor, se o tiver.'
AutoSize = False
Caption = 'Patrim'#244'nio do Monitor Secund'#225'rio'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
ParentShowHint = False
ShowHint = True
Visible = False
end
object lbEtiqueta4: TLabel
Left = 43
Top = 82
Width = 250
Height = 13
Hint = 'Este '#233' o usu'#225'rio logado atualmente'
AutoSize = False
Caption = 'Usu'#225'rio Logado'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
ParentShowHint = False
ShowHint = True
Visible = False
end
object lbEtiqueta9: TLabel
Left = 43
Top = 182
Width = 250
Height = 13
Hint = 'Nome do computador, constando o patrim'#244'nio.'
AutoSize = False
Caption = 'Computador'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Visible = False
end
object lbEtiqueta10: TLabel
Left = 420
Top = 182
Width = 250
Height = 13
AutoSize = False
Caption = 'IP'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Visible = False
end
object lbEtiqueta1: TLabel
Left = 43
Top = 33
Width = 250
Height = 13
Hint =
'N'#250'mero do Patrim'#244'nio do Computador. Gentileza procure o n'#250'mero q' +
'ue se encontra em uma etiqueta colada no mesmo.'
HelpContext = 1
AutoSize = False
Caption = 'Patrim'#244'nio'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
ParentShowHint = False
ShowHint = True
Visible = False
end
object lbEtiqueta5: TLabel
Left = 43
Top = 133
Width = 250
Height = 13
Hint = 'Nome do usu'#225'rio logado.'
AutoSize = False
Caption = 'Nome'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Visible = False
end
object lbEtiqueta7: TLabel
Left = 661
Top = 129
Width = 69
Height = 13
Hint = 'Digite a sala em que se encontra, se existente.'
AutoSize = False
Caption = 'Sala'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
ParentShowHint = False
ShowHint = True
Visible = False
end
object lbEtiqueta6: TLabel
Left = 420
Top = 129
Width = 175
Height = 13
Hint =
'Digite a Coordena'#231#227'o e/ou Setor em que se encontra, se existente' +
'.'
AutoSize = False
Caption = 'Coordena'#231#227'o/Setor'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
ParentShowHint = False
ShowHint = True
Visible = False
end
object edTeInfoPatrimonio4: TEdit
Left = 43
Top = 99
Width = 310
Height = 24
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
MaxLength = 43
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 3
Visible = False
end
object edTeInfoPatrimonio3: TEdit
Left = 420
Top = 99
Width = 312
Height = 24
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
MaxLength = 34
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 2
Visible = False
end
object btCombosUpdate: TButton
Left = 684
Top = 10
Width = 94
Height = 20
Caption = 'Recarregar'
Enabled = False
TabOrder = 11
OnClick = btCombosUpdateClick
end
object edTeInfoPatrimonio2: TEdit
Left = 420
Top = 52
Width = 312
Height = 24
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
MaxLength = 34
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 1
Visible = False
end
object edTeInfoPatrimonio9: TEdit
Left = 43
Top = 201
Width = 310
Height = 24
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
MaxLength = 43
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 7
Visible = False
end
object edTeInfoPatrimonio1: TEdit
Left = 43
Top = 52
Width = 310
Height = 24
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
MaxLength = 34
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 0
Visible = False
end
object edTeInfoPatrimonio5: TEdit
Left = 43
Top = 152
Width = 310
Height = 24
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
MaxLength = 43
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 4
Visible = False
end
object bgTermoResponsabilidade: TGroupBox
Left = 3
Top = 231
Width = 774
Height = 83
Caption = 'Termo de Responsabilidade'
TabOrder = 9
object rdConcordaTermos: TRadioButton
Left = 3
Top = 16
Width = 758
Height = 64
BiDiMode = bdLeftToRight
Caption =
'Declaro minha responsabilidade pelas informa'#231#245'es prestadas e que' +
' tenho pleno conhecimento das orienta'#231#245'es repassadas.'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentBiDiMode = False
ParentFont = False
TabOrder = 0
WordWrap = True
OnClick = rdConcordaTermosClick
end
end
object btGravarInformacoes: TButton
Left = 186
Top = 320
Width = 401
Height = 37
Anchors = []
Caption = 'Grava e Envia Informa'#231#245'es Patrimoniais'
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 10
Visible = False
OnClick = AtualizaPatrimonio
end
object edTeInfoPatrimonio6: TEdit
Left = 420
Top = 152
Width = 229
Height = 24
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
MaxLength = 9
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 5
Visible = False
end
object edTeInfoPatrimonio7: TEdit
Left = 663
Top = 152
Width = 67
Height = 24
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
MaxLength = 9
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 6
Visible = False
end
object edTeInfoPatrimonio10: TEdit
Left = 422
Top = 201
Width = 310
Height = 24
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
MaxLength = 43
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 8
Visible = False
end
end
object gbLeiaComAtencao: TGroupBox
Left = 0
Top = 3
Width = 780
Height = 53
Anchors = []
Caption = ' Leia com aten'#231#227'o '
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clRed
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
TabOrder = 2
DesignSize = (
780
53)
object lbLeiaComAtencao: TLabel
Left = 11
Top = 21
Width = 769
Height = 29
Anchors = []
AutoSize = False
Caption =
'O preenchimento correto dos campos abaixo define a exatid'#227'o do c' +
'ontrole de patrim'#244'nio e localiza'#231#227'o f'#237'sica do equipamento. '
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
WordWrap = True
end
end
object btKonamiCode: TPanel
Left = 736
Top = 0
Width = 40
Height = 20
BevelWidth = 2
Caption = 'Close'
Color = clRed
Enabled = False
Font.Charset = ANSI_CHARSET
Font.Color = clInfoBk
Font.Height = -13
Font.Name = 'Tahoma'
Font.Style = []
ParentBackground = False
ParentFont = False
TabOrder = 3
Visible = False
OnClick = btKonamiCodeClick
end
object timerMessageBoxShowOrHide: TTimer
Enabled = False
Interval = 500
Left = 50
Top = 377
end
object timerMessageShowTime: TTimer
Enabled = False
Interval = 0
Left = 18
Top = 377
end
object timerProcessos: TTimer
Enabled = False
Interval = 1
OnTimer = timerProcessosTimer
Left = 82
Top = 377
end
end