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 19 by tony, Mon Jul 7 13:00:15 2014 UTC vs.
Revision 105 by tony, Thu Jan 18 14:37:32 2018 UTC

# Line 1 | Line 1
1 < object IBModifySQLEditorForm: TIBModifySQLEditorForm
2 <  Left = 508
3 <  Height = 438
4 <  Top = 250
5 <  Width = 749
6 <  ActiveControl = TableNamesCombo
1 > inherited IBModifySQLEditorForm: TIBModifySQLEditorForm
2 >  Left = 949
3 >  Top = 264
4    Caption = 'Modify SQL Editor'
5 <  ClientHeight = 438
9 <  ClientWidth = 749
10 <  OnShow = FormShow
11 <  LCLVersion = '1.2.2.0'
12 <  object Label1: TLabel
13 <    Left = 16
14 <    Height = 15
15 <    Top = 16
16 <    Width = 69
17 <    Caption = 'Table Name'
18 <    ParentColor = False
19 <  end
20 <  object Label2: TLabel
21 <    Left = 19
22 <    Height = 15
23 <    Top = 84
24 <    Width = 33
25 <    Caption = 'Fields'
26 <    ParentColor = False
27 <  end
28 <  object Label3: TLabel
29 <    Left = 279
30 <    Height = 15
31 <    Top = 16
32 <    Width = 24
33 <    Caption = 'SQL'
34 <    ParentColor = False
35 <  end
36 <  object Label4: TLabel
37 <    Left = 23
38 <    Height = 15
39 <    Top = 285
40 <    Width = 77
41 <    Caption = 'Primary Keys'
42 <    ParentColor = False
43 <  end
44 <  object SQLText: TMemo
45 <    Left = 279
46 <    Height = 328
47 <    Top = 36
48 <    Width = 439
49 <    Anchors = [akTop, akLeft, akRight, akBottom]
50 <    ScrollBars = ssAutoBoth
51 <    TabOrder = 0
52 <  end
53 <  object Button1: TButton
54 <    Left = 552
55 <    Height = 30
56 <    Top = 379
57 <    Width = 72
58 <    Anchors = [akRight, akBottom]
59 <    Caption = 'OK'
60 <    Default = True
61 <    ModalResult = 1
62 <    TabOrder = 1
63 <  end
64 <  object Button2: TButton
65 <    Left = 640
66 <    Height = 30
67 <    Top = 380
68 <    Width = 72
69 <    Anchors = [akRight, akBottom]
70 <    Cancel = True
71 <    Caption = 'Cancel'
72 <    ModalResult = 2
73 <    TabOrder = 2
74 <  end
75 <  object TableNamesCombo: TComboBox
76 <    Left = 23
77 <    Height = 27
78 <    Top = 38
79 <    Width = 201
80 <    ItemHeight = 0
81 <    OnCloseUp = TableNamesComboCloseUp
82 <    TabOrder = 3
83 <  end
84 <  object FieldList: TListBox
85 <    Left = 21
86 <    Height = 146
87 <    Hint = 'Select Fields to include in Update Statement, or leave unselected to select all'
88 <    Top = 102
89 <    Width = 204
90 <    ItemHeight = 0
91 <    MultiSelect = True
92 <    OnDblClick = FieldListDblClick
93 <    ParentShowHint = False
94 <    ScrollWidth = 202
95 <    ShowHint = True
96 <    TabOrder = 4
97 <    TopIndex = -1
98 <  end
99 <  object GenerateBtn: TButton
100 <    Left = 280
101 <    Height = 30
102 <    Top = 380
103 <    Width = 101
104 <    Anchors = [akRight, akBottom]
105 <    Caption = 'Generate SQL'
5 >  inherited GenerateBtn: TButton
6      OnClick = GenerateBtnClick
107    TabOrder = 5
7    end
8 <  object TestBtn: TButton
9 <    Left = 416
10 <    Height = 30
11 <    Top = 380
12 <    Width = 66
13 <    Anchors = [akRight, akBottom]
14 <    Caption = 'Test'
15 <    OnClick = TestBtnClick
16 <    TabOrder = 6
17 <  end
18 <  object QuoteFields: TCheckBox
19 <    Left = 16
20 <    Height = 24
21 <    Top = 400
22 <    Width = 127
23 <    Caption = '&Quote Identifiers'
8 >  inherited PageControl: TPageControl
9 >    inherited SelectPage: TTabSheet
10 >      inherited Label2: TLabel
11 >        Width = 106
12 >        Caption = 'Updateable Fields'
13 >      end
14 >      inherited Label4: TLabel
15 >        Top = 290
16 >      end
17 >      inherited FieldNamesGrid: TIBDynamicGrid
18 >        Height = 112
19 >      end
20 >      inherited PrimaryKeysGrid: TIBDynamicGrid
21 >        Height = 48
22 >      end
23 >      inherited SelectSelectAll: TCheckBox
24 >        Top = 200
25 >      end
26 >      object IncludePrimaryKeys: TCheckBox[8]
27 >        Left = 7
28 >        Height = 22
29 >        Top = 352
30 >        Width = 221
31 >        Caption = 'Include Primary keys in Field List'
32 >        Checked = True
33 >        OnChange = IncludePrimaryKeysChange
34 >        State = cbChecked
35 >        TabOrder = 5
36 >      end
37 >      object Label5: TLabel[9]
38 >        Left = 7
39 >        Height = 14
40 >        Top = 226
41 >        Width = 138
42 >        Caption = 'Computed By Columns'
43 >        ParentColor = False
44 >      end
45 >      object ReadOnlyGrid: TIBDynamicGrid[10]
46 >        Left = 8
47 >        Height = 48
48 >        Top = 241
49 >        Width = 209
50 >        Color = clWindow
51 >        Columns = <        
52 >          item
53 >            ButtonStyle = cbsCheckboxColumn
54 >            Title.Caption = 'SELECTED'
55 >            Width = 30
56 >            FieldName = 'SELECTED'
57 >            AutoSizeColumn = False
58 >            InitialSortColumn = False
59 >            DBLookupProperties.ItemHeight = 0
60 >            DBLookupProperties.ItemWidth = 0
61 >            DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
62 >          end        
63 >          item
64 >            Title.Caption = 'COLUMNNAME'
65 >            Width = 64
66 >            FieldName = 'COLUMNNAME'
67 >            AutoSizeColumn = True
68 >            InitialSortColumn = False
69 >            DBLookupProperties.ItemHeight = 0
70 >            DBLookupProperties.ItemWidth = 0
71 >            DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
72 >          end>
73 >        FixedCols = 0
74 >        Options = [dgEditing, dgColumnResize, dgColumnMove, dgRowLines, dgConfirmDelete, dgCancelOnExit, dgDisableDelete, dgDisableInsert]
75 >        Scrollbars = ssAutoVertical
76 >        TabOrder = 6
77 >        ExpandEditorPanelBelowRow = False
78 >        Descending = False
79 >        EditorBorderStyle = bsSingle
80 >        DefaultPositionAtEnd = False
81 >      end
82 >    end
83 >    inherited ExecutePage: TTabSheet
84 >      inherited Label18: TLabel
85 >        Visible = False
86 >      end
87 >      inherited SelectProcedure: TLabel
88 >        Width = 81
89 >        Caption = 'Execute Only'
90 >      end
91 >      inherited InputProcGrid: TIBDynamicGrid
92 >        Height = 224
93 >      end
94 >      inherited OutputProcGrid: TIBDynamicGrid
95 >        Visible = False
96 >      end
97 >    end
98 >  end
99 >  inherited IBSQLEditFrame1: TIBSQLEditFrame
100 >    Left = 282
101 >    Height = 339
102 >    Top = 24
103 >    Width = 448
104 >    Anchors = [akTop, akLeft, akRight, akBottom]
105 >    ClientHeight = 339
106 >    ClientWidth = 448
107      TabOrder = 7
108 <  end
109 <  object PrimaryKeyList: TListBox
110 <    Left = 23
111 <    Height = 59
112 <    Top = 304
113 <    Width = 200
114 <    ItemHeight = 0
115 <    OnDblClick = PrimaryKeyListDblClick
116 <    ScrollWidth = 198
117 <    TabOrder = 8
118 <    TopIndex = -1
119 <  end
120 <  object IncludePrimaryKeys: TCheckBox
121 <    Left = 19
122 <    Height = 24
123 <    Top = 256
124 <    Width = 223
125 <    Caption = 'Include Primary keys in Field List'
126 <    Checked = True
127 <    OnClick = TableNamesComboCloseUp
128 <    State = cbChecked
129 <    TabOrder = 9
130 <  end
131 <  object GenerateParams: TCheckBox
132 <    Left = 16
133 <    Height = 24
134 <    Top = 376
135 <    Width = 173
136 <    Caption = 'Allow DSQL Placeholders'
137 <    TabOrder = 10
138 <  end
139 <  object IBTransaction1: TIBTransaction
140 <    Active = False
141 <    left = 209
142 <    top = 388
108 >    DesignLeft = 1974
109 >    DesignTop = 200
110 >    inherited SQLText: TSynEdit
111 >      Height = 313
112 >      Width = 448
113 >    end
114 >    inherited ToolBar1: TToolBar
115 >      Width = 448
116 >    end
117 >    inherited FieldNameList: TIBQuery
118 >      ParamData = <      
119 >        item
120 >          DataType = ftUnknown
121 >          Name = 'RDB$RELATION_NAME'
122 >          ParamType = ptInput
123 >        end>
124 >    end
125 >    inherited PrimaryKeys: TIBQuery
126 >      ParamData = <      
127 >        item
128 >          DataType = ftUnknown
129 >          Name = 'RDB$RELATION_NAME'
130 >          ParamType = ptInput
131 >        end>
132 >    end
133 >    inherited UserProcedures: TIBQuery
134 >      AfterScroll = UserProceduresAfterScroll
135 >    end
136 >    inherited ProcInputParams: TIBQuery
137 >      ParamData = <      
138 >        item
139 >          DataType = ftUnknown
140 >          Name = 'RDB$PROCEDURE_NAME'
141 >          ParamType = ptInput
142 >        end>
143 >    end
144 >    inherited ProcOutputParams: TIBQuery
145 >      ParamData = <      
146 >        item
147 >          DataType = ftUnknown
148 >          Name = 'RDB$PROCEDURE_NAME'
149 >          ParamType = ptInput
150 >        end>
151 >    end
152 >    inherited SQLTransaction: TIBTransaction
153 >      Params.Strings = (      )
154 >    end
155 >    inherited IdentityCols: TIBQuery
156 >      ParamData = <      
157 >        item
158 >          DataType = ftUnknown
159 >          Name = 'RDB$RELATION_NAME'
160 >          ParamType = ptInput
161 >        end>
162 >    end
163 >    inherited ReadOnlyFields: TIBQuery
164 >      ParamData = <      
165 >        item
166 >          DataType = ftUnknown
167 >          Name = 'RDB$RELATION_NAME'
168 >          ParamType = ptInput
169 >        end>
170 >    end
171 >    inherited ReadOnlyFieldsSource: TDataSource
172 >      left = 436
173 >      top = 203
174 >    end
175    end
176   end

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines