trunk/design/ibmodifysqleditor.lfm

inherited IBModifySQLEditorForm: TIBModifySQLEditorForm
  Left = 1041
  Height = 512
  Top = 330
  Caption = 'Modify SQL Editor'
  ClientHeight = 512
  inherited Button1: TButton
    Top = 457
  end
  inherited Button2: TButton
    Top = 457
  end
  inherited GenerateBtn: TButton
    Top = 457
    OnClick = GenerateBtnClick
  end
  inherited TestBtn: TButton
    Top = 457
  end
  inherited PageControl: TPageControl
    inherited SelectPage: TTabSheet
      inherited Label2: TLabel
        Left = 7
        Top = 224
        Width = 106
        Caption = 'Updateable Fields'
      end
      inherited Label4: TLabel
        Left = 7
      end
      inherited FieldNamesGrid: TIBDynamicGrid
        Height = 104
        Top = 240
      end
      inherited PrimaryKeysGrid: TIBDynamicGrid
        Height = 48
      end
      inherited SelectSelectAll: TCheckBox
        Top = 344
      end
      object Label5: TLabel[8]
        Left = 9
        Height = 14
        Top = 152
        Width = 138
        Caption = 'Computed By Columns'
        ParentColor = False
      end
      object ReadOnlyGrid: TIBDynamicGrid[9]
        Left = 9
        Height = 48
        Top = 168
        Width = 209
        Color = clWindow
        Columns = <        
          item
            ButtonStyle = cbsCheckboxColumn
            Title.Caption = 'SELECTED'
            Width = 30
            FieldName = 'SELECTED'
            AutoSizeColumn = False
            InitialSortColumn = False
            DBLookupProperties.ItemHeight = 0
            DBLookupProperties.ItemWidth = 0
            DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
          end        
          item
            Title.Caption = 'COLUMNNAME'
            Width = 64
            FieldName = 'COLUMNNAME'
            AutoSizeColumn = True
            InitialSortColumn = False
            DBLookupProperties.ItemHeight = 0
            DBLookupProperties.ItemWidth = 0
            DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
          end>
        FixedCols = 0
        Options = [dgEditing, dgColumnResize, dgColumnMove, dgRowLines, dgConfirmDelete, dgCancelOnExit, dgDisableDelete, dgDisableInsert]
        Scrollbars = ssAutoVertical
        TabOrder = 5
        ExpandEditorPanelBelowRow = False
        Descending = False
        EditorBorderStyle = bsSingle
        DefaultPositionAtEnd = False
      end
    end
    inherited ExecutePage: TTabSheet
      inherited Label18: TLabel
        Top = 240
      end
      inherited InputProcGrid: TIBDynamicGrid
        Height = 107
      end
      inherited OutputProcGrid: TIBDynamicGrid
        Left = 10
        Height = 112
        Top = 256
        Columns = <        
          item
            ButtonStyle = cbsCheckboxColumn
            PickList.Strings = (            )
            Title.Caption = 'SELECTED'
            Width = 30
            FieldName = 'SELECTED'
            AutoSizeColumn = False
            InitialSortColumn = False
            DBLookupProperties.ItemHeight = 0
            DBLookupProperties.ItemWidth = 0
            DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
          end        
          item
            PickList.Strings = (            )
            Title.Caption = 'COLUMNNAME'
            Width = 0
            Visible = False
            FieldName = 'COLUMNNAME'
            AutoSizeColumn = True
            InitialSortColumn = False
            DBLookupProperties.ItemHeight = 0
            DBLookupProperties.ItemWidth = 0
            DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
          end>
      end
    end
  end
  inherited IBSQLEditFrame1: TIBSQLEditFrame
    Left = 282
    Height = 389
    Top = 24
    Width = 448
    Anchors = [akTop, akLeft, akRight, akBottom]
    ClientHeight = 389
    ClientWidth = 448
    TabOrder = 7
    DesignLeft = 1974
    DesignTop = 200
    inherited SQLText: TSynEdit
      Height = 363
      Width = 448
    end
    inherited ToolBar1: TToolBar
      Width = 448
    end
    inherited FieldNameList: TIBQuery
      ParamData = <      
        item
          DataType = ftUnknown
          Name = 'RDB$RELATION_NAME'
          ParamType = ptInput
        end>
    end
    inherited PrimaryKeys: TIBQuery
      ParamData = <      
        item
          DataType = ftUnknown
          Name = 'RDB$RELATION_NAME'
          ParamType = ptInput
        end>
    end
    inherited ProcInputParams: TIBQuery
      ParamData = <      
        item
          DataType = ftUnknown
          Name = 'RDB$PROCEDURE_NAME'
          ParamType = ptInput
        end>
    end
    inherited ProcOutputParams: TIBQuery
      ParamData = <      
        item
          DataType = ftUnknown
          Name = 'RDB$PROCEDURE_NAME'
          ParamType = ptInput
        end>
    end
    inherited SQLTransaction: TIBTransaction
      Params.Strings = (      )
    end
    inherited IdentityCols: TIBQuery
      ParamData = <      
        item
          DataType = ftUnknown
          Name = 'RDB$RELATION_NAME'
          ParamType = ptInput
        end>
    end
    inherited ReadOnlyFields: TIBQuery
      ParamData = <      
        item
          DataType = ftUnknown
          Name = 'RDB$RELATION_NAME'
          ParamType = ptInput
        end>
    end
    inherited ReadOnlyFieldsSource: TDataSource
      left = 436
      top = 203
    end
    inherited PackageNames: TIBQuery
      BeforeClose = nil
    end
  end
  object IncludePrimaryKeys: TCheckBox[9]
    Left = 24
    Height = 22
    Top = 465
    Width = 241
    Caption = 'Include Primary keys in Update SQL'
    TabOrder = 8
  end
end
Revision:	107
Committed:	Thu Jan 18 14:37:40 2018 UTC (6 years, 11 months ago) by tony
File size:	5798 byte(s)
Log Message:	Fixes merged
#	User	Rev	Content
1	tony	80	inherited IBModifySQLEditorForm: TIBModifySQLEditorForm
2	tony	107	Left = 1041
3	tony	106	Height = 512
4	tony	107	Top = 330
5	tony	5	Caption = 'Modify SQL Editor'
6	tony	106	ClientHeight = 512
7			inherited Button1: TButton
8			Top = 457
9			end
10			inherited Button2: TButton
11			Top = 457
12			end
13	tony	80	inherited GenerateBtn: TButton
14	tony	106	Top = 457
15	tony	7	OnClick = GenerateBtnClick
16	tony	5	end
17	tony	106	inherited TestBtn: TButton
18			Top = 457
19			end
20	tony	80	inherited PageControl: TPageControl
21			inherited SelectPage: TTabSheet
22	tony	105	inherited Label2: TLabel
23	tony	106	Left = 7
24			Top = 224
25	tony	105	Width = 106
26			Caption = 'Updateable Fields'
27			end
28			inherited Label4: TLabel
29	tony	106	Left = 7
30	tony	105	end
31			inherited FieldNamesGrid: TIBDynamicGrid
32	tony	106	Height = 104
33			Top = 240
34	tony	105	end
35			inherited PrimaryKeysGrid: TIBDynamicGrid
36			Height = 48
37			end
38			inherited SelectSelectAll: TCheckBox
39	tony	106	Top = 344
40	tony	105	end
41	tony	106	object Label5: TLabel[8]
42			Left = 9
43	tony	105	Height = 14
44	tony	106	Top = 152
45	tony	105	Width = 138
46			Caption = 'Computed By Columns'
47			ParentColor = False
48			end
49	tony	106	object ReadOnlyGrid: TIBDynamicGrid[9]
50			Left = 9
51	tony	105	Height = 48
52	tony	106	Top = 168
53	tony	105	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	tony	106	TabOrder = 5
81	tony	105	ExpandEditorPanelBelowRow = False
82			Descending = False
83			EditorBorderStyle = bsSingle
84			DefaultPositionAtEnd = False
85			end
86	tony	21	end
87	tony	80	inherited ExecutePage: TTabSheet
88			inherited Label18: TLabel
89	tony	107	Top = 240
90	tony	21	end
91	tony	80	inherited InputProcGrid: TIBDynamicGrid
92	tony	107	Height = 107
93	tony	21	end
94	tony	80	inherited OutputProcGrid: TIBDynamicGrid
95	tony	107	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	tony	21	end
124			end
125			end
126	tony	80	inherited IBSQLEditFrame1: TIBSQLEditFrame
127			Left = 282
128	tony	106	Height = 389
129	tony	80	Top = 24
130			Width = 448
131			Anchors = [akTop, akLeft, akRight, akBottom]
132	tony	106	ClientHeight = 389
133	tony	80	ClientWidth = 448
134			TabOrder = 7
135	tony	105	DesignLeft = 1974
136			DesignTop = 200
137	tony	80	inherited SQLText: TSynEdit
138	tony	106	Height = 363
139	tony	80	Width = 448
140			end
141			inherited ToolBar1: TToolBar
142			Width = 448
143			end
144			inherited FieldNameList: TIBQuery
145			ParamData = <
146			item
147			DataType = ftUnknown
148			Name = 'RDB$RELATION_NAME'
149			ParamType = ptInput
150			end>
151			end
152			inherited PrimaryKeys: TIBQuery
153			ParamData = <
154			item
155			DataType = ftUnknown
156			Name = 'RDB$RELATION_NAME'
157			ParamType = ptInput
158			end>
159			end
160			inherited ProcInputParams: TIBQuery
161			ParamData = <
162			item
163			DataType = ftUnknown
164			Name = 'RDB$PROCEDURE_NAME'
165			ParamType = ptInput
166			end>
167			end
168			inherited ProcOutputParams: TIBQuery
169			ParamData = <
170			item
171			DataType = ftUnknown
172			Name = 'RDB$PROCEDURE_NAME'
173			ParamType = ptInput
174			end>
175			end
176			inherited SQLTransaction: TIBTransaction
177			Params.Strings = ( )
178			end
179	tony	105	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	tony	107	inherited PackageNames: TIBQuery
200			BeforeClose = nil
201			end
202	tony	7	end
203	tony	106	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	tony	5	end