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 7 by tony, Sun Aug 5 18:28:19 2012 UTC vs.
Revision 21 by tony, Thu Feb 26 10:33:34 2015 UTC

#	Line 1 | Line 1
1		object IBSQLEditorForm: TIBSQLEditorForm
2		Left = 402
3	<	Height = 426
3	>	Height = 425
4		Top = 369
5		Width = 716
6		ActiveControl = PageControl
7		Caption = 'IBSQL Editor'
8	<	ClientHeight = 426
8	>	ClientHeight = 425
9		ClientWidth = 716
10		OnShow = FormShow
11	<	LCLVersion = '0.9.30'
11	>	LCLVersion = '1.2.6.0'
12		object Label3: TLabel
13		Left = 288
14	<	Height = 18
14	>	Height = 15
15		Top = 8
16	<	Width = 26
16	>	Width = 24
17		Caption = 'SQL'
18		ParentColor = False
19		end
20		object SQLText: TMemo
21		Left = 288
22	<	Height = 336
22	>	Height = 335
23		Top = 27
24		Width = 418
25		Anchors = [akTop, akLeft, akRight, akBottom]
#	Line 29 | Line 29 | object IBSQLEditorForm: TIBSQLEditorForm
29		object GenerateBtn: TButton
30		Left = 267
31		Height = 30
32	<	Top = 375
32	>	Top = 374
33		Width = 104
34		Anchors = [akRight, akBottom]
35		Caption = 'Generate SQL'
#	Line 39 | Line 39 | object IBSQLEditorForm: TIBSQLEditorForm
39		object Button2: TButton
40		Left = 627
41		Height = 30
42	<	Top = 375
42	>	Top = 374
43		Width = 72
44		Anchors = [akRight, akBottom]
45		Cancel = True
#	Line 49 | Line 49 | object IBSQLEditorForm: TIBSQLEditorForm
49		end
50		object QuoteFields: TCheckBox
51		Left = 16
52	<	Height = 22
53	<	Top = 380
54	<	Width = 132
52	>	Height = 24
53	>	Top = 392
54	>	Width = 127
55		Caption = '&Quote Identifiers'
56		TabOrder = 3
57		end
58		object Button1: TButton
59		Left = 539
60		Height = 30
61	<	Top = 374
61	>	Top = 373
62		Width = 72
63		Anchors = [akRight, akBottom]
64		Caption = 'OK'
#	Line 71 | Line 71 | object IBSQLEditorForm: TIBSQLEditorForm
71		Height = 337
72		Top = 27
73		Width = 251
74	<	ActivePage = ExecutePage
75	<	TabIndex = 4
74	>	ActivePage = InsertPage
75	>	TabIndex = 1
76		TabOrder = 5
77		object SelectPage: TTabSheet
78		Caption = 'Select'
79	<	ClientHeight = 302
80	<	ClientWidth = 245
79	>	ClientHeight = 300
80	>	ClientWidth = 243
81		OnShow = SelectPageShow
82		object Label1: TLabel
83		Left = 7
84	<	Height = 18
84	>	Height = 15
85		Top = 3
86	<	Width = 78
86	>	Width = 69
87		Caption = 'Table Name'
88		ParentColor = False
89		end
90		object Label2: TLabel
91		Left = 7
92	<	Height = 18
92	>	Height = 15
93		Top = 53
94	<	Width = 39
94	>	Width = 33
95		Caption = 'Fields'
96		ParentColor = False
97		end
98		object Label4: TLabel
99		Left = 7
100	<	Height = 18
100	>	Height = 15
101		Top = 231
102	<	Width = 87
102	>	Width = 77
103		Caption = 'Primary Keys'
104		ParentColor = False
105		end
106		object SelectTableNames: TComboBox
107		Left = 7
108	<	Height = 29
108	>	Height = 27
109		Top = 19
110		Width = 169
111	+	AutoComplete = True
112	+	AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
113		ItemHeight = 0
114		OnCloseUp = SelectTableNamesCloseUp
115		TabOrder = 0
#	Line 122 | Line 124 | object IBSQLEditorForm: TIBSQLEditorForm
124		MultiSelect = True
125		OnDblClick = SelectFieldsListDblClick
126		ParentShowHint = False
127	+	ScrollWidth = 167
128		ShowHint = True
129		TabOrder = 1
130		TopIndex = -1
#	Line 133 | Line 136 | object IBSQLEditorForm: TIBSQLEditorForm
136		Width = 159
137		Anchors = [akTop, akLeft, akBottom]
138		ItemHeight = 0
139	+	ScrollWidth = 157
140		TabOrder = 2
141		TopIndex = -1
142		end
143		end
144		object InsertPage: TTabSheet
145		Caption = 'Insert'
146	<	ClientHeight = 302
147	<	ClientWidth = 245
146	>	ClientHeight = 300
147	>	ClientWidth = 243
148		OnShow = InsertPageShow
149		object Label8: TLabel
150		Left = 7
151	<	Height = 18
151	>	Height = 15
152		Top = 3
153	<	Width = 78
153	>	Width = 69
154		Caption = 'Table Name'
155		ParentColor = False
156		end
157		object Label9: TLabel
158		Left = 7
159	<	Height = 18
159	>	Height = 15
160		Top = 53
161	<	Width = 39
161	>	Width = 33
162		Caption = 'Fields'
163		ParentColor = False
164		end
165		object InsertTableNames: TComboBox
166		Left = 7
167	<	Height = 29
167	>	Height = 27
168		Top = 19
169		Width = 169
170	+	AutoComplete = True
171	+	AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
172		ItemHeight = 0
173		OnCloseUp = InsertTableNamesCloseUp
174		TabOrder = 0
#	Line 178 | Line 184 | object IBSQLEditorForm: TIBSQLEditorForm
184		MultiSelect = True
185		OnDblClick = SelectFieldsListDblClick
186		ParentShowHint = False
187	+	ScrollWidth = 167
188		ShowHint = True
189		TabOrder = 1
190		TopIndex = -1
#	Line 185 | Line 192 | object IBSQLEditorForm: TIBSQLEditorForm
192		end
193		object ModifyPage: TTabSheet
194		Caption = 'Modify'
195	<	ClientHeight = 302
196	<	ClientWidth = 245
195	>	ClientHeight = 300
196	>	ClientWidth = 243
197		OnShow = ModifyPageShow
198		object Label10: TLabel
199		Left = 7
200	<	Height = 18
200	>	Height = 15
201		Top = 3
202	<	Width = 78
202	>	Width = 69
203		Caption = 'Table Name'
204		ParentColor = False
205		end
206		object Label11: TLabel
207		Left = 7
208	<	Height = 18
208	>	Height = 15
209		Top = 53
210	<	Width = 39
210	>	Width = 33
211		Caption = 'Fields'
212		ParentColor = False
213		end
214		object Label12: TLabel
215		Left = 7
216	<	Height = 18
216	>	Height = 15
217		Top = 228
218	<	Width = 87
218	>	Width = 77
219		Caption = 'Primary Keys'
220		ParentColor = False
221		end
222		object ModifyTableNames: TComboBox
223		Left = 7
224	<	Height = 29
224	>	Height = 27
225		Top = 19
226		Width = 169
227	+	AutoComplete = True
228	+	AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
229		ItemHeight = 0
230		OnCloseUp = ModifyTableNamesCloseUp
231		TabOrder = 0
#	Line 230 | Line 239 | object IBSQLEditorForm: TIBSQLEditorForm
239		ItemHeight = 0
240		MultiSelect = True
241		OnClick = SelectFieldsListDblClick
242	+	ScrollWidth = 167
243		TabOrder = 1
244		TopIndex = -1
245		end
#	Line 241 | Line 251 | object IBSQLEditorForm: TIBSQLEditorForm
251		Anchors = [akTop, akLeft, akBottom]
252		ItemHeight = 0
253		OnClick = SelectFieldsListDblClick
254	+	ScrollWidth = 157
255		TabOrder = 2
256		TopIndex = -1
257		end
258		object IncludePrimaryKeys: TCheckBox
259		Left = 5
260	<	Height = 22
260	>	Height = 24
261		Top = 181
262	<	Width = 161
262	>	Width = 152
263		Caption = 'Include Primary keys'
264		OnClick = IncludePrimaryKeysClick
265		TabOrder = 3
266		end
267		object Label5: TLabel
268		Left = 27
269	<	Height = 18
269	>	Height = 15
270		Top = 202
271	<	Width = 75
271	>	Width = 67
272		Caption = 'in Field List'
273		ParentColor = False
274		end
275		end
276		object DeletePage: TTabSheet
277		Caption = 'Delete'
278	<	ClientHeight = 302
279	<	ClientWidth = 245
278	>	ClientHeight = 300
279	>	ClientWidth = 243
280		OnShow = DeletePageShow
281		object Label14: TLabel
282		Left = 7
283	<	Height = 18
283	>	Height = 15
284		Top = 3
285	<	Width = 78
285	>	Width = 69
286		Caption = 'Table Name'
287		ParentColor = False
288		end
289		object Label15: TLabel
290		Left = 7
291	<	Height = 18
291	>	Height = 15
292		Top = 66
293	<	Width = 87
293	>	Width = 77
294		Caption = 'Primary Keys'
295		ParentColor = False
296		end
297		object DeleteTableNames: TComboBox
298		Left = 7
299	<	Height = 29
299	>	Height = 27
300		Top = 19
301		Width = 169
302	+	AutoComplete = True
303	+	AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
304		ItemHeight = 0
305		OnCloseUp = DeleteTableNamesCloseUp
306		TabOrder = 0
#	Line 299 | Line 312 | object IBSQLEditorForm: TIBSQLEditorForm
312		Width = 159
313		ItemHeight = 0
314		OnDblClick = SelectFieldsListDblClick
315	+	ScrollWidth = 157
316		TabOrder = 1
317		TopIndex = -1
318		end
319		end
320		object ExecutePage: TTabSheet
321		Caption = 'Execute'
322	<	ClientHeight = 302
323	<	ClientWidth = 245
322	>	ClientHeight = 300
323	>	ClientWidth = 243
324		OnShow = ExecutePageShow
325		object Label16: TLabel
326		Left = 7
327	<	Height = 18
327	>	Height = 15
328		Top = 3
329	<	Width = 109
329	>	Width = 100
330		Caption = 'Procedure Name'
331		ParentColor = False
332		end
333		object Label17: TLabel
334		Left = 10
335	<	Height = 18
335	>	Height = 15
336		Top = 61
337	<	Width = 112
337	>	Width = 104
338		Caption = 'Input Parameters'
339		ParentColor = False
340		end
341		object Label18: TLabel
342		Left = 11
343	<	Height = 18
343	>	Height = 15
344		Top = 181
345	<	Width = 123
345	>	Width = 114
346		Caption = 'Output Parameters'
347		ParentColor = False
348		end
349		object ProcedureNames: TComboBox
350		Left = 7
351	<	Height = 29
351	>	Height = 27
352		Top = 19
353		Width = 169
354		ItemHeight = 0
#	Line 348 | Line 362 | object IBSQLEditorForm: TIBSQLEditorForm
362		Width = 164
363		IntegralHeight = True
364		ItemHeight = 0
365	+	ScrollWidth = 162
366		TabOrder = 1
367		TopIndex = -1
368		end
369		object ProcOutputList: TListBox
370		Left = 10
371	<	Height = 68
371	>	Height = 66
372		Top = 201
373		Width = 160
374		Anchors = [akTop, akLeft, akBottom]
375		IntegralHeight = True
376		ItemHeight = 0
377	+	ScrollWidth = 158
378		TabOrder = 2
379		TopIndex = -1
380		end
381		object SelectProcedure: TLabel
382		Left = 7
383	<	Height = 15
384	<	Top = 280
385	<	Width = 127
383	>	Height = 14
384	>	Top = 279
385	>	Width = 126
386		Anchors = [akLeft, akBottom]
387		Caption = 'Is ''Select Procedure'''
388		Font.Height = -11
#	Line 380 | Line 396 | object IBSQLEditorForm: TIBSQLEditorForm
396		object TestBtn: TButton
397		Left = 403
398		Height = 30
399	<	Top = 375
399	>	Top = 374
400		Width = 66
401		Anchors = [akRight, akBottom]
402		Caption = 'Test'
403		OnClick = TestBtnClick
404		TabOrder = 6
405		end
406	+	object GenerateParams: TCheckBox
407	+	Left = 16
408	+	Height = 24
409	+	Top = 368
410	+	Width = 173
411	+	Caption = 'Allow DSQL Placeholders'
412	+	TabOrder = 7
413	+	end
414		object IBTransaction1: TIBTransaction
415		Active = False
416		left = 200

Diff Legend

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