ViewVC Help
View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing
root/public/ibx/trunk/examples/DBAdmin/MainFormUnit.lfm
Revision: 209
Committed: Wed Mar 14 12:48:51 2018 UTC (6 years ago) by tony
File size: 99741 byte(s)
Log Message:
Fixes Merged

File Contents

# Content
1 object MainForm: TMainForm
2 Left = 648
3 Height = 616
4 Top = 231
5 Width = 939
6 Caption = 'Database Administrator Demo'
7 ClientHeight = 596
8 ClientWidth = 939
9 Menu = MainMenu1
10 OnClose = FormClose
11 OnShow = FormShow
12 LCLVersion = '1.8.3.0'
13 object ToolBar1: TToolBar
14 Left = 0
15 Height = 26
16 Top = 0
17 Width = 939
18 Caption = 'ToolBar1'
19 Images = MenuImages
20 TabOrder = 0
21 object ToolButton1: TToolButton
22 Left = 1
23 Top = 2
24 Action = Backup
25 ParentShowHint = False
26 ShowCaption = False
27 ShowHint = True
28 end
29 object ToolButton2: TToolButton
30 Left = 24
31 Height = 22
32 Top = 2
33 Caption = 'ToolButton2'
34 Style = tbsSeparator
35 end
36 object ToolButton3: TToolButton
37 Left = 32
38 Top = 2
39 Action = Restore
40 ParentShowHint = False
41 ShowHint = True
42 end
43 object ToolButton4: TToolButton
44 Left = 55
45 Height = 22
46 Top = 2
47 Caption = 'ToolButton4'
48 Style = tbsDivider
49 end
50 object ToolButton5: TToolButton
51 Left = 60
52 Top = 2
53 Action = Save
54 end
55 end
56 object StatusBar1: TStatusBar
57 Left = 0
58 Height = 22
59 Top = 574
60 Width = 939
61 Panels = <>
62 end
63 object PageControl1: TPageControl
64 Left = 0
65 Height = 548
66 Top = 26
67 Width = 939
68 ActivePage = Properties
69 Align = alClient
70 MultiLine = True
71 ParentShowHint = False
72 ShowHint = True
73 TabIndex = 0
74 TabOrder = 2
75 Options = [nboMultiLine]
76 object Properties: TTabSheet
77 Caption = 'Properties'
78 ClientHeight = 516
79 ClientWidth = 933
80 OnShow = PropertiesShow
81 object Panel7: TPanel
82 Left = 0
83 Height = 516
84 Top = 0
85 Width = 933
86 Align = alClient
87 BevelOuter = bvNone
88 ClientHeight = 516
89 ClientWidth = 933
90 Color = clWindow
91 ParentColor = False
92 TabOrder = 0
93 object Label6: TLabel
94 Left = 71
95 Height = 14
96 Top = 20
97 Width = 39
98 Caption = 'Server'
99 ParentColor = False
100 end
101 object Label2: TLabel
102 Left = 15
103 Height = 14
104 Top = 52
105 Width = 95
106 Caption = 'Database Name'
107 ParentColor = False
108 end
109 object Label9: TLabel
110 Left = 19
111 Height = 14
112 Top = 83
113 Width = 91
114 Caption = 'Connect String'
115 ParentColor = False
116 end
117 object ConnectString: TEdit
118 Left = 120
119 Height = 24
120 Top = 80
121 Width = 265
122 TabOrder = 0
123 Text = 'ConnectString'
124 end
125 object Label1: TLabel
126 Left = 40
127 Height = 14
128 Top = 117
129 Width = 73
130 Caption = 'ODS Version'
131 ParentColor = False
132 end
133 object ODSVersionString: TEdit
134 Left = 120
135 Height = 24
136 Top = 112
137 Width = 266
138 ReadOnly = True
139 TabOrder = 1
140 Text = 'ODSVersionString'
141 end
142 object Label4: TLabel
143 Left = 19
144 Height = 14
145 Top = 150
146 Width = 91
147 Caption = 'Svr Version No.'
148 ParentColor = False
149 end
150 object ServerVersionNo: TEdit
151 Left = 120
152 Height = 24
153 Top = 144
154 Width = 266
155 ReadOnly = True
156 TabOrder = 2
157 Text = 'ServerVersionNo'
158 end
159 object Label5: TLabel
160 Left = 41
161 Height = 14
162 Top = 183
163 Width = 69
164 Caption = 'SQL Dialect'
165 ParentColor = False
166 end
167 object DBSQLDialect: TEdit
168 Left = 120
169 Height = 24
170 Top = 176
171 Width = 266
172 NumbersOnly = True
173 OnEditingDone = DBSQLDialectEditingDone
174 TabOrder = 3
175 Text = 'DBSQLDialect'
176 end
177 object Label24: TLabel
178 Left = 51
179 Height = 14
180 Top = 211
181 Width = 60
182 Caption = 'DB Owner'
183 ParentColor = False
184 end
185 object Label18: TLabel
186 Left = 24
187 Height = 14
188 Top = 244
189 Width = 86
190 Caption = 'Sec. Database'
191 ParentColor = False
192 end
193 object Label13: TLabel
194 Left = 28
195 Height = 14
196 Top = 277
197 Width = 83
198 Caption = 'Character Set'
199 ParentColor = False
200 end
201 object DBCharSetRO: TDBEdit
202 Left = 120
203 Height = 24
204 Top = 272
205 Width = 264
206 DataField = 'RDB$CHARACTER_SET_NAME'
207 DataSource = DBCharSetSource
208 ReadOnly = True
209 CharCase = ecNormal
210 MaxLength = 0
211 TabOrder = 5
212 end
213 object DBCharacterSet: TIBLookupComboEditBox
214 Left = 121
215 Height = 27
216 Top = 272
217 Width = 266
218 DataField = 'RDB$CHARACTER_SET_NAME'
219 DataSource = DBCharSetSource
220 KeyField = 'RDB$CHARACTER_SET_NAME'
221 ListField = 'RDB$CHARACTER_SET_NAME'
222 ListFieldIndex = 0
223 ListSource = CharSetSource
224 LookupCache = False
225 OnEditingDone = DBCharacterSetEditingDone
226 TabOrder = 4
227 AutoInsert = False
228 AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
229 ItemHeight = 0
230 end
231 object DBIsReadOnly: TCheckBox
232 Left = 111
233 Height = 22
234 Top = 311
235 Width = 84
236 Caption = 'Read Only'
237 OnChange = DBIsReadOnlyChange
238 TabOrder = 6
239 end
240 object DatabaseOnline: TCheckBox
241 Left = 111
242 Height = 22
243 Top = 335
244 Width = 62
245 Caption = 'Online'
246 OnChange = DatabaseOnlineChange
247 TabOrder = 7
248 end
249 object SyncWrites: TCheckBox
250 Left = 111
251 Height = 22
252 Top = 359
253 Width = 173
254 Caption = 'Synchronous Disk Writes'
255 OnChange = SyncWritesChange
256 TabOrder = 8
257 end
258 object IsShadowChk: TCheckBox
259 Left = 111
260 Height = 22
261 Top = 383
262 Width = 132
263 Caption = 'Shadow Database'
264 OnChange = IsShadowChkChange
265 TabOrder = 9
266 end
267 object NoReserve: TCheckBox
268 Left = 111
269 Height = 22
270 Top = 407
271 Width = 239
272 Caption = 'Space Reserved for Backup Records'
273 OnChange = NoReserveChange
274 TabOrder = 10
275 end
276 object Label11: TLabel
277 Left = 435
278 Height = 14
279 Top = 26
280 Width = 93
281 Caption = 'Pages Allocated'
282 ParentColor = False
283 end
284 object AllocatedPages: TEdit
285 Left = 533
286 Height = 24
287 Top = 20
288 Width = 89
289 Alignment = taRightJustify
290 ReadOnly = True
291 TabOrder = 11
292 Text = 'AllocatedPages'
293 end
294 object Label19: TLabel
295 Left = 472
296 Height = 14
297 Top = 57
298 Width = 56
299 Caption = 'Page Size'
300 ParentColor = False
301 end
302 object Label3: TLabel
303 Left = 460
304 Height = 14
305 Top = 88
306 Width = 68
307 Caption = 'Pages Used'
308 ParentColor = False
309 end
310 object PagesUsed: TEdit
311 Left = 533
312 Height = 24
313 Top = 82
314 Width = 89
315 Alignment = taRightJustify
316 ReadOnly = True
317 TabOrder = 12
318 Text = 'PagesUsed'
319 end
320 object Label10: TLabel
321 Left = 438
322 Height = 14
323 Top = 119
324 Width = 90
325 Caption = 'Pages Available'
326 ParentColor = False
327 end
328 object PagesAvail: TEdit
329 Left = 533
330 Height = 24
331 Top = 113
332 Width = 89
333 Alignment = taRightJustify
334 ReadOnly = True
335 TabOrder = 13
336 Text = 'PagesAvail'
337 end
338 object Label12: TLabel
339 Left = 430
340 Height = 14
341 Top = 150
342 Width = 98
343 Caption = 'Current Memory'
344 ParentColor = False
345 end
346 object Edit10: TEdit
347 Left = 533
348 Height = 24
349 Top = 144
350 Width = 89
351 Alignment = taRightJustify
352 ReadOnly = True
353 TabOrder = 14
354 Text = 'Edit10'
355 end
356 object Label20: TLabel
357 Left = 632
358 Height = 14
359 Top = 57
360 Width = 33
361 Caption = 'bytes'
362 ParentColor = False
363 end
364 object Label21: TLabel
365 Left = 632
366 Height = 14
367 Top = 149
368 Width = 33
369 Caption = 'bytes'
370 ParentColor = False
371 end
372 object Label14: TLabel
373 Left = 452
374 Height = 14
375 Top = 181
376 Width = 76
377 Caption = 'Max Memory'
378 ParentColor = False
379 end
380 object Edit11: TEdit
381 Left = 533
382 Height = 24
383 Top = 175
384 Width = 89
385 Alignment = taRightJustify
386 ReadOnly = True
387 TabOrder = 15
388 Text = 'Edit11'
389 end
390 object Label22: TLabel
391 Left = 632
392 Height = 14
393 Top = 182
394 Width = 33
395 Caption = 'bytes'
396 ParentColor = False
397 end
398 object Label15: TLabel
399 Left = 447
400 Height = 14
401 Top = 212
402 Width = 81
403 Caption = 'No. of Buffers'
404 ParentColor = False
405 end
406 object PageBuffers: TEdit
407 Left = 533
408 Height = 24
409 Top = 206
410 Width = 89
411 Alignment = taRightJustify
412 NumbersOnly = True
413 OnEditingDone = PageBuffersEditingDone
414 TabOrder = 16
415 Text = 'PageBuffers'
416 end
417 object Label23: TLabel
418 Left = 430
419 Height = 14
420 Top = 245
421 Width = 100
422 Caption = 'Date DB Created'
423 ParentColor = False
424 end
425 object DBEdit1: TDBEdit
426 Left = 533
427 Height = 24
428 Top = 240
429 Width = 132
430 DataField = 'MON$CREATION_DATE'
431 DataSource = DatabaseSource
432 ReadOnly = True
433 CharCase = ecNormal
434 MaxLength = 0
435 TabOrder = 17
436 end
437 object Label16: TLabel
438 Left = 453
439 Height = 14
440 Top = 317
441 Width = 75
442 Caption = 'Linger Delay'
443 ParentColor = False
444 end
445 object LingerDelay: TEdit
446 Left = 533
447 Height = 24
448 Top = 311
449 Width = 89
450 Alignment = taRightJustify
451 NumbersOnly = True
452 OnEditingDone = LingerDelayEditingDone
453 TabOrder = 18
454 Text = 'LingerDelay'
455 end
456 object Label17: TLabel
457 Left = 632
458 Height = 14
459 Top = 317
460 Width = 49
461 Caption = 'seconds'
462 ParentColor = False
463 end
464 object Label7: TLabel
465 Left = 400
466 Height = 14
467 Top = 347
468 Width = 128
469 Caption = 'S&weep Interval set to'
470 FocusControl = SweepInterval
471 ParentColor = False
472 end
473 object SweepInterval: TEdit
474 Left = 533
475 Height = 24
476 Top = 342
477 Width = 89
478 Alignment = taRightJustify
479 NumbersOnly = True
480 OnEditingDone = SweepIntervalEditingDone
481 TabOrder = 19
482 Text = 'SweepInterval'
483 end
484 object Label8: TLabel
485 Left = 632
486 Height = 14
487 Top = 347
488 Width = 74
489 Caption = 'Transactions'
490 ParentColor = False
491 end
492 object DBEdit4: TDBEdit
493 Left = 533
494 Height = 24
495 Top = 52
496 Width = 89
497 DataField = 'MON$PAGE_SIZE'
498 DataSource = DatabaseSource
499 CharCase = ecNormal
500 MaxLength = 0
501 TabOrder = 20
502 end
503 object Edit1: TEdit
504 Left = 121
505 Height = 24
506 Top = 16
507 Width = 263
508 ParentFont = False
509 TabOrder = 21
510 Text = 'Edit1'
511 end
512 object SecDatabase: TEdit
513 Left = 121
514 Height = 24
515 Top = 241
516 Width = 263
517 ReadOnly = True
518 TabOrder = 22
519 Text = 'SecDatabase'
520 end
521 object DBOwner: TEdit
522 Left = 120
523 Height = 24
524 Top = 208
525 Width = 264
526 ReadOnly = True
527 TabOrder = 23
528 Text = 'DBOwner'
529 end
530 object DatabaseAliasName: TEdit
531 Left = 121
532 Height = 24
533 Top = 48
534 Width = 264
535 ReadOnly = True
536 TabOrder = 24
537 Text = 'DatabaseAliasName'
538 end
539 end
540 end
541 object FilesTab: TTabSheet
542 Caption = 'Files'
543 ClientHeight = 516
544 ClientWidth = 933
545 OnShow = FilesTabShow
546 object Label25: TLabel
547 Left = 16
548 Height = 14
549 Top = 16
550 Width = 129
551 Caption = 'Primary Database File'
552 ParentColor = False
553 end
554 object PrimaryDBFile: TEdit
555 Left = 16
556 Height = 24
557 Top = 32
558 Width = 474
559 Anchors = [akTop, akLeft, akRight]
560 ReadOnly = True
561 TabOrder = 0
562 Text = 'PrimaryDBFile'
563 end
564 object Label26: TLabel
565 Left = 16
566 Height = 14
567 Top = 72
568 Width = 93
569 Caption = 'Secondary Files'
570 ParentColor = False
571 end
572 object IBDynamicGrid1: TIBDynamicGrid
573 Left = 16
574 Height = 160
575 Top = 88
576 Width = 763
577 Anchors = [akTop, akLeft, akRight]
578 Color = clWindow
579 Columns = <
580 item
581 Title.Alignment = taCenter
582 Title.Caption = 'Seq'
583 Width = 40
584 FieldName = 'RDB$FILE_SEQUENCE'
585 AutoSizeColumn = False
586 InitialSortColumn = False
587 DBLookupProperties.ItemHeight = 0
588 DBLookupProperties.ItemWidth = 0
589 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
590 end
591 item
592 Title.Alignment = taCenter
593 Title.Caption = 'File Name'
594 Width = 200
595 FieldName = 'RDB$FILE_NAME'
596 AutoSizeColumn = True
597 InitialSortColumn = False
598 DBLookupProperties.ItemHeight = 0
599 DBLookupProperties.ItemWidth = 0
600 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
601 end
602 item
603 Title.Alignment = taCenter
604 Title.Caption = 'Starts'
605 Width = 80
606 FieldName = 'RDB$FILE_START'
607 AutoSizeColumn = False
608 InitialSortColumn = False
609 DBLookupProperties.ItemHeight = 0
610 DBLookupProperties.ItemWidth = 0
611 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
612 end
613 item
614 Title.Alignment = taCenter
615 Title.Caption = 'Length'
616 Width = 80
617 FieldName = 'RDB$FILE_LENGTH'
618 AutoSizeColumn = False
619 InitialSortColumn = False
620 DBLookupProperties.ItemHeight = 0
621 DBLookupProperties.ItemWidth = 0
622 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
623 end>
624 DataSource = SecDBFilesSource
625 ReadOnly = True
626 Scrollbars = ssAutoVertical
627 TabOrder = 1
628 ExpandEditorPanelBelowRow = False
629 Descending = False
630 EditorBorderStyle = bsSingle
631 DefaultPositionAtEnd = False
632 end
633 object AddFileBtn: TButton
634 Left = 795
635 Height = 25
636 Top = 88
637 Width = 91
638 Action = AddSecondary
639 Anchors = [akTop, akRight]
640 TabOrder = 2
641 end
642 object Label27: TLabel
643 Left = 16
644 Height = 14
645 Top = 264
646 Width = 77
647 Caption = 'Shadow Files'
648 ParentColor = False
649 end
650 object IBDynamicGrid2: TIBDynamicGrid
651 Left = 16
652 Height = 200
653 Top = 280
654 Width = 763
655 Anchors = [akTop, akLeft, akRight, akBottom]
656 Color = clWindow
657 Columns = <
658 item
659 Title.Alignment = taCenter
660 Title.Caption = 'Set'
661 Width = 60
662 FieldName = 'RDB$SHADOW_NUMBER'
663 AutoSizeColumn = False
664 InitialSortColumn = False
665 DBLookupProperties.ItemHeight = 0
666 DBLookupProperties.ItemWidth = 0
667 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
668 end
669 item
670 Title.Alignment = taCenter
671 Title.Caption = 'Seq No.'
672 Width = 60
673 FieldName = 'RDB$FILE_SEQUENCE'
674 AutoSizeColumn = False
675 InitialSortColumn = False
676 DBLookupProperties.ItemHeight = 0
677 DBLookupProperties.ItemWidth = 0
678 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
679 end
680 item
681 Alignment = taCenter
682 Title.Alignment = taCenter
683 Title.Caption = 'Mode'
684 Width = 50
685 FieldName = 'FileMode'
686 AutoSizeColumn = False
687 InitialSortColumn = False
688 DBLookupProperties.ItemHeight = 0
689 DBLookupProperties.ItemWidth = 0
690 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
691 end
692 item
693 Title.Alignment = taCenter
694 Title.Caption = 'File Name'
695 Width = 200
696 FieldName = 'RDB$FILE_NAME'
697 AutoSizeColumn = True
698 InitialSortColumn = False
699 DBLookupProperties.ItemHeight = 0
700 DBLookupProperties.ItemWidth = 0
701 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
702 end
703 item
704 Title.Alignment = taCenter
705 Title.Caption = 'Starts'
706 Width = 80
707 FieldName = 'RDB$FILE_START'
708 AutoSizeColumn = False
709 InitialSortColumn = False
710 DBLookupProperties.ItemHeight = 0
711 DBLookupProperties.ItemWidth = 0
712 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
713 end
714 item
715 Title.Alignment = taCenter
716 Title.Caption = 'Length'
717 Width = 80
718 FieldName = 'RDB$FILE_LENGTH'
719 AutoSizeColumn = False
720 InitialSortColumn = False
721 DBLookupProperties.ItemHeight = 0
722 DBLookupProperties.ItemWidth = 0
723 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
724 end>
725 DataSource = ShadowSource
726 ReadOnly = True
727 Scrollbars = ssAutoVertical
728 TabOrder = 3
729 ExpandEditorPanelBelowRow = False
730 Descending = False
731 EditorBorderStyle = bsSingle
732 DefaultPositionAtEnd = False
733 end
734 object AddShadowBtn: TButton
735 Left = 795
736 Height = 25
737 Top = 280
738 Width = 91
739 Action = AddShadowSet
740 Anchors = [akTop, akRight]
741 TabOrder = 4
742 end
743 object RemoveShadowBtn: TButton
744 Left = 795
745 Height = 25
746 Top = 312
747 Width = 91
748 Action = RemoveShadow
749 Anchors = [akTop, akRight]
750 TabOrder = 5
751 end
752 end
753 object AttachmentsTab: TTabSheet
754 Caption = 'Attachments'
755 ClientHeight = 516
756 ClientWidth = 933
757 OnHide = AttachmentsTabHide
758 OnShow = AttachmentsTabShow
759 object AttmtGrid: TIBDynamicGrid
760 Left = 0
761 Height = 516
762 Top = 0
763 Width = 933
764 Align = alClient
765 Color = clWindow
766 Columns = <
767 item
768 Title.Alignment = taCenter
769 Title.Caption = 'ID'
770 Width = 40
771 FieldName = 'MON$ATTACHMENT_ID'
772 AutoSizeColumn = False
773 InitialSortColumn = False
774 DBLookupProperties.ItemHeight = 0
775 DBLookupProperties.ItemWidth = 0
776 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
777 end
778 item
779 Title.Alignment = taCenter
780 Title.Caption = 'Connect Str'
781 Width = 100
782 FieldName = 'MON$ATTACHMENT_NAME'
783 AutoSizeColumn = True
784 InitialSortColumn = False
785 DBLookupProperties.ItemHeight = 0
786 DBLookupProperties.ItemWidth = 0
787 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
788 end
789 item
790 Title.Alignment = taCenter
791 Title.Caption = 'Client'
792 Width = 120
793 FieldName = 'MON$REMOTE_HOST'
794 AutoSizeColumn = False
795 InitialSortColumn = False
796 DBLookupProperties.ItemHeight = 0
797 DBLookupProperties.ItemWidth = 0
798 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
799 end
800 item
801 Title.Alignment = taCenter
802 Title.Caption = 'Client Name'
803 Width = 100
804 FieldName = 'MON$REMOTE_PROCESS'
805 AutoSizeColumn = True
806 InitialSortColumn = False
807 DBLookupProperties.ItemHeight = 0
808 DBLookupProperties.ItemWidth = 0
809 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
810 end
811 item
812 Title.Alignment = taCenter
813 Title.Caption = 'User'
814 Width = 80
815 FieldName = 'MON$USER'
816 AutoSizeColumn = False
817 InitialSortColumn = False
818 DBLookupProperties.ItemHeight = 0
819 DBLookupProperties.ItemWidth = 0
820 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
821 end
822 item
823 Title.Alignment = taCenter
824 Title.Caption = 'Role'
825 Width = 80
826 FieldName = 'MON$ROLE'
827 AutoSizeColumn = False
828 InitialSortColumn = False
829 DBLookupProperties.ItemHeight = 0
830 DBLookupProperties.ItemWidth = 0
831 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
832 end
833 item
834 Title.Alignment = taCenter
835 Title.Caption = 'IP Address'
836 Width = 100
837 FieldName = 'MON$REMOTE_ADDRESS'
838 AutoSizeColumn = False
839 InitialSortColumn = False
840 DBLookupProperties.ItemHeight = 0
841 DBLookupProperties.ItemWidth = 0
842 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
843 end
844 item
845 Alignment = taCenter
846 Title.Alignment = taCenter
847 Title.Caption = 'Protocol'
848 Width = 60
849 FieldName = 'MON$REMOTE_PROTOCOL'
850 AutoSizeColumn = False
851 InitialSortColumn = False
852 DBLookupProperties.ItemHeight = 0
853 DBLookupProperties.ItemWidth = 0
854 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
855 end
856 item
857 Title.Alignment = taCenter
858 Title.Caption = 'Char Set'
859 Width = 60
860 FieldName = 'RDB$CHARACTER_SET_NAME'
861 AutoSizeColumn = False
862 InitialSortColumn = False
863 DBLookupProperties.ItemHeight = 0
864 DBLookupProperties.ItemWidth = 0
865 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
866 end
867 item
868 Alignment = taCenter
869 Title.Alignment = taCenter
870 Title.Caption = 'State'
871 Width = 60
872 FieldName = 'MON$STATE'
873 AutoSizeColumn = False
874 InitialSortColumn = False
875 DBLookupProperties.ItemHeight = 0
876 DBLookupProperties.ItemWidth = 0
877 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
878 end>
879 DataSource = AttachSource
880 PopupMenu = AttmtPopup
881 Scrollbars = ssAutoVertical
882 TabOrder = 0
883 EditorPanel = AttDetailsPanel
884 ExpandEditorPanelBelowRow = True
885 Descending = False
886 EditorBorderStyle = bsSingle
887 DefaultPositionAtEnd = False
888 end
889 object AttDetailsPanel: TPanel
890 Left = 32
891 Height = 60
892 Top = 88
893 Width = 628
894 BevelInner = bvLowered
895 ClientHeight = 60
896 ClientWidth = 628
897 TabOrder = 1
898 object Label31: TLabel
899 Left = 21
900 Height = 14
901 Top = 14
902 Width = 63
903 Caption = 'Server PID'
904 ParentColor = False
905 end
906 object Label32: TLabel
907 Left = 15
908 Height = 14
909 Top = 36
910 Width = 69
911 Caption = 'Remote PID'
912 ParentColor = False
913 end
914 object DBEdit2: TDBEdit
915 Left = 88
916 Height = 24
917 Top = 8
918 Width = 48
919 DataField = 'MON$SERVER_PID'
920 DataSource = AttachSource
921 CharCase = ecNormal
922 MaxLength = 0
923 TabOrder = 0
924 end
925 object DBEdit3: TDBEdit
926 Left = 88
927 Height = 24
928 Top = 32
929 Width = 48
930 DataField = 'MON$REMOTE_PID'
931 DataSource = AttachSource
932 CharCase = ecNormal
933 MaxLength = 0
934 TabOrder = 1
935 end
936 object DBCheckBox1: TDBCheckBox
937 Left = 348
938 Height = 23
939 Top = 8
940 Width = 202
941 Caption = 'Garbage Collection Allowed'
942 DataField = 'MON$GARBAGE_COLLECTION'
943 DataSource = AttachSource
944 TabOrder = 2
945 ValueChecked = '1'
946 ValueUnchecked = '0'
947 end
948 object Label35: TLabel
949 Left = 352
950 Height = 14
951 Top = 36
952 Width = 72
953 Caption = 'Statistics ID'
954 ParentColor = False
955 end
956 object DBEdit7: TDBEdit
957 Left = 432
958 Height = 24
959 Top = 32
960 Width = 64
961 DataField = 'MON$STAT_ID'
962 DataSource = AttachSource
963 CharCase = ecNormal
964 MaxLength = 0
965 TabOrder = 3
966 end
967 object AttmntODS12Panel: TPanel
968 Left = 154
969 Height = 56
970 Top = 2
971 Width = 183
972 BevelOuter = bvNone
973 ClientHeight = 56
974 ClientWidth = 183
975 TabOrder = 4
976 object AuthMethLabel: TLabel
977 Left = 8
978 Height = 14
979 Top = 12
980 Width = 78
981 Caption = 'Auth Method'
982 ParentColor = False
983 end
984 object RemoteOSLabel: TLabel
985 Left = 8
986 Height = 14
987 Top = 34
988 Width = 97
989 Caption = 'Remote OS User'
990 ParentColor = False
991 end
992 object AuthMethod: TDBEdit
993 Left = 111
994 Height = 24
995 Top = 6
996 Width = 64
997 DataField = 'MON$AUTH_METHOD'
998 DataSource = AttachSource
999 CharCase = ecNormal
1000 MaxLength = 0
1001 TabOrder = 0
1002 end
1003 object RemoteOSUser: TDBEdit
1004 Left = 112
1005 Height = 24
1006 Top = 30
1007 Width = 63
1008 DataField = 'MON$REMOTE_OS_USER'
1009 DataSource = AttachSource
1010 CharCase = ecNormal
1011 MaxLength = 0
1012 TabOrder = 1
1013 end
1014 end
1015 end
1016 end
1017 object StatisticsTab: TTabSheet
1018 Caption = 'Statistics'
1019 ClientHeight = 516
1020 ClientWidth = 933
1021 OnHide = StatisticsTabHide
1022 OnShow = StatisticsTabShow
1023 object StatsOptions: TComboBox
1024 Left = 667
1025 Height = 23
1026 Top = 8
1027 Width = 228
1028 Anchors = [akTop, akRight]
1029 ItemHeight = 0
1030 ItemIndex = 0
1031 Items.Strings = (
1032 'Header Only'
1033 'Performance and Operational'
1034 'Header and Data'
1035 'Header, Data and Indexes'
1036 'All'
1037 )
1038 OnCloseUp = StatsOptionsCloseUp
1039 TabOrder = 0
1040 Text = 'Header Only'
1041 end
1042 object Label28: TLabel
1043 Left = 8
1044 Height = 14
1045 Top = 24
1046 Width = 115
1047 Caption = 'Database Statistics'
1048 ParentColor = False
1049 end
1050 object StatsMemo: TMemo
1051 Left = 8
1052 Height = 423
1053 Top = 40
1054 Width = 883
1055 Anchors = [akTop, akLeft, akRight, akBottom]
1056 Lines.Strings = (
1057 'Memo1'
1058 )
1059 ScrollBars = ssAutoBoth
1060 TabOrder = 1
1061 end
1062 end
1063 object SchemaTab: TTabSheet
1064 Caption = 'Schema'
1065 ClientHeight = 516
1066 ClientWidth = 933
1067 OnShow = SchemaTabShow
1068 inline SynEdit1: TSynEdit
1069 Left = 0
1070 Height = 495
1071 Top = 0
1072 Width = 933
1073 Align = alTop
1074 Anchors = [akTop, akLeft, akRight, akBottom]
1075 Font.Height = -11
1076 Font.Name = 'DejaVu Sans Mono'
1077 Font.Pitch = fpFixed
1078 Font.Quality = fqNonAntialiased
1079 ParentColor = False
1080 ParentFont = False
1081 TabOrder = 0
1082 Gutter.Width = 55
1083 Gutter.MouseActions = <>
1084 RightGutter.Width = 0
1085 RightGutter.MouseActions = <>
1086 Highlighter = SynSQLSyn1
1087 Keystrokes = <
1088 item
1089 Command = ecUp
1090 ShortCut = 38
1091 end
1092 item
1093 Command = ecSelUp
1094 ShortCut = 8230
1095 end
1096 item
1097 Command = ecScrollUp
1098 ShortCut = 16422
1099 end
1100 item
1101 Command = ecDown
1102 ShortCut = 40
1103 end
1104 item
1105 Command = ecSelDown
1106 ShortCut = 8232
1107 end
1108 item
1109 Command = ecScrollDown
1110 ShortCut = 16424
1111 end
1112 item
1113 Command = ecLeft
1114 ShortCut = 37
1115 end
1116 item
1117 Command = ecSelLeft
1118 ShortCut = 8229
1119 end
1120 item
1121 Command = ecWordLeft
1122 ShortCut = 16421
1123 end
1124 item
1125 Command = ecSelWordLeft
1126 ShortCut = 24613
1127 end
1128 item
1129 Command = ecRight
1130 ShortCut = 39
1131 end
1132 item
1133 Command = ecSelRight
1134 ShortCut = 8231
1135 end
1136 item
1137 Command = ecWordRight
1138 ShortCut = 16423
1139 end
1140 item
1141 Command = ecSelWordRight
1142 ShortCut = 24615
1143 end
1144 item
1145 Command = ecPageDown
1146 ShortCut = 34
1147 end
1148 item
1149 Command = ecSelPageDown
1150 ShortCut = 8226
1151 end
1152 item
1153 Command = ecPageBottom
1154 ShortCut = 16418
1155 end
1156 item
1157 Command = ecSelPageBottom
1158 ShortCut = 24610
1159 end
1160 item
1161 Command = ecPageUp
1162 ShortCut = 33
1163 end
1164 item
1165 Command = ecSelPageUp
1166 ShortCut = 8225
1167 end
1168 item
1169 Command = ecPageTop
1170 ShortCut = 16417
1171 end
1172 item
1173 Command = ecSelPageTop
1174 ShortCut = 24609
1175 end
1176 item
1177 Command = ecLineStart
1178 ShortCut = 36
1179 end
1180 item
1181 Command = ecSelLineStart
1182 ShortCut = 8228
1183 end
1184 item
1185 Command = ecEditorTop
1186 ShortCut = 16420
1187 end
1188 item
1189 Command = ecSelEditorTop
1190 ShortCut = 24612
1191 end
1192 item
1193 Command = ecLineEnd
1194 ShortCut = 35
1195 end
1196 item
1197 Command = ecSelLineEnd
1198 ShortCut = 8227
1199 end
1200 item
1201 Command = ecEditorBottom
1202 ShortCut = 16419
1203 end
1204 item
1205 Command = ecSelEditorBottom
1206 ShortCut = 24611
1207 end
1208 item
1209 Command = ecToggleMode
1210 ShortCut = 45
1211 end
1212 item
1213 Command = ecCopy
1214 ShortCut = 16429
1215 end
1216 item
1217 Command = ecPaste
1218 ShortCut = 8237
1219 end
1220 item
1221 Command = ecDeleteChar
1222 ShortCut = 46
1223 end
1224 item
1225 Command = ecCut
1226 ShortCut = 8238
1227 end
1228 item
1229 Command = ecDeleteLastChar
1230 ShortCut = 8
1231 end
1232 item
1233 Command = ecDeleteLastChar
1234 ShortCut = 8200
1235 end
1236 item
1237 Command = ecDeleteLastWord
1238 ShortCut = 16392
1239 end
1240 item
1241 Command = ecUndo
1242 ShortCut = 32776
1243 end
1244 item
1245 Command = ecRedo
1246 ShortCut = 40968
1247 end
1248 item
1249 Command = ecLineBreak
1250 ShortCut = 13
1251 end
1252 item
1253 Command = ecSelectAll
1254 ShortCut = 16449
1255 end
1256 item
1257 Command = ecCopy
1258 ShortCut = 16451
1259 end
1260 item
1261 Command = ecBlockIndent
1262 ShortCut = 24649
1263 end
1264 item
1265 Command = ecLineBreak
1266 ShortCut = 16461
1267 end
1268 item
1269 Command = ecInsertLine
1270 ShortCut = 16462
1271 end
1272 item
1273 Command = ecDeleteWord
1274 ShortCut = 16468
1275 end
1276 item
1277 Command = ecBlockUnindent
1278 ShortCut = 24661
1279 end
1280 item
1281 Command = ecPaste
1282 ShortCut = 16470
1283 end
1284 item
1285 Command = ecCut
1286 ShortCut = 16472
1287 end
1288 item
1289 Command = ecDeleteLine
1290 ShortCut = 16473
1291 end
1292 item
1293 Command = ecDeleteEOL
1294 ShortCut = 24665
1295 end
1296 item
1297 Command = ecUndo
1298 ShortCut = 16474
1299 end
1300 item
1301 Command = ecRedo
1302 ShortCut = 24666
1303 end
1304 item
1305 Command = ecGotoMarker0
1306 ShortCut = 16432
1307 end
1308 item
1309 Command = ecGotoMarker1
1310 ShortCut = 16433
1311 end
1312 item
1313 Command = ecGotoMarker2
1314 ShortCut = 16434
1315 end
1316 item
1317 Command = ecGotoMarker3
1318 ShortCut = 16435
1319 end
1320 item
1321 Command = ecGotoMarker4
1322 ShortCut = 16436
1323 end
1324 item
1325 Command = ecGotoMarker5
1326 ShortCut = 16437
1327 end
1328 item
1329 Command = ecGotoMarker6
1330 ShortCut = 16438
1331 end
1332 item
1333 Command = ecGotoMarker7
1334 ShortCut = 16439
1335 end
1336 item
1337 Command = ecGotoMarker8
1338 ShortCut = 16440
1339 end
1340 item
1341 Command = ecGotoMarker9
1342 ShortCut = 16441
1343 end
1344 item
1345 Command = ecSetMarker0
1346 ShortCut = 24624
1347 end
1348 item
1349 Command = ecSetMarker1
1350 ShortCut = 24625
1351 end
1352 item
1353 Command = ecSetMarker2
1354 ShortCut = 24626
1355 end
1356 item
1357 Command = ecSetMarker3
1358 ShortCut = 24627
1359 end
1360 item
1361 Command = ecSetMarker4
1362 ShortCut = 24628
1363 end
1364 item
1365 Command = ecSetMarker5
1366 ShortCut = 24629
1367 end
1368 item
1369 Command = ecSetMarker6
1370 ShortCut = 24630
1371 end
1372 item
1373 Command = ecSetMarker7
1374 ShortCut = 24631
1375 end
1376 item
1377 Command = ecSetMarker8
1378 ShortCut = 24632
1379 end
1380 item
1381 Command = ecSetMarker9
1382 ShortCut = 24633
1383 end
1384 item
1385 Command = EcFoldLevel1
1386 ShortCut = 41009
1387 end
1388 item
1389 Command = EcFoldLevel2
1390 ShortCut = 41010
1391 end
1392 item
1393 Command = EcFoldLevel3
1394 ShortCut = 41011
1395 end
1396 item
1397 Command = EcFoldLevel4
1398 ShortCut = 41012
1399 end
1400 item
1401 Command = EcFoldLevel5
1402 ShortCut = 41013
1403 end
1404 item
1405 Command = EcFoldLevel6
1406 ShortCut = 41014
1407 end
1408 item
1409 Command = EcFoldLevel7
1410 ShortCut = 41015
1411 end
1412 item
1413 Command = EcFoldLevel8
1414 ShortCut = 41016
1415 end
1416 item
1417 Command = EcFoldLevel9
1418 ShortCut = 41017
1419 end
1420 item
1421 Command = EcFoldLevel0
1422 ShortCut = 41008
1423 end
1424 item
1425 Command = EcFoldCurrent
1426 ShortCut = 41005
1427 end
1428 item
1429 Command = EcUnFoldCurrent
1430 ShortCut = 41003
1431 end
1432 item
1433 Command = EcToggleMarkupWord
1434 ShortCut = 32845
1435 end
1436 item
1437 Command = ecNormalSelect
1438 ShortCut = 24654
1439 end
1440 item
1441 Command = ecColumnSelect
1442 ShortCut = 24643
1443 end
1444 item
1445 Command = ecLineSelect
1446 ShortCut = 24652
1447 end
1448 item
1449 Command = ecTab
1450 ShortCut = 9
1451 end
1452 item
1453 Command = ecShiftTab
1454 ShortCut = 8201
1455 end
1456 item
1457 Command = ecMatchBracket
1458 ShortCut = 24642
1459 end
1460 item
1461 Command = ecColSelUp
1462 ShortCut = 40998
1463 end
1464 item
1465 Command = ecColSelDown
1466 ShortCut = 41000
1467 end
1468 item
1469 Command = ecColSelLeft
1470 ShortCut = 40997
1471 end
1472 item
1473 Command = ecColSelRight
1474 ShortCut = 40999
1475 end
1476 item
1477 Command = ecColSelPageDown
1478 ShortCut = 40994
1479 end
1480 item
1481 Command = ecColSelPageBottom
1482 ShortCut = 57378
1483 end
1484 item
1485 Command = ecColSelPageUp
1486 ShortCut = 40993
1487 end
1488 item
1489 Command = ecColSelPageTop
1490 ShortCut = 57377
1491 end
1492 item
1493 Command = ecColSelLineStart
1494 ShortCut = 40996
1495 end
1496 item
1497 Command = ecColSelLineEnd
1498 ShortCut = 40995
1499 end
1500 item
1501 Command = ecColSelEditorTop
1502 ShortCut = 57380
1503 end
1504 item
1505 Command = ecColSelEditorBottom
1506 ShortCut = 57379
1507 end>
1508 MouseActions = <>
1509 MouseTextActions = <>
1510 MouseSelActions = <>
1511 Lines.Strings = (
1512 'SynEdit1'
1513 )
1514 VisibleSpecialChars = [vscSpace, vscTabAtLast]
1515 ReadOnly = True
1516 SelectedColor.BackPriority = 50
1517 SelectedColor.ForePriority = 50
1518 SelectedColor.FramePriority = 50
1519 SelectedColor.BoldPriority = 50
1520 SelectedColor.ItalicPriority = 50
1521 SelectedColor.UnderlinePriority = 50
1522 SelectedColor.StrikeOutPriority = 50
1523 BracketHighlightStyle = sbhsBoth
1524 BracketMatchColor.Background = clNone
1525 BracketMatchColor.Foreground = clNone
1526 BracketMatchColor.Style = [fsBold]
1527 FoldedCodeColor.Background = clNone
1528 FoldedCodeColor.Foreground = clGray
1529 FoldedCodeColor.FrameColor = clGray
1530 MouseLinkColor.Background = clNone
1531 MouseLinkColor.Foreground = clBlue
1532 LineHighlightColor.Background = clNone
1533 LineHighlightColor.Foreground = clNone
1534 inline SynLeftGutterPartList1: TSynGutterPartList
1535 object SynGutterMarks1: TSynGutterMarks
1536 Width = 24
1537 MouseActions = <>
1538 end
1539 object SynGutterLineNumber1: TSynGutterLineNumber
1540 Width = 15
1541 MouseActions = <>
1542 MarkupInfo.Background = clBtnFace
1543 MarkupInfo.Foreground = clNone
1544 DigitCount = 2
1545 ShowOnlyLineNumbersMultiplesOf = 1
1546 ZeroStart = False
1547 LeadingZeros = False
1548 end
1549 object SynGutterChanges1: TSynGutterChanges
1550 Width = 4
1551 MouseActions = <>
1552 ModifiedColor = 59900
1553 SavedColor = clGreen
1554 end
1555 object SynGutterSeparator1: TSynGutterSeparator
1556 Width = 2
1557 MouseActions = <>
1558 MarkupInfo.Background = clWhite
1559 MarkupInfo.Foreground = clGray
1560 end
1561 object SynGutterCodeFolding1: TSynGutterCodeFolding
1562 MouseActions = <>
1563 MarkupInfo.Background = clNone
1564 MarkupInfo.Foreground = clGray
1565 MouseActionsExpanded = <>
1566 MouseActionsCollapsed = <>
1567 end
1568 end
1569 end
1570 object IncludeUserGrants: TCheckBox
1571 Left = 0
1572 Height = 22
1573 Top = 494
1574 Width = 166
1575 Anchors = [akLeft, akBottom]
1576 Caption = 'Include Grants to Users'
1577 OnChange = SchemaTabShow
1578 TabOrder = 1
1579 end
1580 end
1581 object ServerTab: TTabSheet
1582 Caption = 'Server'
1583 ClientHeight = 516
1584 ClientWidth = 933
1585 OnHide = ServerTabHide
1586 OnShow = ServerTabShow
1587 object Panel1: TPanel
1588 Left = 0
1589 Height = 516
1590 Top = 0
1591 Width = 370
1592 Align = alLeft
1593 BevelOuter = bvNone
1594 ClientHeight = 516
1595 ClientWidth = 370
1596 TabOrder = 0
1597 object Label29: TLabel
1598 Left = 5
1599 Height = 14
1600 Top = 8
1601 Width = 60
1602 Caption = 'Properties'
1603 ParentColor = False
1604 end
1605 object ServerPropMemo: TMemo
1606 Left = 8
1607 Height = 481
1608 Top = 26
1609 Width = 353
1610 Anchors = [akTop, akLeft, akRight, akBottom]
1611 Lines.Strings = (
1612 'ServerPropMemo'
1613 )
1614 ScrollBars = ssAutoBoth
1615 TabOrder = 0
1616 end
1617 end
1618 object Splitter1: TSplitter
1619 Left = 370
1620 Height = 516
1621 Top = 0
1622 Width = 5
1623 end
1624 object Panel2: TPanel
1625 Left = 375
1626 Height = 516
1627 Top = 0
1628 Width = 558
1629 Align = alClient
1630 BevelOuter = bvNone
1631 ClientHeight = 516
1632 ClientWidth = 558
1633 TabOrder = 2
1634 object Label30: TLabel
1635 Left = 8
1636 Height = 14
1637 Top = 8
1638 Width = 65
1639 Caption = 'Server Log'
1640 ParentColor = False
1641 end
1642 object ServerLog: TMemo
1643 Left = 8
1644 Height = 481
1645 Top = 26
1646 Width = 540
1647 Anchors = [akTop, akLeft, akRight, akBottom]
1648 Lines.Strings = (
1649 'ServerLog'
1650 )
1651 ScrollBars = ssAutoBoth
1652 TabOrder = 0
1653 end
1654 end
1655 end
1656 object UserManagerTab: TTabSheet
1657 Caption = 'User Manager'
1658 ClientHeight = 516
1659 ClientWidth = 933
1660 OnHide = UserManagerTabHide
1661 OnShow = UserManagerTabShow
1662 object Panel4: TPanel
1663 Left = 0
1664 Height = 516
1665 Top = 0
1666 Width = 739
1667 Align = alLeft
1668 ClientHeight = 516
1669 ClientWidth = 739
1670 TabOrder = 0
1671 object UserManagerGrid: TIBDynamicGrid
1672 Left = 1
1673 Height = 514
1674 Top = 1
1675 Width = 737
1676 Align = alClient
1677 Color = clWindow
1678 Columns = <
1679 item
1680 ReadOnly = True
1681 Title.Alignment = taCenter
1682 Title.Caption = 'User Name'
1683 Width = 120
1684 FieldName = 'SEC$USER_NAME'
1685 AutoSizeColumn = False
1686 InitialSortColumn = False
1687 DBLookupProperties.ItemHeight = 0
1688 DBLookupProperties.ItemWidth = 0
1689 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
1690 end
1691 item
1692 Title.Alignment = taCenter
1693 Title.Caption = 'First Name'
1694 Width = 80
1695 FieldName = 'SEC$FIRST_NAME'
1696 AutoSizeColumn = True
1697 InitialSortColumn = False
1698 DBLookupProperties.ItemHeight = 0
1699 DBLookupProperties.ItemWidth = 0
1700 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
1701 end
1702 item
1703 Title.Alignment = taCenter
1704 Title.Caption = 'Middle Name'
1705 Width = 85
1706 FieldName = 'SEC$MIDDLE_NAME'
1707 AutoSizeColumn = False
1708 InitialSortColumn = False
1709 DBLookupProperties.ItemHeight = 0
1710 DBLookupProperties.ItemWidth = 0
1711 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
1712 end
1713 item
1714 Title.Alignment = taCenter
1715 Title.Caption = 'Last Name'
1716 Width = 80
1717 FieldName = 'SEC$LAST_NAME'
1718 AutoSizeColumn = True
1719 InitialSortColumn = False
1720 DBLookupProperties.ItemHeight = 0
1721 DBLookupProperties.ItemWidth = 0
1722 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
1723 end
1724 item
1725 Alignment = taCenter
1726 Title.Alignment = taCenter
1727 Title.Caption = 'Active'
1728 Width = 55
1729 FieldName = 'SEC$ACTIVE'
1730 AutoSizeColumn = False
1731 InitialSortColumn = False
1732 DBLookupProperties.ItemHeight = 0
1733 DBLookupProperties.ItemWidth = 0
1734 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
1735 end
1736 item
1737 Alignment = taCenter
1738 Title.Alignment = taCenter
1739 Title.Caption = 'Admin'
1740 Width = 55
1741 FieldName = 'SEC$ADMIN'
1742 AutoSizeColumn = False
1743 InitialSortColumn = False
1744 DBLookupProperties.ItemHeight = 0
1745 DBLookupProperties.ItemWidth = 0
1746 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
1747 end
1748 item
1749 Title.Alignment = taCenter
1750 Title.Caption = 'DB Creator'
1751 Width = 70
1752 FieldName = 'DBCREATOR'
1753 AutoSizeColumn = False
1754 InitialSortColumn = False
1755 DBLookupProperties.ItemHeight = 0
1756 DBLookupProperties.ItemWidth = 0
1757 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
1758 end
1759 item
1760 Alignment = taCenter
1761 ReadOnly = True
1762 Title.Alignment = taCenter
1763 Title.Caption = 'Logged In'
1764 Width = 70
1765 FieldName = 'LOGGEDIN'
1766 AutoSizeColumn = False
1767 InitialSortColumn = False
1768 DBLookupProperties.ItemHeight = 0
1769 DBLookupProperties.ItemWidth = 0
1770 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
1771 end
1772 item
1773 ButtonStyle = cbsPickList
1774 PickList.Strings = (
1775 'Srp'
1776 'Legacy_UserManager'
1777 )
1778 Title.Alignment = taCenter
1779 Title.Caption = 'User Manager'
1780 Width = 100
1781 FieldName = 'SEC$PLUGIN'
1782 AutoSizeColumn = False
1783 InitialSortColumn = False
1784 DBLookupProperties.ItemHeight = 0
1785 DBLookupProperties.ItemWidth = 0
1786 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
1787 end
1788 item
1789 Title.Alignment = taCenter
1790 Title.Caption = 'UID'
1791 Width = 40
1792 FieldName = 'USERID'
1793 AutoSizeColumn = False
1794 InitialSortColumn = False
1795 DBLookupProperties.ItemHeight = 0
1796 DBLookupProperties.ItemWidth = 0
1797 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
1798 end
1799 item
1800 Title.Alignment = taCenter
1801 Title.Caption = 'GID'
1802 Width = 40
1803 FieldName = 'GROUPID'
1804 AutoSizeColumn = False
1805 InitialSortColumn = False
1806 DBLookupProperties.ItemHeight = 0
1807 DBLookupProperties.ItemWidth = 0
1808 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
1809 end>
1810 DataSource = UserListSource
1811 PopupMenu = UserPopup
1812 Scrollbars = ssAutoVertical
1813 TabOrder = 0
1814 ExpandEditorPanelBelowRow = False
1815 Descending = False
1816 EditorBorderStyle = bsSingle
1817 DefaultPositionAtEnd = False
1818 IndexFieldNames = 'SEC$USER_NAME'
1819 end
1820 end
1821 object Splitter2: TSplitter
1822 Left = 739
1823 Height = 516
1824 Top = 0
1825 Width = 5
1826 end
1827 object Panel3: TPanel
1828 Left = 744
1829 Height = 516
1830 Top = 0
1831 Width = 189
1832 Align = alClient
1833 BevelOuter = bvNone
1834 ClientHeight = 516
1835 ClientWidth = 189
1836 TabOrder = 2
1837 object IBDynamicGrid4: TIBDynamicGrid
1838 Left = 0
1839 Height = 161
1840 Top = 50
1841 Width = 189
1842 Align = alTop
1843 Color = clWindow
1844 Columns = <
1845 item
1846 ButtonStyle = cbsCheckboxColumn
1847 Title.Caption = ''
1848 Width = 30
1849 FieldName = 'GRANTED'
1850 AutoSizeColumn = False
1851 InitialSortColumn = False
1852 DBLookupProperties.ItemHeight = 0
1853 DBLookupProperties.ItemWidth = 0
1854 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
1855 end
1856 item
1857 Title.Alignment = taCenter
1858 Title.Caption = 'Role'
1859 Width = 70
1860 FieldName = 'RDB$ROLE_NAME'
1861 AutoSizeColumn = True
1862 InitialSortColumn = False
1863 DBLookupProperties.ItemHeight = 0
1864 DBLookupProperties.ItemWidth = 0
1865 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
1866 end>
1867 DataSource = RoleSource
1868 Options = [dgEditing, dgIndicator, dgColumnResize, dgColumnMove, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit, dgDisableDelete, dgDisableInsert]
1869 Scrollbars = ssAutoVertical
1870 TabOrder = 0
1871 ExpandEditorPanelBelowRow = False
1872 Descending = False
1873 EditorBorderStyle = bsSingle
1874 DefaultPositionAtEnd = False
1875 end
1876 object Panel5: TPanel
1877 Left = 0
1878 Height = 61
1879 Top = 455
1880 Width = 189
1881 Align = alBottom
1882 BevelInner = bvLowered
1883 BevelOuter = bvLowered
1884 ClientHeight = 61
1885 ClientWidth = 189
1886 TabOrder = 1
1887 object Button1: TButton
1888 Left = 16
1889 Height = 28
1890 Top = 16
1891 Width = 162
1892 Action = SaveChanges
1893 Anchors = [akTop, akLeft, akRight]
1894 TabOrder = 0
1895 end
1896 end
1897 object Panel6: TPanel
1898 Left = 0
1899 Height = 50
1900 Top = 0
1901 Width = 189
1902 Align = alTop
1903 BevelInner = bvLowered
1904 BevelOuter = bvLowered
1905 ClientHeight = 50
1906 ClientWidth = 189
1907 TabOrder = 2
1908 object DBText1: TDBText
1909 Left = 10
1910 Height = 14
1911 Top = 30
1912 Width = 49
1913 DataField = 'SEC$USER_NAME'
1914 DataSource = UserListSource
1915 ParentColor = False
1916 end
1917 object Label36: TLabel
1918 Left = 10
1919 Height = 14
1920 Top = 10
1921 Width = 104
1922 Caption = 'Roles Assigned to'
1923 ParentColor = False
1924 end
1925 end
1926 object Splitter3: TSplitter
1927 Cursor = crVSplit
1928 Left = 0
1929 Height = 5
1930 Top = 211
1931 Width = 189
1932 Align = alTop
1933 ResizeAnchor = akTop
1934 end
1935 object TagsHeader: TPanel
1936 Left = 0
1937 Height = 26
1938 Top = 216
1939 Width = 189
1940 Align = alTop
1941 BevelInner = bvRaised
1942 Caption = 'Tags'
1943 TabOrder = 4
1944 end
1945 object TagsGrid: TIBDynamicGrid
1946 Left = 0
1947 Height = 208
1948 Top = 242
1949 Width = 189
1950 Align = alClient
1951 Color = clWindow
1952 Columns = <
1953 item
1954 Title.Alignment = taCenter
1955 Title.Caption = 'Key'
1956 Width = 60
1957 FieldName = 'SEC$KEY'
1958 AutoSizeColumn = False
1959 InitialSortColumn = False
1960 DBLookupProperties.ItemHeight = 0
1961 DBLookupProperties.ItemWidth = 0
1962 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
1963 end
1964 item
1965 Title.Alignment = taCenter
1966 Title.Caption = 'Value'
1967 Width = 60
1968 FieldName = 'SEC$VALUE'
1969 AutoSizeColumn = True
1970 InitialSortColumn = False
1971 DBLookupProperties.ItemHeight = 0
1972 DBLookupProperties.ItemWidth = 0
1973 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
1974 end>
1975 DataSource = UserTagsSource
1976 PopupMenu = UserTagPopup
1977 Scrollbars = ssAutoVertical
1978 TabOrder = 5
1979 ExpandEditorPanelBelowRow = False
1980 Descending = False
1981 EditorBorderStyle = bsSingle
1982 DefaultPositionAtEnd = False
1983 end
1984 object Splitter4: TSplitter
1985 Cursor = crVSplit
1986 Left = 0
1987 Height = 5
1988 Top = 450
1989 Width = 189
1990 Align = alBottom
1991 ResizeAnchor = akBottom
1992 end
1993 end
1994 end
1995 object AccessRightsTab: TTabSheet
1996 Caption = 'Access Rights'
1997 ClientHeight = 516
1998 ClientWidth = 933
1999 OnHide = AccessRightsTabHide
2000 OnShow = AccessRightsTabShow
2001 object AccessRightsTreeView: TIBTreeView
2002 Left = 0
2003 Height = 519
2004 Top = 0
2005 Width = 300
2006 Align = alLeft
2007 TextField = 'DisplayName'
2008 DataSource = AccessRightsSource
2009 Images = MenuImages
2010 HasChildField = 'CHILDCOUNT'
2011 ImageIndexField = 'ImageIndex'
2012 SelectedIndexField = 'ImageIndex'
2013 KeyField = 'ID'
2014 ParentField = 'PARENT'
2015 PopupMenu = AccessRightsPopup
2016 TabOrder = 0
2017 OnSelectionChanged = AccessRightsTreeViewSelectionChanged
2018 end
2019 object Splitter5: TSplitter
2020 Left = 300
2021 Height = 519
2022 Top = 0
2023 Width = 5
2024 end
2025 object SubjectAccessRightsGrid: TIBDynamicGrid
2026 Left = 305
2027 Height = 519
2028 Top = 0
2029 Width = 626
2030 Align = alClient
2031 Color = clWindow
2032 Columns = <
2033 item
2034 Title.Alignment = taCenter
2035 Title.Caption = 'Type'
2036 Width = 100
2037 FieldName = 'OBJECT_TYPE_NAME'
2038 AutoSizeColumn = False
2039 InitialSortColumn = False
2040 DBLookupProperties.ItemHeight = 0
2041 DBLookupProperties.ItemWidth = 0
2042 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
2043 end
2044 item
2045 Title.Alignment = taCenter
2046 Title.Caption = 'Object'
2047 Width = 150
2048 FieldName = 'OBJECT_NAME'
2049 AutoSizeColumn = True
2050 InitialSortColumn = True
2051 DBLookupProperties.ItemHeight = 0
2052 DBLookupProperties.ItemWidth = 0
2053 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
2054 end
2055 item
2056 Title.Alignment = taCenter
2057 Title.Caption = 'Granted'
2058 Width = 80
2059 FieldName = 'GRANTED_PRIVILEGES'
2060 AutoSizeColumn = False
2061 InitialSortColumn = False
2062 DBLookupProperties.ItemHeight = 0
2063 DBLookupProperties.ItemWidth = 0
2064 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
2065 end
2066 item
2067 Title.Alignment = taCenter
2068 Title.Caption = 'Granted By'
2069 Width = 80
2070 FieldName = 'GRANTEDBY'
2071 AutoSizeColumn = False
2072 InitialSortColumn = False
2073 DBLookupProperties.ItemHeight = 0
2074 DBLookupProperties.ItemWidth = 0
2075 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
2076 end
2077 item
2078 ButtonStyle = cbsCheckboxColumn
2079 Title.Caption = 'Grant Opt'
2080 Width = 64
2081 FieldName = 'GRANT_OPTION'
2082 AutoSizeColumn = False
2083 InitialSortColumn = False
2084 DBLookupProperties.ItemHeight = 0
2085 DBLookupProperties.ItemWidth = 0
2086 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
2087 end>
2088 DataSource = SubjectAccessRightsSource
2089 Scrollbars = ssAutoVertical
2090 TabOrder = 2
2091 EditorPanel = UpdateColsPanel
2092 ExpandEditorPanelBelowRow = True
2093 Descending = False
2094 EditorBorderStyle = bsSingle
2095 DefaultPositionAtEnd = False
2096 end
2097 end
2098 object MappingsTab: TTabSheet
2099 Caption = 'Auth Mappings'
2100 ClientHeight = 516
2101 ClientWidth = 933
2102 OnHide = MappingsTabHide
2103 OnShow = MappingsTabShow
2104 object IBDynamicGrid5: TIBDynamicGrid
2105 Left = 0
2106 Height = 492
2107 Top = 24
2108 Width = 933
2109 Anchors = [akTop, akLeft, akRight, akBottom]
2110 Color = clWindow
2111 Columns = <
2112 item
2113 Title.Alignment = taCenter
2114 Title.Caption = 'Name'
2115 Width = 200
2116 FieldName = 'RDB$MAP_NAME'
2117 AutoSizeColumn = False
2118 InitialSortColumn = False
2119 DBLookupProperties.ItemHeight = 0
2120 DBLookupProperties.ItemWidth = 0
2121 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
2122 end
2123 item
2124 Title.Alignment = taCenter
2125 Title.Caption = 'Type'
2126 Width = 60
2127 FieldName = 'MAPTYPE'
2128 AutoSizeColumn = False
2129 InitialSortColumn = False
2130 DBLookupProperties.ItemHeight = 0
2131 DBLookupProperties.ItemWidth = 0
2132 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
2133 end
2134 item
2135 Title.Alignment = taCenter
2136 Title.Caption = 'Using'
2137 Width = 150
2138 FieldName = 'MAP_USING'
2139 AutoSizeColumn = False
2140 InitialSortColumn = False
2141 DBLookupProperties.ItemHeight = 0
2142 DBLookupProperties.ItemWidth = 0
2143 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
2144 end
2145 item
2146 Title.Alignment = taCenter
2147 Title.Caption = 'Database'
2148 Width = 150
2149 FieldName = 'RDB$MAP_DB'
2150 AutoSizeColumn = False
2151 InitialSortColumn = False
2152 DBLookupProperties.ItemHeight = 0
2153 DBLookupProperties.ItemWidth = 0
2154 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
2155 end
2156 item
2157 Title.Alignment = taCenter
2158 Title.Caption = 'Mapping From'
2159 Width = 150
2160 FieldName = 'MAP_FROM'
2161 AutoSizeColumn = False
2162 InitialSortColumn = False
2163 DBLookupProperties.ItemHeight = 0
2164 DBLookupProperties.ItemWidth = 0
2165 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
2166 end
2167 item
2168 Title.Alignment = taCenter
2169 Title.Caption = 'Mapping To'
2170 Width = 150
2171 FieldName = 'MAP_TO'
2172 AutoSizeColumn = False
2173 InitialSortColumn = False
2174 DBLookupProperties.ItemHeight = 0
2175 DBLookupProperties.ItemWidth = 0
2176 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
2177 end
2178 item
2179 Title.Alignment = taCenter
2180 Title.Caption = 'Description'
2181 Width = 80
2182 FieldName = 'RDB$DESCRIPTION'
2183 AutoSizeColumn = True
2184 InitialSortColumn = False
2185 DBLookupProperties.ItemHeight = 0
2186 DBLookupProperties.ItemWidth = 0
2187 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
2188 end>
2189 DataSource = AuthMapSource
2190 Scrollbars = ssAutoVertical
2191 TabOrder = 0
2192 ExpandEditorPanelBelowRow = False
2193 Descending = False
2194 EditorBorderStyle = bsSingle
2195 DefaultPositionAtEnd = False
2196 end
2197 object AutoAdmin: TCheckBox
2198 Left = 776
2199 Height = 22
2200 Top = 2
2201 Width = 151
2202 Anchors = [akTop, akRight]
2203 Caption = 'Auto Admin Mapping'
2204 OnChange = AutoAdminChange
2205 TabOrder = 1
2206 end
2207 end
2208 object RepairTab: TTabSheet
2209 Caption = 'Database Repair'
2210 ClientHeight = 516
2211 ClientWidth = 933
2212 OnHide = RepairTabHide
2213 OnShow = RepairTabShow
2214 object SelectRepairAction: TComboBox
2215 Left = 654
2216 Height = 23
2217 Top = 8
2218 Width = 200
2219 Anchors = [akTop, akRight]
2220 ItemHeight = 0
2221 ItemIndex = 0
2222 Items.Strings = (
2223 'Database Sweep'
2224 'Online Validation'
2225 'Database Validation'
2226 'Kill Shadows'
2227 )
2228 OnCloseUp = SelectRepairActionCloseUp
2229 TabOrder = 0
2230 Text = 'Database Sweep'
2231 end
2232 object Button2: TButton
2233 Left = 862
2234 Height = 25
2235 Top = 9
2236 Width = 35
2237 Action = RunRepair
2238 Anchors = [akTop, akRight]
2239 TabOrder = 1
2240 end
2241 object ValidateOptions: TPageControl
2242 Left = 6
2243 Height = 108
2244 Top = 7
2245 Width = 322
2246 ActivePage = RepairOptionsTab
2247 ShowTabs = False
2248 TabIndex = 1
2249 TabOrder = 2
2250 object ValidateOptionsTab: TTabSheet
2251 Caption = 'ValidateOptionsTab'
2252 ClientHeight = 104
2253 ClientWidth = 318
2254 object Label33: TLabel
2255 Left = 5
2256 Height = 14
2257 Top = 9
2258 Width = 108
2259 Caption = 'Validation Options'
2260 ParentColor = False
2261 end
2262 object RecordFragments: TCheckBox
2263 Left = 32
2264 Height = 22
2265 Top = 29
2266 Width = 184
2267 Caption = 'Validate Record Fragments'
2268 Checked = True
2269 State = cbChecked
2270 TabOrder = 0
2271 end
2272 object ReadOnlyValidation: TCheckBox
2273 Left = 32
2274 Height = 22
2275 Top = 51
2276 Width = 146
2277 Caption = 'Read Only Validation'
2278 TabOrder = 1
2279 end
2280 object IgnoreChecksums: TCheckBox
2281 Left = 32
2282 Height = 22
2283 Top = 73
2284 Width = 136
2285 Caption = 'Ignore Checksums'
2286 TabOrder = 2
2287 end
2288 end
2289 object RepairOptionsTab: TTabSheet
2290 Caption = 'RepairOptionsTab'
2291 ClientHeight = 104
2292 ClientWidth = 318
2293 object Label34: TLabel
2294 Left = 10
2295 Height = 40
2296 Top = 8
2297 Width = 294
2298 AutoSize = False
2299 Caption = 'If errors have been reported, you should now select the repair options and click on repair'
2300 ParentColor = False
2301 WordWrap = True
2302 end
2303 object ValidateRepairRecordFragments: TCheckBox
2304 Left = 16
2305 Height = 19
2306 Top = 48
2307 Width = 161
2308 Caption = 'Validate Record Fragments'
2309 Checked = True
2310 State = cbChecked
2311 TabOrder = 0
2312 end
2313 object IgnoreChecksumsOnRepair: TCheckBox
2314 Left = 16
2315 Height = 19
2316 Top = 71
2317 Width = 146
2318 Caption = 'Ignore Checksum Errors'
2319 TabOrder = 1
2320 end
2321 object Button7: TButton
2322 Left = 231
2323 Height = 25
2324 Top = 70
2325 Width = 75
2326 Action = Phase2Repair
2327 TabOrder = 2
2328 end
2329 end
2330 end
2331 object Panel8: TPanel
2332 Left = 10
2333 Height = 384
2334 Top = 123
2335 Width = 888
2336 Anchors = [akTop, akLeft, akRight, akBottom]
2337 BevelOuter = bvNone
2338 Caption = 'ValidationPanel'
2339 ClientHeight = 384
2340 ClientWidth = 888
2341 TabOrder = 3
2342 object DBTablesPanel: TPanel
2343 Left = 0
2344 Height = 384
2345 Top = 0
2346 Width = 170
2347 Align = alLeft
2348 BevelOuter = bvNone
2349 ClientHeight = 384
2350 ClientWidth = 170
2351 TabOrder = 0
2352 object Alltables: TRadioButton
2353 Left = 9
2354 Height = 19
2355 Top = 32
2356 Width = 71
2357 Caption = 'All Tables'
2358 Checked = True
2359 OnChange = SelectedTablesOnlyChange
2360 TabOrder = 0
2361 TabStop = True
2362 end
2363 object SelectedTablesOnly: TRadioButton
2364 Left = 9
2365 Height = 19
2366 Top = 56
2367 Width = 129
2368 Caption = 'Selected Tables Only'
2369 OnChange = SelectedTablesOnlyChange
2370 TabOrder = 1
2371 end
2372 object SelectedTablesGrid: TIBDynamicGrid
2373 Left = 0
2374 Height = 271
2375 Top = 90
2376 Width = 170
2377 Anchors = [akTop, akLeft, akRight, akBottom]
2378 Color = clWindow
2379 Columns = <
2380 item
2381 ButtonStyle = cbsCheckboxColumn
2382 Title.Caption = 'SELECTED'
2383 Width = 30
2384 FieldName = 'SELECTED'
2385 AutoSizeColumn = False
2386 InitialSortColumn = False
2387 DBLookupProperties.ItemHeight = 0
2388 DBLookupProperties.ItemWidth = 0
2389 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
2390 end
2391 item
2392 Title.Caption = 'RDB$RELATION_NAME'
2393 Width = 80
2394 FieldName = 'RDB$RELATION_NAME'
2395 AutoSizeColumn = True
2396 InitialSortColumn = True
2397 DBLookupProperties.ItemHeight = 0
2398 DBLookupProperties.ItemWidth = 0
2399 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
2400 end>
2401 DataSource = DBTablesSource
2402 FixedCols = 0
2403 Options = [dgEditing, dgColumnResize, dgColumnMove, dgRowLines, dgTabs, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
2404 Scrollbars = ssAutoVertical
2405 TabOrder = 2
2406 ExpandEditorPanelBelowRow = False
2407 Descending = False
2408 EditorBorderStyle = bsSingle
2409 DefaultPositionAtEnd = False
2410 end
2411 object Label40: TLabel
2412 Left = 9
2413 Height = 15
2414 Top = 7
2415 Width = 42
2416 Caption = 'Validate'
2417 ParentColor = False
2418 end
2419 object SelectAllTables: TCheckBox
2420 Left = 0
2421 Height = 19
2422 Top = 366
2423 Width = 117
2424 Anchors = [akLeft, akBottom]
2425 Caption = 'Select/Deselect All'
2426 OnChange = SelectAllTablesChange
2427 TabOrder = 3
2428 end
2429 end
2430 object DBTablesSplitter: TSplitter
2431 Left = 170
2432 Height = 384
2433 Top = 0
2434 Width = 5
2435 end
2436 object Panel9: TPanel
2437 Left = 175
2438 Height = 384
2439 Top = 0
2440 Width = 713
2441 Align = alClient
2442 BevelOuter = bvNone
2443 ClientHeight = 384
2444 ClientWidth = 713
2445 TabOrder = 2
2446 object Label37: TLabel
2447 Left = 0
2448 Height = 15
2449 Top = 8
2450 Width = 91
2451 Caption = 'Validation Report'
2452 ParentColor = False
2453 end
2454 object ValidationReport: TMemo
2455 Left = 0
2456 Height = 360
2457 Top = 24
2458 Width = 713
2459 Align = alBottom
2460 Anchors = [akTop, akLeft, akRight, akBottom]
2461 Lines.Strings = (
2462 'ValidationReport'
2463 )
2464 ScrollBars = ssAutoBoth
2465 TabOrder = 0
2466 end
2467 end
2468 end
2469 end
2470 object LimboTab: TTabSheet
2471 Caption = 'Limbo Transactions'
2472 ClientHeight = 516
2473 ClientWidth = 933
2474 OnHide = LimboTabHide
2475 OnShow = LimboTabShow
2476 object Label38: TLabel
2477 Left = 12
2478 Height = 14
2479 Top = 8
2480 Width = 74
2481 Caption = 'Transactions'
2482 ParentColor = False
2483 end
2484 object IBDynamicGrid3: TIBDynamicGrid
2485 Left = 13
2486 Height = 242
2487 Top = 24
2488 Width = 909
2489 Anchors = [akTop, akLeft, akRight]
2490 Color = clWindow
2491 Columns = <
2492 item
2493 ReadOnly = True
2494 Title.Alignment = taCenter
2495 Title.Caption = 'ID'
2496 Width = 60
2497 FieldName = 'TransactionID'
2498 AutoSizeColumn = False
2499 InitialSortColumn = False
2500 DBLookupProperties.ItemHeight = 0
2501 DBLookupProperties.ItemWidth = 0
2502 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
2503 end
2504 item
2505 ReadOnly = True
2506 Title.Alignment = taCenter
2507 Title.Caption = 'Type'
2508 Width = 80
2509 FieldName = 'TransactionType'
2510 AutoSizeColumn = False
2511 InitialSortColumn = False
2512 DBLookupProperties.ItemHeight = 0
2513 DBLookupProperties.ItemWidth = 0
2514 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
2515 end
2516 item
2517 ReadOnly = True
2518 Title.Alignment = taCenter
2519 Title.Caption = 'Host Site'
2520 Width = 100
2521 FieldName = 'HostSite'
2522 AutoSizeColumn = False
2523 InitialSortColumn = False
2524 DBLookupProperties.ItemHeight = 0
2525 DBLookupProperties.ItemWidth = 0
2526 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
2527 end
2528 item
2529 ReadOnly = True
2530 Title.Alignment = taCenter
2531 Title.Caption = 'Remote Site'
2532 Width = 100
2533 FieldName = 'RemoteSite'
2534 AutoSizeColumn = False
2535 InitialSortColumn = False
2536 DBLookupProperties.ItemHeight = 0
2537 DBLookupProperties.ItemWidth = 0
2538 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
2539 end
2540 item
2541 ReadOnly = True
2542 Title.Alignment = taCenter
2543 Title.Caption = 'Database Path'
2544 Width = 150
2545 FieldName = 'DatabasePath'
2546 AutoSizeColumn = True
2547 InitialSortColumn = False
2548 DBLookupProperties.ItemHeight = 0
2549 DBLookupProperties.ItemWidth = 0
2550 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
2551 end
2552 item
2553 ReadOnly = True
2554 Title.Alignment = taCenter
2555 Title.Caption = 'State'
2556 Width = 80
2557 FieldName = 'State'
2558 AutoSizeColumn = False
2559 InitialSortColumn = False
2560 DBLookupProperties.ItemHeight = 0
2561 DBLookupProperties.ItemWidth = 0
2562 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
2563 end
2564 item
2565 ReadOnly = True
2566 Title.Alignment = taCenter
2567 Title.Caption = 'Rec. Action'
2568 Width = 100
2569 FieldName = 'RecommendedAction'
2570 AutoSizeColumn = False
2571 InitialSortColumn = False
2572 DBLookupProperties.ItemHeight = 0
2573 DBLookupProperties.ItemWidth = 0
2574 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
2575 end
2576 item
2577 PickList.Strings = (
2578 'Commit'
2579 'Rollback'
2580 )
2581 Title.Alignment = taCenter
2582 Title.Caption = 'Req. Action'
2583 Width = 100
2584 FieldName = 'RequestedAction'
2585 AutoSizeColumn = False
2586 InitialSortColumn = False
2587 DBLookupProperties.ItemHeight = 0
2588 DBLookupProperties.ItemWidth = 0
2589 DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
2590 end>
2591 DataSource = LimboListSource
2592 Options = [dgEditing, dgTitles, dgIndicator, dgColumnResize, dgColumnMove, dgColLines, dgRowLines, dgTabs, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit, dgDisableDelete, dgDisableInsert]
2593 Scrollbars = ssAutoVertical
2594 TabOrder = 0
2595 ExpandEditorPanelBelowRow = False
2596 Descending = False
2597 EditorBorderStyle = bsSingle
2598 DefaultPositionAtEnd = False
2599 end
2600 object Button3: TButton
2601 Left = 16
2602 Height = 25
2603 Top = 482
2604 Width = 100
2605 Action = CommitAll
2606 Anchors = [akLeft, akBottom]
2607 TabOrder = 1
2608 end
2609 object Button4: TButton
2610 Left = 128
2611 Height = 25
2612 Top = 482
2613 Width = 100
2614 Action = RollbackAll
2615 Anchors = [akLeft, akBottom]
2616 TabOrder = 2
2617 end
2618 object Button5: TButton
2619 Left = 233
2620 Height = 25
2621 Top = 482
2622 Width = 127
2623 Action = Commit2Phase
2624 Anchors = [akLeft, akBottom]
2625 TabOrder = 3
2626 end
2627 object Button6: TButton
2628 Left = 368
2629 Height = 25
2630 Top = 482
2631 Width = 144
2632 Action = ApplySelected
2633 Anchors = [akLeft, akBottom]
2634 TabOrder = 4
2635 end
2636 object Label39: TLabel
2637 Left = 17
2638 Height = 14
2639 Top = 280
2640 Width = 104
2641 Caption = 'Resolution Report'
2642 ParentColor = False
2643 end
2644 object LimboReport: TMemo
2645 Left = 16
2646 Height = 178
2647 Top = 296
2648 Width = 906
2649 Anchors = [akTop, akLeft, akRight, akBottom]
2650 Lines.Strings = (
2651 'LimboReport'
2652 )
2653 TabOrder = 5
2654 end
2655 end
2656 end
2657 object UpdateColsPanel: TPanel
2658 Left = 328
2659 Height = 64
2660 Top = 128
2661 Width = 544
2662 BevelOuter = bvNone
2663 BorderStyle = bsSingle
2664 ClientHeight = 62
2665 ClientWidth = 542
2666 TabOrder = 3
2667 object Label41: TLabel
2668 Left = 32
2669 Height = 14
2670 Top = 8
2671 Width = 100
2672 Caption = 'Update Columns'
2673 ParentColor = False
2674 end
2675 object DBEdit5: TDBEdit
2676 Left = 144
2677 Height = 24
2678 Top = 4
2679 Width = 388
2680 DataField = 'UPDATE_COLUMNS'
2681 DataSource = SubjectAccessRightsSource
2682 Anchors = [akTop, akLeft, akRight]
2683 CharCase = ecNormal
2684 MaxLength = 0
2685 TabOrder = 0
2686 end
2687 object Label42: TLabel
2688 Left = 8
2689 Height = 14
2690 Top = 40
2691 Width = 123
2692 Caption = 'Referenced Columns'
2693 ParentColor = False
2694 end
2695 object DBEdit6: TDBEdit
2696 Left = 144
2697 Height = 24
2698 Top = 35
2699 Width = 388
2700 DataField = 'REFERENCE_COLUMNS'
2701 DataSource = SubjectAccessRightsSource
2702 Anchors = [akTop, akLeft, akRight]
2703 CharCase = ecNormal
2704 MaxLength = 0
2705 TabOrder = 1
2706 end
2707 end
2708 object MainMenu1: TMainMenu
2709 left = 712
2710 top = 64
2711 object MenuItem1: TMenuItem
2712 Caption = 'File'
2713 object MenuItem6: TMenuItem
2714 Action = OpenDatabase
2715 end
2716 object MenuItem8: TMenuItem
2717 Action = Save
2718 end
2719 object MenuItem7: TMenuItem
2720 Caption = '-'
2721 end
2722 object MenuItem3: TMenuItem
2723 Action = Backup
2724 end
2725 object MenuItem5: TMenuItem
2726 Action = Restore
2727 end
2728 object MenuItem10: TMenuItem
2729 Caption = '-'
2730 end
2731 object MenuItem9: TMenuItem
2732 Action = DropDatabase
2733 end
2734 object MenuItem4: TMenuItem
2735 Caption = '-'
2736 end
2737 object MenuItem2: TMenuItem
2738 Action = Quit
2739 end
2740 end
2741 end
2742 object ActionList1: TActionList
2743 Images = MenuImages
2744 left = 712
2745 top = 128
2746 object Quit: TAction
2747 Category = 'General'
2748 Caption = 'Exit'
2749 OnExecute = QuitExecute
2750 end
2751 object Backup: TAction
2752 Category = 'General'
2753 Caption = 'Backup'
2754 Hint = 'Backup Database to Archive File'
2755 ImageIndex = 1
2756 OnExecute = BackupExecute
2757 end
2758 object Restore: TAction
2759 Category = 'General'
2760 Caption = 'Restore'
2761 Hint = 'Restore Database From Archive'
2762 ImageIndex = 0
2763 OnExecute = RestoreExecute
2764 end
2765 object OpenDatabase: TAction
2766 Category = 'General'
2767 Caption = 'Open Database'
2768 OnExecute = OpenDatabaseExecute
2769 end
2770 object AddSecondary: TAction
2771 Category = 'files'
2772 Caption = 'Add'
2773 OnExecute = AddSecondaryExecute
2774 end
2775 object AddShadowSet: TAction
2776 Category = 'files'
2777 Caption = 'Add Set'
2778 OnExecute = AddShadowSetExecute
2779 end
2780 object RemoveShadow: TAction
2781 Category = 'files'
2782 Caption = 'Remove Set'
2783 OnExecute = RemoveShadowExecute
2784 OnUpdate = RemoveShadowUpdate
2785 end
2786 object Save: TAction
2787 Category = 'General'
2788 Caption = 'Save'
2789 Hint = 'Save to File'
2790 ImageIndex = 2
2791 OnExecute = SaveExecute
2792 OnUpdate = SaveUpdate
2793 end
2794 object DropDatabase: TAction
2795 Category = 'General'
2796 Caption = 'Drop Database'
2797 OnExecute = DropDatabaseExecute
2798 OnUpdate = DropDatabaseUpdate
2799 end
2800 object AddUser: TAction
2801 Category = 'Users'
2802 Caption = 'Add New User'
2803 OnExecute = AddUserExecute
2804 OnUpdate = AddUserUpdate
2805 end
2806 object ChgPassword: TAction
2807 Category = 'Users'
2808 Caption = 'Change Password'
2809 OnExecute = ChgPasswordExecute
2810 OnUpdate = ChgPasswordUpdate
2811 end
2812 object DeleteUser: TAction
2813 Category = 'Users'
2814 Caption = 'Delete'
2815 OnExecute = DeleteUserExecute
2816 OnUpdate = DeleteUserUpdate
2817 end
2818 object SaveChanges: TAction
2819 Category = 'Users'
2820 Caption = 'Save Changes'
2821 OnExecute = SaveChangesExecute
2822 OnUpdate = SaveChangesUpdate
2823 end
2824 object AddTag: TAction
2825 Category = 'Tags'
2826 Caption = 'Add Tag'
2827 OnExecute = AddTagExecute
2828 OnUpdate = AddTagUpdate
2829 end
2830 object DeleteTag: TAction
2831 Category = 'Tags'
2832 Caption = 'Delete'
2833 OnExecute = DeleteTagExecute
2834 OnUpdate = DeleteTagUpdate
2835 end
2836 object ToggleAutoRefresh: TAction
2837 Category = 'Attachments'
2838 Caption = 'Auto Refresh'
2839 OnExecute = ToggleAutoRefreshExecute
2840 OnUpdate = ToggleAutoRefreshUpdate
2841 end
2842 object DisconnectAttachment: TAction
2843 Category = 'Attachments'
2844 Caption = 'Disconnect'
2845 OnExecute = DisconnectAttachmentExecute
2846 OnUpdate = DisconnectAttachmentUpdate
2847 end
2848 object RunRepair: TAction
2849 Category = 'Repair'
2850 Caption = 'Run'
2851 OnExecute = RunRepairExecute
2852 end
2853 object CommitAll: TAction
2854 Category = 'Limbo'
2855 Caption = 'Commit All'
2856 OnExecute = CommitAllExecute
2857 OnUpdate = CommitAllUpdate
2858 end
2859 object RollbackAll: TAction
2860 Category = 'Limbo'
2861 Caption = 'Rollback All'
2862 OnExecute = RollbackAllExecute
2863 OnUpdate = CommitAllUpdate
2864 end
2865 object Commit2Phase: TAction
2866 Category = 'Limbo'
2867 Caption = 'Commit 2 Phase All'
2868 OnExecute = Commit2PhaseExecute
2869 OnUpdate = CommitAllUpdate
2870 end
2871 object ApplySelected: TAction
2872 Category = 'Limbo'
2873 Caption = 'Apply Selected Action'
2874 OnExecute = ApplySelectedExecute
2875 OnUpdate = CommitAllUpdate
2876 end
2877 object Phase2Repair: TAction
2878 Category = 'Repair'
2879 Caption = 'Repair'
2880 OnExecute = RunRepairExecute
2881 end
2882 object RevokeAll: TAction
2883 Category = 'AccessRights'
2884 Caption = 'Revoke All'
2885 OnExecute = RevokeAllExecute
2886 OnUpdate = RevokeAllUpdate
2887 end
2888 end
2889 object MenuImages: TImageList
2890 left = 704
2891 top = 184
2892 Bitmap = {
2893 4C69050000001000000010000000000000000000000000000000000000000000
2894 0000000000000000000000000000000000000000000000000000000000FF0000
2895 00FF000000FF000000FF000000FF000000000000000000000000000000000000
2896 00000000000000000000000084FF0000000000000000000000FF848400FFFFFF
2897 00FF000000FFFFFF00FFFFFF00FF000000000000000000000000000000000000
2898 00000000000000000000000084FF000084FF00000000000000FF848400FF8484
2899 00FFFFFF00FF000000FFFFFF00FF000000000000000000000000000000000000
2900 0000000084FF000084FF000084FF000084FF000084FF000000FF848400FFFFFF
2901 00FF000000FFFFFF00FFFFFF00FF000000000000000000000000000000000000
2902 0000000084FF00000000000084FF000084FF00000000000000FF848400FF8484
2903 00FFFFFF00FF000000FFFFFF00FF000000000000000000000000000000000000
2904 0000000084FF00000000000084FF0000000000000000000000FF848400FFFFFF
2905 00FF000000FFFFFF00FFFFFF00FF000000000000000000000000000000000000
2906 0000000084FF0000000000000000000000000000000000000000000000FF0000
2907 00FF000000FF000000FF000000FF000000000000000000000000000000000000
2908 0000000084FF0000000000000000000000000000000000000000000000000000
2909 00000000000000000000000000000000000000000000000000FF000000FF0000
2910 00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
2911 00FF000000FF000000FF000000FF00000000000000FF00000000000000008484
2912 84FFC6C6C6FFC6C6C6FFC6C6C6FF000000FF000000FFC6C6C6FFC6C6C6FFC6C6
2913 C6FF848484FF000000000000000000000000000000FF848484FF848484FF0000
2914 00FF000000FF000000FF848484FFC6C6C6FFC6C6C6FF848484FF000000FF0000
2915 00FF000000FF848484FFC6C6C6FF00000000000000FF848484FF000000FF8484
2916 84FF0000000000000000000000FFC6C6C6FF848484FF000000FF848484FF0000
2917 000000000000000000FF848484FF00000000000000FF848484FF000000FF0000
2918 0000000000FF00000000000000FFC6C6C6FFC6C6C6FF000000FF000000000000
2919 00FF00000000000000FF848484FF00000000000000FF848484FF000000FF8484
2920 84FF00000000848484FF000000FFC6C6C6FFC6C6C6FF000000FF848484FF0000
2921 0000848484FF000000FF848484FF00000000000000FF848484FF848484FF0000
2922 00FF000000FF000000FF848484FF848484FF848484FF848484FF000000FF0000
2923 00FF000000FF000000FF848484FF00000000000000FF848484FFC6C6C6FFC6C6
2924 C6FFC6C6C6FFC6C6C6FFC6C6C6FFC6C6C6FF00000000C6C6C6FF848484FF8484
2925 84FF848484FF848484FFC6C6C6FF000000000000000000000000000000000000
2926 0000000000000000000000000000000000000000000000000000000000FF0000
2927 00FF000000FF000000FF000000FF000000000000000000000000000000000000
2928 00000000000000000000000000000000000000000000000000FF848400FFFFFF
2929 00FF000000FFFFFF00FFFFFF00FF000000000000000000000000000000000000
2930 00000000000000000000000000000000000000000000000000FF848400FF8484
2931 00FFFFFF00FF000000FFFFFF00FF000000000000000000000000000000000000
2932 0000000084FF000084FF000084FF000084FF000084FF000000FF848400FFFFFF
2933 00FF000000FFFFFF00FFFFFF00FF000000000000000000000000000000000000
2934 0000000084FF00000000000000000000000000000000000000FF848400FF8484
2935 00FFFFFF00FF000000FFFFFF00FF000000000000000000000000000084FF0000
2936 84FF000084FF000084FF000084FF0000000000000000000000FF848400FFFFFF
2937 00FF000000FFFFFF00FFFFFF00FF000000000000000000000000000000000000
2938 84FF000084FF000084FF00000000000000000000000000000000000000FF0000
2939 00FF000000FF000000FF000000FF000000000000000000000000000000000000
2940 0000000084FF0000000000000000000000000000000000000000000000000000
2941 00000000000000000000000000000000000000000000000000FF000000FF0000
2942 00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
2943 00FF000000FF000000FF000000FF00000000000000FF00000000000000008484
2944 84FFC6C6C6FFC6C6C6FFC6C6C6FF000000FF000000FFC6C6C6FFC6C6C6FFC6C6
2945 C6FF848484FF000000000000000000000000000000FF848484FF848484FF0000
2946 00FF000000FF000000FF848484FFC6C6C6FFC6C6C6FF848484FF000000FF0000
2947 00FF000000FF848484FFC6C6C6FF00000000000000FF848484FF000000FF8484
2948 84FF0000000000000000000000FFC6C6C6FF848484FF000000FF848484FF0000
2949 000000000000000000FF848484FF00000000000000FF848484FF000000FF0000
2950 0000000000FF00000000000000FFC6C6C6FFC6C6C6FF000000FF000000000000
2951 00FF00000000000000FF848484FF00000000000000FF848484FF000000FF8484
2952 84FF00000000848484FF000000FFC6C6C6FFC6C6C6FF000000FF848484FF0000
2953 0000848484FF000000FF848484FF00000000000000FF848484FF848484FF0000
2954 00FF000000FF000000FF848484FF848484FF848484FF848484FF000000FF0000
2955 00FF000000FF000000FF848484FF00000000000000FF848484FFC6C6C6FFC6C6
2956 C6FFC6C6C6FFC6C6C6FFC6C6C6FFC6C6C6FF00000000C6C6C6FF848484FF8484
2957 84FF848484FF848484FFC6C6C6FFA46534FF5959F3FF5959F3FF5959F3FF5959
2958 F3FF5959F3FF5959F3FF5959F3FF5959F3FF5959F3FF5959F3FF5959F3FF5959
2959 F3FF5959F3FFA46534FF00000000A46534FF5959F3FF5959F3FF5959F3FF5959
2960 F3FF5959F3FF5959F3FF5959F3FF5959F3FF5959F3FF5959F3FF5959F3FF5959
2961 F3FF5959F3FFA46534FF00000000A46534FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
2962 FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
2963 FFFFFFFFFFFFA46534FF00000000A46534FFFFFFFFFF2929EFFFFFFFFFFF2929
2964 EFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
2965 FFFFFFFFFFFFA46534FF00000000A46534FFFFFFFFFFFFFFFFFF2929EFFFFFFF
2966 FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
2967 FFFFFFFFFFFFA46534FF00000000A46534FFFFFFFFFFFFFFFFFF2929EFFFFFFF
2968 FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
2969 FFFFFFFFFFFFA46534FF00000000A46534FFFFFFFFFFFFFFFFFF2929EFFFFFFF
2970 FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
2971 FFFFFFFFFFFFA46534FF00000000A46534FFFFFFFFFF2929EFFFFFFFFFFF2929
2972 EFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
2973 FFFFFFFFFFFFA46534FF00000000A46534FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
2974 FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
2975 FFFFFFFFFFFFA46534FF00000000A46534FFA46534FFA46534FFA46534FFA465
2976 34FFA46534FFA46534FFA46534FFA46534FFA46534FFA46534FFA46534FFA465
2977 34FFA46534FFA46534FF00000000A46534FFA46534FFA46534FFB6BDBAFFB6BD
2978 BAFFB6BDBAFFB6BDBAFFB6BDBAFFB6BDBAFFB6BDBAFFA46534FFA46534FFA465
2979 34FFA46534FFA46534FF00000000A46534FFA46534FFA46534FFB6BDBAFFA465
2980 34FFB6BDBAFFB6BDBAFFB6BDBAFFB6BDBAFFB6BDBAFFA46534FFA46534FFA465
2981 34FFA46534FFA46534FF00000000A46534FFA46534FFA46534FFB6BDBAFFA465
2982 34FFB6BDBAFFB6BDBAFFB6BDBAFFB6BDBAFFB6BDBAFFA46534FFA46534FFA465
2983 34FFA46534FFA46534FF00000000A46534FFA46534FFA46534FFB6BDBAFFA465
2984 34FFB6BDBAFFB6BDBAFFB6BDBAFFB6BDBAFFB6BDBAFFA46534FFA46534FFA465
2985 34FFA46534FFA46534FF00000000A46534FFA46534FFA46534FFB6BDBAFFA465
2986 34FFB6BDBAFFB6BDBAFFB6BDBAFFB6BDBAFFB6BDBAFFA46534FFA46534FFA465
2987 34FFA46534FFA46534FF00000000A4653455A46534FFA46534FFB6BDBAFFB6BD
2988 BAFFB6BDBAFFB6BDBAFFB6BDBAFFB6BDBAFFB6BDBAFFA46534FFA46534FFA465
2989 34FFA46534FFA46534FF0000000000000000959493099898973D9C9C9B67A3A3
2990 A293B1B1B0C2CECFCEDCE0E1E0E9CBCBC7EAB9B7B3DEB0AFA9C4AEADA896B0AE
2991 AA6AACABA6409A99980A00000000A1A1A048A2A3A2FFA1A19FFF9E9E9CFF9C9D
2992 9AFF9C9C9BFFA6A7A6FFDBDCDCFFC5C4BDFFAEAAA1FFA7A49BFFA7A59CFFABAA
2993 A4FFB4B3AFFFB9B8B4FFADACA84C9C9C9BABBCBDBCFFC0C1C0FFC2C2C1FFC3C3
2994 C2FFC8C8C7FFD7D8D8FFEAEAEAFFBBB8B1FFA9A69CFFA5A197FFA09C93FFA09C
2995 93FFA7A49CFFB2B0AAFFA09E99AC8C8C8AABA2A2A0FFBDBEBDFFCCCECDFFD5D5
2996 D5FFDEDFDFFFE9E9EAFFDEDEDBFFC8C6C2FFB7B5AFFFACAAA3FFA7A59EFFA8A7
2997 A1FFB1AFACFFA8A6A3FF8E8B84AB8D8D8CABA2A2A0FFBFC1C0FFE0E0E0FFFBFD
2998 FDFFECEDECFFD7D7D4FFC4C4BFFFB4B3ADFFA4A29AFF9C9990FFA6A39DFFAEAE
2999 AAFFB9B8B7FFA9A8A5FF8F8C86AB8D806E99A3A4A1FFC0C1C1FFDFE0E0FFF8FA
3000 F9FFEAEBEBFFD9D9D7FFC8C8C3FFB7B5B0FFA6A49DFF9D9A92FFA6A39EFFAEAE
3001 AAFFB9B8B8FFAAA9A7FF8F826F9E8E8C899B615443FF837053FFBDA987FFE5D9
3002 C3FFE6E3D8FFDDDDDAFFD9DBD9FFD3D3D1FFB7B7B2FFB8B3A9FFBEB3A1FFBEAD
3003 93FF9F8E75FFA8A196FFBAB6B1B28F8F8DAB989A99FF898987FF72706DFF6762
3004 5BFF655D52FF685E50FF857C70FF8C8579FF898275FFABA69EFF908B84FF9C98
3005 95FFA9A8A4FFB5B4B2FFC7C6C3CD8D8D8BABA3A2A0FFC1C3C2FFDADCDCFFE8E9
3006 E9FFDFE0DFFFDEDFDEFFCFD0CDFFC0BFBBFFB2B1ABFFAAA7A1FFABABA5FF7EB3
3007 79FFB8B9B8FFAAA9A6FF8F8C85AB8C8B88ABA2A3A1FFBFC1C0FFDEDFDFFFF7F9
3008 F8FFEAEAE9FFD9D9D6FFC8C8C3FFB7B6B1FFA6A49DFF9E9B93FF6BB161FF56AF
3009 49FF65B35BFFA7A7A3FF8F8B84AB8C7C678F9E8868FFC3C3BFFFE3E9F0FFFEFF
3010 FFFFEDEEEFFFDADBD9FFC9C8C3FFB8B6B0FFA5A49CFF6BB061FF55B148FF50B0
3011 43FF50B144FF67AF5EFF98826E968F908FAB767571FF615748FF655844FF7969
3012 50FF8C7859FF967F5EFF99825CFF977F5AFF6EAB60FF3FA432FF269816FF228F
3013 15FF28981DFF32A528FF489D43C78D8D8BABA4A4A2FFB9BAB9FFB9BAB9FFAFB1
3014 B2FF9DA1A4FF969A9EFF878C90FF7C7F82FF7B7479FF63975BFF1E8D11FF2178
3015 18FF2B8625FF899C84FF99898FA88C8C8BACA2A2A0FFBFC1C0FFDEDFDFFFF9FB
3016 FBFFEEEFEEFFDDDDD9FFCAC9C5FFB8B7B1FFA7A39DFF6FA565FF259619FF2B85
3017 24FF389534FF88A183FF918C87AB91918F49A0A1A0FFC1C2C1FFE0E0E0FFF7F9
3018 F8FFE9EAE9FFD9D9D6FFC8C8C3FFB6B5B0FFA7A49DFF71A667FF2EA723FF3CAC
3019 36FF4FBC4DFF8CA588FF97908F5B00000000999B9B0AAEB0AF40CBCCCC6CDEE0
3020 DF94D9D9D8B7CCCDCAD0BFBFBBD7B1B0ACD8A4A29CD372A06AC333A32BB643AE
3021 3EB552BC52B658A6593E00000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
3022 FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF006360
3023 F80AFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF007774FF1F7774
3024 FF2BFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00625FF82B5D5B
3025 F76F5956F53EFFFFFF00FFFFFF00FFFFFF00FFFFFF007774FF1F7A77FFFF7976
3026 FEFF726FFD2BFFFFFF00FFFFFF00FFFFFF00FFFFFF00615EF82B6461F8FF6A68
3027 F9FF5451F3A84F4DF229FFFFFF00FFFFFF007774FF1F7A77FFFF817EFFFF817E
3028 FEFF7471FDFF6C69FB2BFFFFFF00FFFFFF00605DF72B625FF8FF6F6DFBFF7E7C
3029 FFFF625FF8FF4A47F06F4542EE02FFFFFF007673FF087471FEFD7D7AFEFF8A87
3030 FFFF7C79FDFF6C69FBFF6361F92B5F5CF72B615EF8FF6E6CFAFF7D7AFFFF615F
3031 F7FF4946F0FC4441EE05FFFFFF00FFFFFF00FFFFFF00716EFD086E6BFCFC7774
3032 FDFF8682FFFF7673FCFF6462F8FF605DF7FF6D6AFAFF7B79FFFF605DF7FF4845
3033 EFFC4341EE08FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF006967FB086663
3034 F9FC706DFBFF807EFFFF7E7BFFFF7C79FFFF7977FFFF5E5CF7FF4744EFFC4240
3035 EE08FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00615E
3036 F8085D5AF6FD7D79FFFF5E5BFFFF5B58FFFF7674FFFF4643EFFD413FED08FFFF
3037 FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF005C59
3038 F62B5D5BF7FF7976FFFF5956FFFF5754FFFF7270FFFF4846F0FF3C39EB2BFFFF
3039 FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF005B58F62B5C5A
3040 F6FF6764FAFF7472FFFF7370FFFF706EFFFF6E6CFFFF5755F7FF3F3DEEFF3230
3041 E82BFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF005A57F52B5B59F6FF6663
3042 FAFF7471FFFF5A58F6FF4341EEFC3E3CECFD504DF4FF6867FFFF504EF5FF3634
3043 EBFF2A27E52BFFFFFF00FFFFFF00FFFFFF005956F52B5B58F6FF6562FAFF7170
3044 FFFF5956F6FF4240EEFC3E3BEC083937EB083532E9FC4745F2FF6362FFFF4A48
3045 F4FF2F2DE9FF2220E32BFFFFFF00FFFFFF005451F3415856F5FF6361FAFF5855
3046 F6FF413FEDFC3D3AEC08FFFFFF00FFFFFF00302DE7082C2AE6FC413FF1FF4C4A
3047 F6FF312FEAFF1F1DE241FFFFFF00FFFFFF00FFFFFF004A47F0414F4CF2FF403E
3048 EDFD3C39EB08FFFFFF00FFFFFF00FFFFFF00FFFFFF002725E5082422E4FC312F
3049 EAFF1F1DE241FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF003F3DED413B38
3050 EB08FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00211FE3081E1C
3051 E241FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
3052 FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
3053 FF00FFFFFF00FFFFFF00FFFFFF00
3054 }
3055 end
3056 object CharSetSource: TDataSource
3057 DataSet = DatabaseData.CharSetLookup
3058 left = 552
3059 top = 240
3060 end
3061 object SecDBFilesSource: TDataSource
3062 DataSet = DatabaseData.DBSecFiles
3063 left = 552
3064 top = 376
3065 end
3066 object DBCharSetSource: TDataSource
3067 DataSet = DatabaseData.DBCharSet
3068 left = 552
3069 top = 304
3070 end
3071 object DatabaseSource: TDataSource
3072 DataSet = DatabaseData.DatabaseQuery
3073 left = 560
3074 top = 448
3075 end
3076 object IBDatabaseInfo: TIBDatabaseInfo
3077 Database = DatabaseData.IBDatabase1
3078 left = 712
3079 top = 240
3080 end
3081 object AttmtSource: TDataSource
3082 DataSet = DatabaseData.AttmtQuery
3083 left = 416
3084 top = 448
3085 end
3086 object ShadowSource: TDataSource
3087 DataSet = DatabaseData.ShadowFiles
3088 left = 424
3089 top = 400
3090 end
3091 object SynSQLSyn1: TSynSQLSyn
3092 DefaultFilter = 'SQL Files (*.sql)|*.sql'
3093 Enabled = False
3094 CommentAttri.Foreground = clGreen
3095 KeyAttri.Foreground = clBlue
3096 NumberAttri.Foreground = clRed
3097 SQLDialect = sqlSybase
3098 left = 712
3099 top = 352
3100 end
3101 object IBExtract1: TIBExtract
3102 Database = DatabaseData.IBDatabase1
3103 Transaction = DatabaseData.CurrentTransaction
3104 ShowSystem = False
3105 AlwaysQuoteIdentifiers = False
3106 left = 712
3107 top = 296
3108 end
3109 object SQlSaveDialog: TSaveDialog
3110 DefaultExt = '.sql'
3111 Filter = 'SQLFiles (*.sql)|*.sql|All Files|*.*'
3112 Options = [ofOverwritePrompt, ofEnableSizing, ofViewDetail]
3113 left = 712
3114 top = 472
3115 end
3116 object SaveDialog: TSaveDialog
3117 DefaultExt = '.txt'
3118 Filter = 'Text Files (*.txt)|*.txt|All Files |*.*'
3119 Options = [ofOverwritePrompt, ofEnableSizing, ofViewDetail]
3120 left = 712
3121 top = 416
3122 end
3123 object UserListSource: TDataSource
3124 DataSet = DatabaseData.UserList
3125 left = 416
3126 top = 328
3127 end
3128 object RoleSource: TDataSource
3129 DataSet = DatabaseData.RoleNameList
3130 left = 416
3131 top = 272
3132 end
3133 object UserTagsSource: TDataSource
3134 DataSet = DatabaseData.UserTags
3135 left = 416
3136 top = 224
3137 end
3138 object UserPopup: TPopupMenu
3139 left = 840
3140 top = 296
3141 object MenuItem11: TMenuItem
3142 Action = AddUser
3143 end
3144 object MenuItem12: TMenuItem
3145 Action = ChgPassword
3146 end
3147 object MenuItem13: TMenuItem
3148 Caption = '-'
3149 end
3150 object MenuItem14: TMenuItem
3151 Action = DeleteUser
3152 end
3153 end
3154 object UserTagPopup: TPopupMenu
3155 left = 845
3156 top = 346
3157 object MenuItem15: TMenuItem
3158 Action = AddTag
3159 end
3160 object MenuItem16: TMenuItem
3161 Action = DeleteTag
3162 end
3163 end
3164 object AttachSource: TDataSource
3165 DataSet = DatabaseData.Attachments
3166 left = 552
3167 top = 112
3168 end
3169 object AttmtTimer: TTimer
3170 Enabled = False
3171 Interval = 5000
3172 OnTimer = AttmtTimerTimer
3173 left = 792
3174 top = 64
3175 end
3176 object AttmtPopup: TPopupMenu
3177 left = 840
3178 top = 240
3179 object MenuItem17: TMenuItem
3180 Action = ToggleAutoRefresh
3181 end
3182 object MenuItem18: TMenuItem
3183 Action = DisconnectAttachment
3184 end
3185 end
3186 object LimboListSource: TDataSource
3187 DataSet = DatabaseData.InLimboList
3188 left = 552
3189 top = 176
3190 end
3191 object DBTablesSource: TDataSource
3192 DataSet = DatabaseData.DBTables
3193 left = 304
3194 top = 224
3195 end
3196 object AuthMapSource: TDataSource
3197 DataSet = DatabaseData.AuthMappings
3198 left = 303
3199 top = 286
3200 end
3201 object SubjectAccessRightsSource: TDataSource
3202 DataSet = DatabaseData.SubjectAccessRights
3203 OnDataChange = SubjectAccessRightsSourceDataChange
3204 left = 297
3205 top = 429
3206 end
3207 object AccessRightsPopup: TPopupMenu
3208 left = 845
3209 top = 415
3210 object MenuItem19: TMenuItem
3211 Action = RevokeAll
3212 end
3213 end
3214 object AccessRightsSource: TDataSource
3215 DataSet = DatabaseData.AccessRights
3216 left = 288
3217 top = 360
3218 end
3219 end