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

Comparing ibx/trunk/design/ibmodifysqleditor.lfm (file contents):
Revision 80 by tony, Mon Jan 1 11:31:07 2018 UTC vs.
Revision 107 by tony, Thu Jan 18 14:37:40 2018 UTC

# Line 1 | Line 1
1   inherited IBModifySQLEditorForm: TIBModifySQLEditorForm
2 +  Left = 1041
3 +  Height = 512
4 +  Top = 330
5    Caption = 'Modify SQL Editor'
6 +  ClientHeight = 512
7 +  inherited Button1: TButton
8 +    Top = 457
9 +  end
10 +  inherited Button2: TButton
11 +    Top = 457
12 +  end
13    inherited GenerateBtn: TButton
14 +    Top = 457
15      OnClick = GenerateBtnClick
16    end
17 +  inherited TestBtn: TButton
18 +    Top = 457
19 +  end
20    inherited PageControl: TPageControl
7    ActivePage = SelectPage
8    TabIndex = 0
21      inherited SelectPage: TTabSheet
22 <      object IncludePrimaryKeys: TCheckBox[8]
23 <        Left = 5
24 <        Height = 22
25 <        Top = 300
26 <        Width = 221
27 <        Caption = 'Include Primary keys in Field List'
28 <        Checked = True
29 <        OnChange = IncludePrimaryKeysChange
30 <        State = cbChecked
22 >      inherited Label2: TLabel
23 >        Left = 7
24 >        Top = 224
25 >        Width = 106
26 >        Caption = 'Updateable Fields'
27 >      end
28 >      inherited Label4: TLabel
29 >        Left = 7
30 >      end
31 >      inherited FieldNamesGrid: TIBDynamicGrid
32 >        Height = 104
33 >        Top = 240
34 >      end
35 >      inherited PrimaryKeysGrid: TIBDynamicGrid
36 >        Height = 48
37 >      end
38 >      inherited SelectSelectAll: TCheckBox
39 >        Top = 344
40 >      end
41 >      object Label5: TLabel[8]
42 >        Left = 9
43 >        Height = 14
44 >        Top = 152
45 >        Width = 138
46 >        Caption = 'Computed By Columns'
47 >        ParentColor = False
48 >      end
49 >      object ReadOnlyGrid: TIBDynamicGrid[9]
50 >        Left = 9
51 >        Height = 48
52 >        Top = 168
53 >        Width = 209
54 >        Color = clWindow
55 >        Columns = <        
56 >          item
57 >            ButtonStyle = cbsCheckboxColumn
58 >            Title.Caption = 'SELECTED'
59 >            Width = 30
60 >            FieldName = 'SELECTED'
61 >            AutoSizeColumn = False
62 >            InitialSortColumn = False
63 >            DBLookupProperties.ItemHeight = 0
64 >            DBLookupProperties.ItemWidth = 0
65 >            DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
66 >          end        
67 >          item
68 >            Title.Caption = 'COLUMNNAME'
69 >            Width = 64
70 >            FieldName = 'COLUMNNAME'
71 >            AutoSizeColumn = True
72 >            InitialSortColumn = False
73 >            DBLookupProperties.ItemHeight = 0
74 >            DBLookupProperties.ItemWidth = 0
75 >            DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
76 >          end>
77 >        FixedCols = 0
78 >        Options = [dgEditing, dgColumnResize, dgColumnMove, dgRowLines, dgConfirmDelete, dgCancelOnExit, dgDisableDelete, dgDisableInsert]
79 >        Scrollbars = ssAutoVertical
80          TabOrder = 5
81 +        ExpandEditorPanelBelowRow = False
82 +        Descending = False
83 +        EditorBorderStyle = bsSingle
84 +        DefaultPositionAtEnd = False
85        end
86      end
87      inherited ExecutePage: TTabSheet
88        inherited Label18: TLabel
89 <        Visible = False
25 <      end
26 <      inherited SelectProcedure: TLabel
27 <        Width = 81
28 <        Caption = 'Execute Only'
89 >        Top = 240
90        end
91        inherited InputProcGrid: TIBDynamicGrid
92 <        Height = 224
92 >        Height = 107
93        end
94        inherited OutputProcGrid: TIBDynamicGrid
95 <        Visible = False
95 >        Left = 10
96 >        Height = 112
97 >        Top = 256
98 >        Columns = <        
99 >          item
100 >            ButtonStyle = cbsCheckboxColumn
101 >            PickList.Strings = (            )
102 >            Title.Caption = 'SELECTED'
103 >            Width = 30
104 >            FieldName = 'SELECTED'
105 >            AutoSizeColumn = False
106 >            InitialSortColumn = False
107 >            DBLookupProperties.ItemHeight = 0
108 >            DBLookupProperties.ItemWidth = 0
109 >            DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
110 >          end        
111 >          item
112 >            PickList.Strings = (            )
113 >            Title.Caption = 'COLUMNNAME'
114 >            Width = 0
115 >            Visible = False
116 >            FieldName = 'COLUMNNAME'
117 >            AutoSizeColumn = True
118 >            InitialSortColumn = False
119 >            DBLookupProperties.ItemHeight = 0
120 >            DBLookupProperties.ItemWidth = 0
121 >            DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
122 >          end>
123        end
124      end
125    end
126    inherited IBSQLEditFrame1: TIBSQLEditFrame
127      Left = 282
128 <    Height = 339
128 >    Height = 389
129      Top = 24
130      Width = 448
131      Anchors = [akTop, akLeft, akRight, akBottom]
132 <    ClientHeight = 339
132 >    ClientHeight = 389
133      ClientWidth = 448
134      TabOrder = 7
135 +    DesignLeft = 1974
136 +    DesignTop = 200
137      inherited SQLText: TSynEdit
138 <      Height = 313
138 >      Height = 363
139        Width = 448
140      end
141      inherited ToolBar1: TToolBar
# Line 67 | Line 157 | inherited IBModifySQLEditorForm: TIBModi
157            ParamType = ptInput
158          end>
159      end
70    inherited UserProcedures: TIBQuery
71      AfterScroll = UserProceduresAfterScroll
72    end
160      inherited ProcInputParams: TIBQuery
161        ParamData = <      
162          item
# Line 89 | Line 176 | inherited IBModifySQLEditorForm: TIBModi
176      inherited SQLTransaction: TIBTransaction
177        Params.Strings = (      )
178      end
179 +    inherited IdentityCols: TIBQuery
180 +      ParamData = <      
181 +        item
182 +          DataType = ftUnknown
183 +          Name = 'RDB$RELATION_NAME'
184 +          ParamType = ptInput
185 +        end>
186 +    end
187 +    inherited ReadOnlyFields: TIBQuery
188 +      ParamData = <      
189 +        item
190 +          DataType = ftUnknown
191 +          Name = 'RDB$RELATION_NAME'
192 +          ParamType = ptInput
193 +        end>
194 +    end
195 +    inherited ReadOnlyFieldsSource: TDataSource
196 +      left = 436
197 +      top = 203
198 +    end
199 +    inherited PackageNames: TIBQuery
200 +      BeforeClose = nil
201 +    end
202 +  end
203 +  object IncludePrimaryKeys: TCheckBox[9]
204 +    Left = 24
205 +    Height = 22
206 +    Top = 465
207 +    Width = 241
208 +    Caption = 'Include Primary keys in Update SQL'
209 +    TabOrder = 8
210    end
211   end

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines