ViewVC Help

View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing

root/public/ibx/trunk/design/ibupdatesqleditor.lfm

Comparing ibx/trunk/design/ibupdatesqleditor.lfm (file contents):
Revision 79 by tony, Tue Oct 3 14:08:11 2017 UTC vs.
Revision 80 by tony, Mon Jan 1 11:31:07 2018 UTC

#	Line 1 | Line 1
1		object IBUpdateSQLEditorForm: TIBUpdateSQLEditorForm
2	<	Left = 448
2	>	Left = 442
3		Height = 410
4	<	Top = 419
4	>	Top = 421
5		Width = 662
6		ActiveControl = PageControl
7		BorderIcons = [biSystemMenu]
#	Line 12 | Line 12 | object IBUpdateSQLEditorForm: TIBUpdateS
12		OnClose = FormClose
13		OnShow = FormShow
14		Position = poScreenCenter
15	<	LCLVersion = '1.8.0.4'
15	>	LCLVersion = '1.8.1.0'
16		object PageControl: TPageControl
17	<	Left = 7
17	>	Left = 8
18		Height = 352
19		Top = 8
20		Width = 641
21	<	ActivePage = FieldsPage
21	>	ActivePage = SQLPage
22		Anchors = [akTop, akLeft, akRight, akBottom]
23	<	TabIndex = 0
23	>	TabIndex = 1
24		TabOrder = 0
25		object FieldsPage: TTabSheet
26		Caption = 'Options'
#	Line 37 | Line 37 | object IBUpdateSQLEditorForm: TIBUpdateS
37		ClientWidth = 615
38		TabOrder = 0
39		object Label1: TLabel
40	<	Left = 9
40	>	Left = 12
41		Height = 14
42	<	Top = 16
42	>	Top = 18
43		Width = 73
44		Caption = 'Table &Name:'
45	–	FocusControl = TableNamesCombo
45		ParentColor = False
46		end
47		object Label3: TLabel
48	<	Left = 300
48	>	Left = 288
49		Height = 14
50	<	Top = 18
50	>	Top = 16
51		Width = 62
52		Caption = '&Key Fields:'
54	–	FocusControl = PrimaryKeyList
53		ParentColor = False
54		end
55		object Label4: TLabel
56	<	Left = 443
56	>	Left = 458
57		Height = 14
58		Top = 18
59		Width = 85
60		Caption = 'Update &Fields:'
63	–	FocusControl = FieldList
61		ParentColor = False
62		end
63	<	object TableNamesCombo: TComboBox
67	<	Left = 9
68	<	Height = 27
69	<	Top = 35
70	<	Width = 171
71	<	AutoComplete = True
72	<	AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
73	<	ItemHeight = 0
74	<	OnCloseUp = TableNamesComboCloseUp
75	<	TabOrder = 0
76	<	end
77	<	object PrimaryKeyList: TListBox
78	<	Left = 300
79	<	Height = 239
80	<	Top = 36
81	<	Width = 136
82	<	Anchors = [akTop, akLeft, akBottom]
83	<	ItemHeight = 0
84	<	MultiSelect = True
85	<	ScrollWidth = 134
86	<	TabOrder = 3
87	<	TopIndex = -1
88	<	end
89	<	object FieldList: TListBox
90	<	Left = 443
91	<	Height = 239
92	<	Hint = 'Select Fields to include in Update Statements, or leave unselected to select all'
93	<	Top = 35
94	<	Width = 136
95	<	Anchors = [akTop, akLeft, akBottom]
96	<	ItemHeight = 0
97	<	MultiSelect = True
98	<	ParentShowHint = False
99	<	ScrollWidth = 134
100	<	ShowHint = True
101	<	TabOrder = 4
102	<	TopIndex = -1
103	<	end
104	<	object GenerateBtn: TButton
63	>	object GenerateButton: TButton
64		Left = 9
65		Height = 25
66		Top = 83
67		Width = 168
68		Caption = '&Generate SQL'
69	<	OnClick = GenerateBtnClick
70	<	TabOrder = 1
69	>	OnClick = GenerateButtonClick
70	>	TabOrder = 0
71		end
72		object QuoteFields: TCheckBox
73	<	Left = 8
73	>	Left = 9
74		Height = 22
75	<	Top = 168
75	>	Top = 160
76		Width = 125
77		Caption = '&Quote Identifiers'
78	<	TabOrder = 2
78	>	TabOrder = 1
79		end
80		object IncludePrimaryKeys: TCheckBox
81	<	Left = 8
81	>	Left = 9
82		Height = 22
83	<	Top = 200
84	<	Width = 221
85	<	Caption = 'Include Primary keys in Field List'
86	<	Checked = True
128	<	OnClick = TableNamesComboCloseUp
129	<	State = cbChecked
130	<	TabOrder = 5
83	>	Top = 192
84	>	Width = 241
85	>	Caption = 'Include Primary keys in Update SQL'
86	>	TabOrder = 2
87		end
88		object GenerateParams: TCheckBox
89		Left = 9
90		Height = 22
91	<	Top = 136
91	>	Top = 128
92		Width = 171
93		Caption = 'Allow DSQL Placeholders'
94	+	TabOrder = 3
95	+	end
96	+	object SelectTableNames: TIBLookupComboEditBox
97	+	Left = 12
98	+	Height = 27
99	+	Top = 32
100	+	Width = 209
101	+	OwnerDrawEditable = False
102	+	KeyField = 'RDB$RELATION_ID'
103	+	ListField = 'RDB$RELATION_NAME'
104	+	ListFieldIndex = 0
105	+	LookupCache = False
106	+	ScrollListDataset = True
107	+	TabOrder = 4
108	+	AutoInsert = False
109	+	AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
110	+	ItemHeight = 0
111	+	end
112	+	object IncludeSysTables: TCheckBox
113	+	Left = 13
114	+	Height = 22
115	+	Top = 59
116	+	Width = 158
117	+	Caption = 'Include System Tables'
118	+	OnChange = IncludeSysTablesChange
119	+	TabOrder = 5
120	+	end
121	+	object PrimaryKeysGrid: TIBDynamicGrid
122	+	Left = 288
123	+	Height = 181
124	+	Top = 35
125	+	Width = 144
126	+	Color = clWindow
127	+	Columns = <
128	+	item
129	+	ButtonStyle = cbsCheckboxColumn
130	+	Title.Caption = 'SELECTED'
131	+	Width = 30
132	+	FieldName = 'SELECTED'
133	+	AutoSizeColumn = False
134	+	InitialSortColumn = False
135	+	DBLookupProperties.ItemHeight = 0
136	+	DBLookupProperties.ItemWidth = 0
137	+	DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
138	+	end
139	+	item
140	+	Title.Caption = 'COLUMNNAME'
141	+	Width = 64
142	+	FieldName = 'COLUMNNAME'
143	+	AutoSizeColumn = True
144	+	InitialSortColumn = False
145	+	DBLookupProperties.ItemHeight = 0
146	+	DBLookupProperties.ItemWidth = 0
147	+	DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
148	+	end>
149	+	FixedCols = 0
150	+	Options = [dgEditing, dgColumnResize, dgColumnMove, dgRowLines, dgConfirmDelete, dgCancelOnExit, dgDisableDelete, dgDisableInsert]
151	+	Scrollbars = ssAutoVertical
152		TabOrder = 6
153	+	ExpandEditorPanelBelowRow = False
154	+	Descending = False
155	+	EditorBorderStyle = bsSingle
156	+	DefaultPositionAtEnd = False
157	+	end
158	+	object FieldNamesGrid: TIBDynamicGrid
159	+	Left = 458
160	+	Height = 184
161	+	Top = 32
162	+	Width = 144
163	+	Color = clWindow
164	+	Columns = <
165	+	item
166	+	ButtonStyle = cbsCheckboxColumn
167	+	Title.Caption = 'SELECTED'
168	+	Width = 30
169	+	FieldName = 'SELECTED'
170	+	AutoSizeColumn = False
171	+	InitialSortColumn = False
172	+	DBLookupProperties.ItemHeight = 0
173	+	DBLookupProperties.ItemWidth = 0
174	+	DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
175	+	end
176	+	item
177	+	Title.Caption = 'COLUMNNAME'
178	+	Width = 64
179	+	FieldName = 'COLUMNNAME'
180	+	AutoSizeColumn = True
181	+	InitialSortColumn = False
182	+	DBLookupProperties.ItemHeight = 0
183	+	DBLookupProperties.ItemWidth = 0
184	+	DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
185	+	end>
186	+	DataSource = IBSQLEditFrame.FieldsSource
187	+	FixedCols = 0
188	+	Options = [dgEditing, dgColumnResize, dgColumnMove, dgRowLines, dgConfirmDelete, dgCancelOnExit, dgDisableDelete, dgDisableInsert]
189	+	Scrollbars = ssAutoVertical
190	+	TabOrder = 7
191	+	ExpandEditorPanelBelowRow = False
192	+	Descending = False
193	+	EditorBorderStyle = bsSingle
194	+	DefaultPositionAtEnd = False
195	+	end
196	+	object SelectSelectAll: TCheckBox
197	+	Left = 456
198	+	Height = 22
199	+	Top = 216
200	+	Width = 134
201	+	Caption = 'Select/Deselect All'
202	+	OnClick = SelectSelectAllClick
203	+	TabOrder = 8
204		end
205		end
206		end
#	Line 146 | Line 211 | object IBUpdateSQLEditorForm: TIBUpdateS
211		OnShow = SQLPageShow
212		object Label2: TLabel
213		Left = 10
214	<	Height = 15
214	>	Height = 14
215		Top = 81
216		Width = 56
217		Caption = 'S&QL Text:'
153	–	FocusControl = SQLMemo
218		ParentColor = False
219		end
156	–	object SQLMemo: TMemo
157	–	Left = 9
158	–	Height = 203
159	–	Top = 105
160	–	Width = 613
161	–	Anchors = [akTop, akLeft, akRight, akBottom]
162	–	OnChange = SQLMemoChange
163	–	ScrollBars = ssAutoBoth
164	–	TabOrder = 0
165	–	end
220		object StatementType: TRadioGroup
221		Left = 10
222	<	Height = 53
222	>	Height = 49
223		Top = 9
224	<	Width = 276
224	>	Width = 266
225		AutoFill = True
226		AutoSize = True
227		Caption = 'Statement Type'
#	Line 178 | Line 232 | object IBUpdateSQLEditorForm: TIBUpdateS
232		ChildSizing.ShrinkHorizontal = crsScaleChilds
233		ChildSizing.ShrinkVertical = crsScaleChilds
234		ChildSizing.Layout = cclLeftToRightThenTopToBottom
235	<	ChildSizing.ControlsPerLine = 4
236	<	ClientHeight = 38
237	<	ClientWidth = 274
238	<	Columns = 4
235	>	ChildSizing.ControlsPerLine = 5
236	>	ClientHeight = 34
237	>	ClientWidth = 264
238	>	Columns = 5
239		ItemIndex = 0
240		Items.Strings = (
241		'&Modify'
#	Line 190 | Line 244 | object IBUpdateSQLEditorForm: TIBUpdateS
244		'&Refresh'
245		)
246		OnClick = StatementTypeClick
247	<	TabOrder = 1
247	>	TabOrder = 0
248		end
249		object TestBtn: TButton
250		Left = 539
#	Line 200 | Line 254 | object IBUpdateSQLEditorForm: TIBUpdateS
254		Anchors = [akTop, akRight]
255		Caption = 'Test'
256		OnClick = TestBtnClick
257	+	TabOrder = 1
258	+	end
259	+	inline IBSQLEditFrame1: TIBSQLEditFrame
260	+	Left = 12
261	+	Height = 217
262	+	Top = 95
263	+	Width = 616
264	+	Anchors = [akTop, akLeft, akRight, akBottom]
265	+	ClientHeight = 217
266	+	ClientWidth = 616
267		TabOrder = 2
268	+	inherited SQLText: TSynEdit
269	+	Height = 191
270	+	Width = 616
271	+	OnChange = SQLMemoChange
272	+	end
273	+	inherited ToolBar1: TToolBar
274	+	Width = 616
275	+	end
276	+	inherited FieldNameList: TIBQuery
277	+	ParamData = <
278	+	item
279	+	DataType = ftUnknown
280	+	Name = 'RDB$RELATION_NAME'
281	+	ParamType = ptInput
282	+	end>
283	+	end
284	+	inherited PrimaryKeys: TIBQuery
285	+	ParamData = <
286	+	item
287	+	DataType = ftUnknown
288	+	Name = 'RDB$RELATION_NAME'
289	+	ParamType = ptInput
290	+	end>
291	+	end
292	+	inherited ProcInputParams: TIBQuery
293	+	ParamData = <
294	+	item
295	+	DataType = ftUnknown
296	+	Name = 'RDB$PROCEDURE_NAME'
297	+	ParamType = ptInput
298	+	end>
299	+	end
300	+	inherited ProcOutputParams: TIBQuery
301	+	ParamData = <
302	+	item
303	+	DataType = ftUnknown
304	+	Name = 'RDB$PROCEDURE_NAME'
305	+	ParamType = ptInput
306	+	end>
307	+	end
308		end
309		end
310		end
#	Line 226 | Line 330 | object IBUpdateSQLEditorForm: TIBUpdateS
330		ModalResult = 2
331		TabOrder = 2
332		end
229	–	object IBTransaction1: TIBTransaction
230	–	Active = False
231	–	left = 51
232	–	top = 373
233	–	end
333		end

Diff Legend

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