trunk/design/ibinsertsqleditor.lfm

inherited IBInsertSQLEditorForm: TIBInsertSQLEditorForm
  Left = 459
  Height = 534
  Top = 284
  Caption = 'Insert SQL Editor'
  ClientHeight = 534
  inherited Button1: TButton
    Top = 476
  end
  inherited Button2: TButton
    Top = 476
  end
  inherited GenerateBtn: TButton
    Top = 476
    OnClick = GenerateBtnClick
  end
  inherited TestBtn: TButton
    Top = 476
  end
  inherited QuoteFields: TCheckBox
    Top = 488
  end
  inherited PageControl: TPageControl
    Height = 456
    inherited SelectPage: TTabSheet
      ClientHeight = 424
      inherited Label2: TLabel
        Top = 304
        Width = 125
        Caption = 'Updateable Columns'
      end
      inherited Label4: TLabel
        Left = 7
        Top = 72
      end
      inherited FieldNamesGrid: TIBDynamicGrid
        Height = 80
        Top = 320
      end
      inherited PrimaryKeysGrid: TIBDynamicGrid
        Left = 7
        Top = 88
        DataSource = IBSQLEditFrame.IdentityColsSource
      end
      inherited SelectSelectAll: TCheckBox
        Top = 400
      end
      object Label6: TLabel[8]
        Left = 7
        Height = 14
        Top = 152
        Width = 103
        Caption = '&Identity Columns'
        ParentColor = False
      end
      object IdentityGrid: TIBDynamicGrid[9]
        Left = 8
        Height = 56
        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>
        DataSource = IBSQLEditFrame.IdentityColsSource
        FixedCols = 0
        Options = [dgEditing, dgColumnResize, dgColumnMove, dgRowLines, dgConfirmDelete, dgCancelOnExit, dgDisableDelete, dgDisableInsert]
        Scrollbars = ssAutoVertical
        TabOrder = 5
        ExpandEditorPanelBelowRow = False
        Descending = False
        EditorBorderStyle = bsSingle
        DefaultPositionAtEnd = False
      end
      object Label5: TLabel[10]
        Left = 8
        Height = 14
        Top = 232
        Width = 138
        Caption = '&Computed By Columns'
        ParentColor = False
      end
      object ReadOnlyGrid: TIBDynamicGrid[11]
        Left = 8
        Height = 48
        Top = 248
        Width = 208
        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 = 6
        ExpandEditorPanelBelowRow = False
        Descending = False
        EditorBorderStyle = bsSingle
        DefaultPositionAtEnd = False
      end
    end
    inherited ExecutePage: TTabSheet
      ClientHeight = 424
      inherited Label18: TLabel
        Top = 256
      end
      inherited InputProcGrid: TIBDynamicGrid
        Height = 123
      end
      inherited OutputProcGrid: TIBDynamicGrid
        Height = 144
        Top = 272
        Columns = <        
          item
            ButtonStyle = cbsCheckboxColumn
            PickList.Strings = (            )
            Title.Caption = 'SELECTED'
            Width = 0
            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 = 64
            FieldName = 'COLUMNNAME'
            AutoSizeColumn = True
            InitialSortColumn = False
            DBLookupProperties.ItemHeight = 0
            DBLookupProperties.ItemWidth = 0
            DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
          end>
      end
    end
  end
  inherited GenerateParams: TCheckBox
    Top = 464
  end
  inherited IBSQLEditFrame1: TIBSQLEditFrame
    Left = 282
    Height = 442
    Top = 24
    Width = 448
    Anchors = [akTop, akLeft, akRight, akBottom]
    ClientHeight = 442
    ClientWidth = 448
    TabOrder = 7
    DesignLeft = 1974
    DesignTop = 200
    inherited SQLText: TSynEdit
      Height = 416
      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 PackageNames: TIBQuery
      BeforeClose = nil
    end
  end
end
Revision:	107
Committed:	Thu Jan 18 14:37:40 2018 UTC (6 years, 3 months ago) by tony
File size:	7377 byte(s)
Log Message:	Fixes merged
#	User	Rev	Content
1	tony	80	inherited IBInsertSQLEditorForm: TIBInsertSQLEditorForm
2	tony	107	Left = 459
3	tony	106	Height = 534
4	tony	107	Top = 284
5	tony	5	Caption = 'Insert SQL Editor'
6	tony	106	ClientHeight = 534
7			inherited Button1: TButton
8			Top = 476
9			end
10			inherited Button2: TButton
11			Top = 476
12			end
13	tony	80	inherited GenerateBtn: TButton
14	tony	106	Top = 476
15	tony	7	OnClick = GenerateBtnClick
16	tony	5	end
17	tony	106	inherited TestBtn: TButton
18			Top = 476
19			end
20			inherited QuoteFields: TCheckBox
21			Top = 488
22			end
23	tony	80	inherited PageControl: TPageControl
24	tony	106	Height = 456
25	tony	80	inherited SelectPage: TTabSheet
26	tony	106	ClientHeight = 424
27			inherited Label2: TLabel
28			Top = 304
29			Width = 125
30			Caption = 'Updateable Columns'
31			end
32	tony	101	inherited Label4: TLabel
33	tony	106	Left = 7
34			Top = 72
35	tony	101	end
36	tony	80	inherited FieldNamesGrid: TIBDynamicGrid
37	tony	106	Height = 80
38			Top = 320
39	tony	21	end
40	tony	80	inherited PrimaryKeysGrid: TIBDynamicGrid
41	tony	106	Left = 7
42			Top = 88
43	tony	101	DataSource = IBSQLEditFrame.IdentityColsSource
44	tony	21	end
45	tony	80	inherited SelectSelectAll: TCheckBox
46	tony	106	Top = 400
47	tony	21	end
48	tony	106	object Label6: TLabel[8]
49	tony	105	Left = 7
50			Height = 14
51	tony	106	Top = 152
52			Width = 103
53			Caption = '&Identity Columns'
54	tony	105	ParentColor = False
55			end
56	tony	106	object IdentityGrid: TIBDynamicGrid[9]
57	tony	105	Left = 8
58	tony	106	Height = 56
59			Top = 168
60	tony	105	Width = 209
61			Color = clWindow
62			Columns = <
63			item
64			ButtonStyle = cbsCheckboxColumn
65			Title.Caption = 'SELECTED'
66			Width = 30
67			FieldName = 'SELECTED'
68			AutoSizeColumn = False
69			InitialSortColumn = False
70			DBLookupProperties.ItemHeight = 0
71			DBLookupProperties.ItemWidth = 0
72			DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
73			end
74			item
75			Title.Caption = 'COLUMNNAME'
76			Width = 64
77			FieldName = 'COLUMNNAME'
78			AutoSizeColumn = True
79			InitialSortColumn = False
80			DBLookupProperties.ItemHeight = 0
81			DBLookupProperties.ItemWidth = 0
82			DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
83			end>
84	tony	106	DataSource = IBSQLEditFrame.IdentityColsSource
85	tony	105	FixedCols = 0
86			Options = [dgEditing, dgColumnResize, dgColumnMove, dgRowLines, dgConfirmDelete, dgCancelOnExit, dgDisableDelete, dgDisableInsert]
87			Scrollbars = ssAutoVertical
88			TabOrder = 5
89			ExpandEditorPanelBelowRow = False
90			Descending = False
91			EditorBorderStyle = bsSingle
92			DefaultPositionAtEnd = False
93			end
94	tony	106	object Label5: TLabel[10]
95			Left = 8
96			Height = 14
97			Top = 232
98			Width = 138
99			Caption = '&Computed By Columns'
100			ParentColor = False
101			end
102			object ReadOnlyGrid: TIBDynamicGrid[11]
103			Left = 8
104			Height = 48
105			Top = 248
106			Width = 208
107			Color = clWindow
108			Columns = <
109			item
110			ButtonStyle = cbsCheckboxColumn
111			Title.Caption = 'SELECTED'
112			Width = 30
113			FieldName = 'SELECTED'
114			AutoSizeColumn = False
115			InitialSortColumn = False
116			DBLookupProperties.ItemHeight = 0
117			DBLookupProperties.ItemWidth = 0
118			DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
119			end
120			item
121			Title.Caption = 'COLUMNNAME'
122			Width = 64
123			FieldName = 'COLUMNNAME'
124			AutoSizeColumn = True
125			InitialSortColumn = False
126			DBLookupProperties.ItemHeight = 0
127			DBLookupProperties.ItemWidth = 0
128			DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
129			end>
130			FixedCols = 0
131			Options = [dgEditing, dgColumnResize, dgColumnMove, dgRowLines, dgConfirmDelete, dgCancelOnExit, dgDisableDelete, dgDisableInsert]
132			Scrollbars = ssAutoVertical
133			TabOrder = 6
134			ExpandEditorPanelBelowRow = False
135			Descending = False
136			EditorBorderStyle = bsSingle
137			DefaultPositionAtEnd = False
138			end
139	tony	21	end
140	tony	80	inherited ExecutePage: TTabSheet
141	tony	106	ClientHeight = 424
142	tony	80	inherited Label18: TLabel
143	tony	107	Top = 256
144	tony	21	end
145	tony	80	inherited InputProcGrid: TIBDynamicGrid
146	tony	107	Height = 123
147	tony	21	end
148	tony	80	inherited OutputProcGrid: TIBDynamicGrid
149	tony	107	Height = 144
150			Top = 272
151			Columns = <
152			item
153			ButtonStyle = cbsCheckboxColumn
154			PickList.Strings = ( )
155			Title.Caption = 'SELECTED'
156			Width = 0
157			FieldName = 'SELECTED'
158			AutoSizeColumn = False
159			InitialSortColumn = False
160			DBLookupProperties.ItemHeight = 0
161			DBLookupProperties.ItemWidth = 0
162			DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
163			end
164			item
165			PickList.Strings = ( )
166			Title.Caption = 'COLUMNNAME'
167			Width = 64
168			FieldName = 'COLUMNNAME'
169			AutoSizeColumn = True
170			InitialSortColumn = False
171			DBLookupProperties.ItemHeight = 0
172			DBLookupProperties.ItemWidth = 0
173			DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
174			end>
175	tony	21	end
176			end
177			end
178	tony	106	inherited GenerateParams: TCheckBox
179			Top = 464
180			end
181	tony	80	inherited IBSQLEditFrame1: TIBSQLEditFrame
182			Left = 282
183	tony	106	Height = 442
184	tony	80	Top = 24
185			Width = 448
186			Anchors = [akTop, akLeft, akRight, akBottom]
187	tony	106	ClientHeight = 442
188	tony	80	ClientWidth = 448
189			TabOrder = 7
190	tony	101	DesignLeft = 1974
191			DesignTop = 200
192	tony	80	inherited SQLText: TSynEdit
193	tony	106	Height = 416
194	tony	80	Width = 448
195			end
196			inherited ToolBar1: TToolBar
197			Width = 448
198			end
199			inherited FieldNameList: TIBQuery
200			ParamData = <
201			item
202			DataType = ftUnknown
203			Name = 'RDB$RELATION_NAME'
204			ParamType = ptInput
205			end>
206			end
207			inherited PrimaryKeys: TIBQuery
208			ParamData = <
209			item
210			DataType = ftUnknown
211			Name = 'RDB$RELATION_NAME'
212			ParamType = ptInput
213			end>
214			end
215			inherited ProcInputParams: TIBQuery
216			ParamData = <
217			item
218			DataType = ftUnknown
219			Name = 'RDB$PROCEDURE_NAME'
220			ParamType = ptInput
221			end>
222			end
223			inherited ProcOutputParams: TIBQuery
224			ParamData = <
225			item
226			DataType = ftUnknown
227			Name = 'RDB$PROCEDURE_NAME'
228			ParamType = ptInput
229			end>
230			end
231			inherited SQLTransaction: TIBTransaction
232			Params.Strings = ( )
233			end
234	tony	101	inherited IdentityCols: TIBQuery
235			ParamData = <
236			item
237			DataType = ftUnknown
238			Name = 'RDB$RELATION_NAME'
239			ParamType = ptInput
240			end>
241			end
242	tony	105	inherited ReadOnlyFields: TIBQuery
243			ParamData = <
244			item
245			DataType = ftUnknown
246			Name = 'RDB$RELATION_NAME'
247			ParamType = ptInput
248			end>
249			end
250	tony	107	inherited PackageNames: TIBQuery
251			BeforeClose = nil
252			end
253	tony	7	end
254	tony	5	end