ViewVC Help
View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing
root/public/ibx/trunk/examples/DBAdmin/MainFormUnit.lfm
Revision: 263
Committed: Thu Dec 6 15:55:01 2018 UTC (5 years, 3 months ago) by tony
File size: 104088 byte(s)
Log Message:
Release 2.3.2 committed

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