ViewVC Help
View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing
root/public/ibx/trunk/examples/DBAdmin/MainFormUnit.lfm
(Generate patch)

Comparing ibx/trunk/examples/DBAdmin/MainFormUnit.lfm (file contents):
Revision 209 by tony, Wed Mar 14 12:48:51 2018 UTC vs.
Revision 210 by tony, Wed Mar 14 15:03:38 2018 UTC

# Line 65 | Line 65 | object MainForm: TMainForm
65      Height = 548
66      Top = 26
67      Width = 939
68 <    ActivePage = Properties
68 >    ActivePage = AttachmentsTab
69      Align = alClient
70      MultiLine = True
71      ParentShowHint = False
72      ShowHint = True
73 <    TabIndex = 0
73 >    TabIndex = 2
74      TabOrder = 2
75      Options = [nboMultiLine]
76      object Properties: TTabSheet
# Line 765 | Line 765 | object MainForm: TMainForm
765          Color = clWindow
766          Columns = <        
767            item
768 +            ReadOnly = True
769              Title.Alignment = taCenter
770              Title.Caption = 'ID'
771              Width = 40
# Line 776 | Line 777 | object MainForm: TMainForm
777              DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
778            end        
779            item
780 +            ReadOnly = True
781              Title.Alignment = taCenter
782              Title.Caption = 'Connect Str'
783              Width = 100
# Line 787 | Line 789 | object MainForm: TMainForm
789              DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
790            end        
791            item
792 +            ReadOnly = True
793              Title.Alignment = taCenter
794              Title.Caption = 'Client'
795              Width = 120
# Line 798 | Line 801 | object MainForm: TMainForm
801              DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
802            end        
803            item
804 +            ReadOnly = True
805              Title.Alignment = taCenter
806              Title.Caption = 'Client Name'
807              Width = 100
# Line 809 | Line 813 | object MainForm: TMainForm
813              DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
814            end        
815            item
816 +            ReadOnly = True
817              Title.Alignment = taCenter
818              Title.Caption = 'User'
819              Width = 80
# Line 820 | Line 825 | object MainForm: TMainForm
825              DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
826            end        
827            item
828 +            ReadOnly = True
829              Title.Alignment = taCenter
830              Title.Caption = 'Role'
831              Width = 80
# Line 831 | Line 837 | object MainForm: TMainForm
837              DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
838            end        
839            item
840 +            ReadOnly = True
841              Title.Alignment = taCenter
842              Title.Caption = 'IP Address'
843              Width = 100
# Line 843 | Line 850 | object MainForm: TMainForm
850            end        
851            item
852              Alignment = taCenter
853 +            ReadOnly = True
854              Title.Alignment = taCenter
855              Title.Caption = 'Protocol'
856              Width = 60
# Line 854 | Line 862 | object MainForm: TMainForm
862              DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
863            end        
864            item
865 +            ReadOnly = True
866              Title.Alignment = taCenter
867              Title.Caption = 'Char Set'
868              Width = 60
# Line 866 | Line 875 | object MainForm: TMainForm
875            end        
876            item
877              Alignment = taCenter
878 +            ReadOnly = True
879              Title.Alignment = taCenter
880              Title.Caption = 'State'
881              Width = 60
# Line 877 | Line 887 | object MainForm: TMainForm
887              DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
888            end>
889          DataSource = AttachSource
890 +        Options = [dgTitles, dgIndicator, dgColumnResize, dgColumnMove, dgColLines, dgRowLines, dgTabs, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
891          PopupMenu = AttmtPopup
892          Scrollbars = ssAutoVertical
893          TabOrder = 0
# Line 918 | Line 929 | object MainForm: TMainForm
929            Width = 48
930            DataField = 'MON$SERVER_PID'
931            DataSource = AttachSource
932 +          ReadOnly = True
933            CharCase = ecNormal
934            MaxLength = 0
935            TabOrder = 0
# Line 929 | Line 941 | object MainForm: TMainForm
941            Width = 48
942            DataField = 'MON$REMOTE_PID'
943            DataSource = AttachSource
944 +          ReadOnly = True
945            CharCase = ecNormal
946            MaxLength = 0
947            TabOrder = 1
# Line 941 | Line 954 | object MainForm: TMainForm
954            Caption = 'Garbage Collection Allowed'
955            DataField = 'MON$GARBAGE_COLLECTION'
956            DataSource = AttachSource
957 +          ReadOnly = True
958            TabOrder = 2
959            ValueChecked = '1'
960            ValueUnchecked = '0'
# Line 960 | Line 974 | object MainForm: TMainForm
974            Width = 64
975            DataField = 'MON$STAT_ID'
976            DataSource = AttachSource
977 +          ReadOnly = True
978            CharCase = ecNormal
979            MaxLength = 0
980            TabOrder = 3

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines