ViewVC Help

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

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

Comparing ibx/trunk/design/ibsqleditor.lfm (file contents):
Revision 19 by tony, Mon Jul 7 13:00:15 2014 UTC vs.
Revision 67 by tony, Tue Oct 3 14:08:11 2017 UTC

#	Line 1 | Line 1
1		object IBSQLEditorForm: TIBSQLEditorForm
2	<	Left = 402
2	>	Left = 2090
3		Height = 425
4	<	Top = 369
4	>	Top = 382
5		Width = 716
6		ActiveControl = PageControl
7		Caption = 'IBSQL Editor'
8		ClientHeight = 425
9		ClientWidth = 716
10		OnShow = FormShow
11	<	LCLVersion = '1.2.2.0'
11	>	Position = poScreenCenter
12	>	LCLVersion = '1.8.0.4'
13		object Label3: TLabel
14		Left = 288
15	<	Height = 15
15	>	Height = 14
16		Top = 8
17		Width = 24
18		Caption = 'SQL'
#	Line 49 | Line 50 | object IBSQLEditorForm: TIBSQLEditorForm
50		end
51		object QuoteFields: TCheckBox
52		Left = 16
53	<	Height = 24
53	>	Height = 22
54		Top = 392
55	<	Width = 127
55	>	Width = 125
56		Caption = '&Quote Identifiers'
57		TabOrder = 3
58		end
#	Line 70 | Line 71 | object IBSQLEditorForm: TIBSQLEditorForm
71		Left = 16
72		Height = 337
73		Top = 27
74	<	Width = 251
75	<	ActivePage = ExecutePage
76	<	TabIndex = 4
74	>	Width = 256
75	>	ActivePage = SelectPage
76	>	TabIndex = 0
77		TabOrder = 5
78	+	TabPosition = tpLeft
79		object SelectPage: TTabSheet
80		Caption = 'Select'
81	<	ClientHeight = 300
82	<	ClientWidth = 243
81	>	ClientHeight = 331
82	>	ClientWidth = 189
83		OnShow = SelectPageShow
84		object Label1: TLabel
85		Left = 7
86	<	Height = 18
86	>	Height = 14
87		Top = 3
88	<	Width = 78
88	>	Width = 69
89		Caption = 'Table Name'
90		ParentColor = False
91		end
92		object Label2: TLabel
93		Left = 7
94	<	Height = 18
94	>	Height = 14
95		Top = 53
96	<	Width = 39
96	>	Width = 33
97		Caption = 'Fields'
98		ParentColor = False
99		end
100		object Label4: TLabel
101		Left = 7
102	<	Height = 18
102	>	Height = 14
103		Top = 231
104	<	Width = 87
104	>	Width = 77
105		Caption = 'Primary Keys'
106		ParentColor = False
107		end
108		object SelectTableNames: TComboBox
109		Left = 7
110	<	Height = 29
110	>	Height = 27
111		Top = 19
112	<	Width = 169
112	>	Width = 174
113	>	Anchors = [akTop, akLeft, akRight]
114	>	AutoComplete = True
115	>	AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
116		ItemHeight = 0
117		OnCloseUp = SelectTableNamesCloseUp
118		TabOrder = 0
#	Line 117 | Line 122 | object IBSQLEditorForm: TIBSQLEditorForm
122		Height = 136
123		Hint = 'Select Fields to include in Select Statement or leave unselected to select all'
124		Top = 69
125	<	Width = 169
125	>	Width = 174
126	>	Anchors = [akTop, akLeft, akRight]
127		ItemHeight = 0
128		MultiSelect = True
129		OnDblClick = SelectFieldsListDblClick
130		ParentShowHint = False
131	<	ScrollWidth = 167
131	>	ScrollWidth = 172
132		ShowHint = True
133		TabOrder = 1
134		TopIndex = -1
135		end
136		object SelectPrimaryKeys: TListBox
137		Left = 7
138	<	Height = 46
138	>	Height = 77
139		Top = 247
140	<	Width = 159
141	<	Anchors = [akTop, akLeft, akBottom]
140	>	Width = 174
141	>	Anchors = [akTop, akLeft, akRight, akBottom]
142		ItemHeight = 0
143	<	ScrollWidth = 157
143	>	ScrollWidth = 172
144		TabOrder = 2
145		TopIndex = -1
146		end
147		end
148		object InsertPage: TTabSheet
149		Caption = 'Insert'
150	<	ClientHeight = 300
151	<	ClientWidth = 243
150	>	ClientHeight = 331
151	>	ClientWidth = 189
152		OnShow = InsertPageShow
153		object Label8: TLabel
154		Left = 7
155	<	Height = 18
155	>	Height = 15
156		Top = 3
157	<	Width = 78
157	>	Width = 69
158		Caption = 'Table Name'
159		ParentColor = False
160		end
161		object Label9: TLabel
162		Left = 7
163	<	Height = 18
163	>	Height = 15
164		Top = 53
165	<	Width = 39
165	>	Width = 33
166		Caption = 'Fields'
167		ParentColor = False
168		end
169		object InsertTableNames: TComboBox
170		Left = 7
171	<	Height = 29
171	>	Height = 27
172		Top = 19
173		Width = 169
174	+	Anchors = [akTop, akLeft, akRight]
175	+	AutoComplete = True
176	+	AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
177		ItemHeight = 0
178		OnCloseUp = InsertTableNamesCloseUp
179		TabOrder = 0
180		end
181		object InsertFieldsList: TListBox
182		Left = 7
183	<	Height = 225
183	>	Height = 256
184		Hint = 'Select Fields to include in Insert  Statement or leave unselected to select all'
185		Top = 69
186		Width = 169
187	<	Anchors = [akTop, akLeft, akBottom]
187	>	Anchors = [akTop, akLeft, akRight, akBottom]
188		ItemHeight = 0
189		MultiSelect = True
190		OnDblClick = SelectFieldsListDblClick
#	Line 188 | Line 197 | object IBSQLEditorForm: TIBSQLEditorForm
197		end
198		object ModifyPage: TTabSheet
199		Caption = 'Modify'
200	<	ClientHeight = 300
201	<	ClientWidth = 243
200	>	ClientHeight = 331
201	>	ClientWidth = 189
202		OnShow = ModifyPageShow
203		object Label10: TLabel
204		Left = 7
205	<	Height = 18
205	>	Height = 15
206		Top = 3
207	<	Width = 78
207	>	Width = 69
208		Caption = 'Table Name'
209		ParentColor = False
210		end
211		object Label11: TLabel
212		Left = 7
213	<	Height = 18
213	>	Height = 15
214		Top = 53
215	<	Width = 39
215	>	Width = 33
216		Caption = 'Fields'
217		ParentColor = False
218		end
219		object Label12: TLabel
220		Left = 7
221	<	Height = 18
221	>	Height = 15
222		Top = 228
223	<	Width = 87
223	>	Width = 77
224		Caption = 'Primary Keys'
225		ParentColor = False
226		end
227		object ModifyTableNames: TComboBox
228		Left = 7
229	<	Height = 29
229	>	Height = 27
230		Top = 19
231		Width = 169
232	+	Anchors = [akTop, akLeft, akRight]
233	+	AutoComplete = True
234	+	AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
235		ItemHeight = 0
236		OnCloseUp = ModifyTableNamesCloseUp
237		TabOrder = 0
#	Line 230 | Line 242 | object IBSQLEditorForm: TIBSQLEditorForm
242		Hint = 'Select Fields to include in Update Statement or leave unselected to select all'
243		Top = 69
244		Width = 169
245	+	Anchors = [akTop, akLeft, akRight]
246		ItemHeight = 0
247		MultiSelect = True
248		OnClick = SelectFieldsListDblClick
#	Line 239 | Line 252 | object IBSQLEditorForm: TIBSQLEditorForm
252		end
253		object ModifyPrimaryKeys: TListBox
254		Left = 7
255	<	Height = 46
255	>	Height = 77
256		Top = 244
257	<	Width = 159
258	<	Anchors = [akTop, akLeft, akBottom]
257	>	Width = 169
258	>	Anchors = [akTop, akLeft, akRight, akBottom]
259		ItemHeight = 0
260		OnClick = SelectFieldsListDblClick
261	<	ScrollWidth = 157
261	>	ScrollWidth = 167
262		TabOrder = 2
263		TopIndex = -1
264		end
#	Line 253 | Line 266 | object IBSQLEditorForm: TIBSQLEditorForm
266		Left = 5
267		Height = 22
268		Top = 181
269	<	Width = 161
269	>	Width = 150
270		Caption = 'Include Primary keys'
271		OnClick = IncludePrimaryKeysClick
272		TabOrder = 3
273		end
274		object Label5: TLabel
275		Left = 27
276	<	Height = 18
276	>	Height = 15
277		Top = 202
278	<	Width = 75
278	>	Width = 67
279		Caption = 'in Field List'
280		ParentColor = False
281		end
282		end
283		object DeletePage: TTabSheet
284		Caption = 'Delete'
285	<	ClientHeight = 300
286	<	ClientWidth = 243
285	>	ClientHeight = 331
286	>	ClientWidth = 189
287		OnShow = DeletePageShow
288		object Label14: TLabel
289		Left = 7
290	<	Height = 18
290	>	Height = 15
291		Top = 3
292	<	Width = 78
292	>	Width = 69
293		Caption = 'Table Name'
294		ParentColor = False
295		end
296		object Label15: TLabel
297		Left = 7
298	<	Height = 18
298	>	Height = 15
299		Top = 66
300	<	Width = 87
300	>	Width = 77
301		Caption = 'Primary Keys'
302		ParentColor = False
303		end
304		object DeleteTableNames: TComboBox
305		Left = 7
306	<	Height = 29
306	>	Height = 27
307		Top = 19
308		Width = 169
309	+	Anchors = [akTop, akLeft, akRight]
310	+	AutoComplete = True
311	+	AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
312		ItemHeight = 0
313		OnCloseUp = DeleteTableNamesCloseUp
314		TabOrder = 0
#	Line 301 | Line 317 | object IBSQLEditorForm: TIBSQLEditorForm
317		Left = 7
318		Height = 55
319		Top = 82
320	<	Width = 159
320	>	Width = 167
321	>	Anchors = [akTop, akLeft, akRight]
322		ItemHeight = 0
323		OnDblClick = SelectFieldsListDblClick
324	<	ScrollWidth = 157
324	>	ScrollWidth = 165
325		TabOrder = 1
326		TopIndex = -1
327		end
328		end
329		object ExecutePage: TTabSheet
330		Caption = 'Execute'
331	<	ClientHeight = 300
332	<	ClientWidth = 243
331	>	ClientHeight = 331
332	>	ClientWidth = 189
333		OnShow = ExecutePageShow
334		object Label16: TLabel
335		Left = 7
#	Line 343 | Line 360 | object IBSQLEditorForm: TIBSQLEditorForm
360		Height = 27
361		Top = 19
362		Width = 169
363	+	Anchors = [akTop, akLeft, akRight]
364		ItemHeight = 0
365		OnCloseUp = ProcedureNamesCloseUp
366		TabOrder = 0
#	Line 352 | Line 370 | object IBSQLEditorForm: TIBSQLEditorForm
370		Height = 80
371		Top = 82
372		Width = 164
373	+	Anchors = [akTop, akLeft, akRight]
374		IntegralHeight = True
375		ItemHeight = 0
376		ScrollWidth = 162
#	Line 360 | Line 379 | object IBSQLEditorForm: TIBSQLEditorForm
379		end
380		object ProcOutputList: TListBox
381		Left = 10
382	<	Height = 66
382	>	Height = 97
383		Top = 201
384		Width = 160
385	<	Anchors = [akTop, akLeft, akBottom]
385	>	Anchors = [akTop, akLeft, akRight]
386		IntegralHeight = True
387		ItemHeight = 0
388		ScrollWidth = 158
#	Line 373 | Line 392 | object IBSQLEditorForm: TIBSQLEditorForm
392		object SelectProcedure: TLabel
393		Left = 7
394		Height = 14
395	<	Top = 279
395	>	Top = 310
396		Width = 126
397		Anchors = [akLeft, akBottom]
398		Caption = 'Is ''Select Procedure'''
#	Line 397 | Line 416 | object IBSQLEditorForm: TIBSQLEditorForm
416		end
417		object GenerateParams: TCheckBox
418		Left = 16
419	<	Height = 24
419	>	Height = 22
420		Top = 368
421	<	Width = 173
421	>	Width = 171
422		Caption = 'Allow DSQL Placeholders'
423		TabOrder = 7
424		end

Diff Legend

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