ViewVC Help

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

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

Comparing ibx/trunk/design/ibmodifysqleditor.lfm (file contents):
Revision 5 by tony, Fri Feb 18 16:26:16 2011 UTC vs.
Revision 106 by tony, Thu Jan 18 14:37:35 2018 UTC

#	Line 1 | Line 1
1	<	object IBModifySQLEditorForm: TIBModifySQLEditorForm
2	<	Left = 330
3	<	Height = 438
4	<	Top = 215
5	<	Width = 749
6	<	ActiveControl = TableNamesCombo
1	>	inherited IBModifySQLEditorForm: TIBModifySQLEditorForm
2	>	Left = 949
3	>	Height = 512
4		Caption = 'Modify SQL Editor'
5	<	ClientHeight = 438
6	<	ClientWidth = 749
7	<	OnShow = FormShow
8	<	LCLVersion = '0.9.28.2'
9	<	object Label1: TLabel
10	<	Left = 16
11	<	Height = 19
12	<	Top = 16
13	<	Width = 87
14	<	Caption = 'Table Name'
15	<	ParentColor = False
16	<	end
17	<	object Label2: TLabel
18	<	Left = 19
19	<	Height = 19
20	<	Top = 84
21	<	Width = 41
22	<	Caption = 'Fields'
23	<	ParentColor = False
24	<	end
25	<	object Label3: TLabel
26	<	Left = 279
27	<	Height = 19
28	<	Top = 16
29	<	Width = 29
30	<	Caption = 'SQL'
31	<	ParentColor = False
32	<	end
33	<	object Label4: TLabel
34	<	Left = 23
35	<	Height = 19
36	<	Top = 285
37	<	Width = 93
38	<	Caption = 'Primary Keys'
39	<	ParentColor = False
40	<	end
41	<	object SQLText: TMemo
42	<	Left = 279
43	<	Height = 328
44	<	Top = 36
45	<	Width = 439
46	<	ScrollBars = ssVertical
47	<	TabOrder = 0
48	<	end
49	<	object Button1: TButton
50	<	Left = 552
51	<	Height = 30
52	<	Top = 380
53	<	Width = 72
54	<	Caption = 'OK'
55	<	Default = True
56	<	ModalResult = 1
57	<	TabOrder = 1
58	<	end
59	<	object Button2: TButton
60	<	Left = 640
61	<	Height = 30
62	<	Top = 380
63	<	Width = 72
64	<	Cancel = True
65	<	Caption = 'Cancel'
66	<	ModalResult = 2
67	<	TabOrder = 2
68	<	end
69	<	object TableNamesCombo: TComboBox
70	<	Left = 23
71	<	Height = 30
72	<	Top = 38
73	<	Width = 201
74	<	ItemHeight = 0
75	<	OnCloseUp = TableNamesComboCloseUp
76	<	ParentColor = True
77	<	TabOrder = 3
78	<	end
79	<	object FieldList: TListBox
80	<	Left = 21
81	<	Height = 170
82	<	Hint = 'Select Fields to include in Update Statement, or leave unselected to select all'
83	<	Top = 102
84	<	Width = 204
85	<	ItemHeight = 0
86	<	MultiSelect = True
87	<	OnDblClick = FieldListDblClick
88	<	ParentShowHint = False
89	<	ShowHint = True
90	<	TabOrder = 4
91	<	TopIndex = -1
92	<	end
93	<	object Button3: TButton
94	<	Left = 280
95	<	Height = 30
96	<	Top = 380
97	<	Width = 112
98	<	AutoSize = True
99	<	Caption = 'Generate SQL'
100	<	OnClick = Button3Click
101	<	TabOrder = 5
102	<	end
103	<	object Button4: TButton
104	<	Left = 416
105	<	Height = 30
106	<	Top = 380
107	<	Width = 66
108	<	Caption = 'Test'
109	<	OnClick = Button4Click
113	<	TabOrder = 6
114	<	end
115	<	object QuoteFields: TCheckBox
116	<	Left = 16
117	<	Height = 22
118	<	Top = 380
119	<	Width = 144
120	<	Caption = '&Quote Identifiers'
5	>	ClientHeight = 512
6	>	inherited Button1: TButton
7	>	Top = 457
8	>	end
9	>	inherited Button2: TButton
10	>	Top = 457
11	>	end
12	>	inherited GenerateBtn: TButton
13	>	Top = 457
14	>	OnClick = GenerateBtnClick
15	>	end
16	>	inherited TestBtn: TButton
17	>	Top = 457
18	>	end
19	>	inherited PageControl: TPageControl
20	>	inherited SelectPage: TTabSheet
21	>	inherited Label2: TLabel
22	>	Left = 7
23	>	Top = 224
24	>	Width = 106
25	>	Caption = 'Updateable Fields'
26	>	end
27	>	inherited Label4: TLabel
28	>	Left = 7
29	>	end
30	>	inherited FieldNamesGrid: TIBDynamicGrid
31	>	Height = 104
32	>	Top = 240
33	>	end
34	>	inherited PrimaryKeysGrid: TIBDynamicGrid
35	>	Height = 48
36	>	end
37	>	inherited SelectSelectAll: TCheckBox
38	>	Top = 344
39	>	end
40	>	object Label5: TLabel[8]
41	>	Left = 9
42	>	Height = 14
43	>	Top = 152
44	>	Width = 138
45	>	Caption = 'Computed By Columns'
46	>	ParentColor = False
47	>	end
48	>	object ReadOnlyGrid: TIBDynamicGrid[9]
49	>	Left = 9
50	>	Height = 48
51	>	Top = 168
52	>	Width = 209
53	>	Color = clWindow
54	>	Columns = <
55	>	item
56	>	ButtonStyle = cbsCheckboxColumn
57	>	Title.Caption = 'SELECTED'
58	>	Width = 30
59	>	FieldName = 'SELECTED'
60	>	AutoSizeColumn = False
61	>	InitialSortColumn = False
62	>	DBLookupProperties.ItemHeight = 0
63	>	DBLookupProperties.ItemWidth = 0
64	>	DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
65	>	end
66	>	item
67	>	Title.Caption = 'COLUMNNAME'
68	>	Width = 64
69	>	FieldName = 'COLUMNNAME'
70	>	AutoSizeColumn = True
71	>	InitialSortColumn = False
72	>	DBLookupProperties.ItemHeight = 0
73	>	DBLookupProperties.ItemWidth = 0
74	>	DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
75	>	end>
76	>	FixedCols = 0
77	>	Options = [dgEditing, dgColumnResize, dgColumnMove, dgRowLines, dgConfirmDelete, dgCancelOnExit, dgDisableDelete, dgDisableInsert]
78	>	Scrollbars = ssAutoVertical
79	>	TabOrder = 5
80	>	ExpandEditorPanelBelowRow = False
81	>	Descending = False
82	>	EditorBorderStyle = bsSingle
83	>	DefaultPositionAtEnd = False
84	>	end
85	>	end
86	>	inherited ExecutePage: TTabSheet
87	>	inherited Label18: TLabel
88	>	Visible = False
89	>	end
90	>	inherited SelectProcedure: TLabel
91	>	Width = 81
92	>	Caption = 'Execute Only'
93	>	end
94	>	inherited InputProcGrid: TIBDynamicGrid
95	>	Height = 224
96	>	end
97	>	inherited OutputProcGrid: TIBDynamicGrid
98	>	Visible = False
99	>	end
100	>	end
101	>	end
102	>	inherited IBSQLEditFrame1: TIBSQLEditFrame
103	>	Left = 282
104	>	Height = 389
105	>	Top = 24
106	>	Width = 448
107	>	Anchors = [akTop, akLeft, akRight, akBottom]
108	>	ClientHeight = 389
109	>	ClientWidth = 448
110		TabOrder = 7
111	+	DesignLeft = 1974
112	+	DesignTop = 200
113	+	inherited SQLText: TSynEdit
114	+	Height = 363
115	+	Width = 448
116	+	end
117	+	inherited ToolBar1: TToolBar
118	+	Width = 448
119	+	end
120	+	inherited FieldNameList: TIBQuery
121	+	ParamData = <
122	+	item
123	+	DataType = ftUnknown
124	+	Name = 'RDB$RELATION_NAME'
125	+	ParamType = ptInput
126	+	end>
127	+	end
128	+	inherited PrimaryKeys: TIBQuery
129	+	ParamData = <
130	+	item
131	+	DataType = ftUnknown
132	+	Name = 'RDB$RELATION_NAME'
133	+	ParamType = ptInput
134	+	end>
135	+	end
136	+	inherited UserProcedures: TIBQuery
137	+	AfterScroll = UserProceduresAfterScroll
138	+	end
139	+	inherited ProcInputParams: TIBQuery
140	+	ParamData = <
141	+	item
142	+	DataType = ftUnknown
143	+	Name = 'RDB$PROCEDURE_NAME'
144	+	ParamType = ptInput
145	+	end>
146	+	end
147	+	inherited ProcOutputParams: TIBQuery
148	+	ParamData = <
149	+	item
150	+	DataType = ftUnknown
151	+	Name = 'RDB$PROCEDURE_NAME'
152	+	ParamType = ptInput
153	+	end>
154	+	end
155	+	inherited SQLTransaction: TIBTransaction
156	+	Params.Strings = (      )
157	+	end
158	+	inherited IdentityCols: TIBQuery
159	+	ParamData = <
160	+	item
161	+	DataType = ftUnknown
162	+	Name = 'RDB$RELATION_NAME'
163	+	ParamType = ptInput
164	+	end>
165	+	end
166	+	inherited ReadOnlyFields: TIBQuery
167	+	ParamData = <
168	+	item
169	+	DataType = ftUnknown
170	+	Name = 'RDB$RELATION_NAME'
171	+	ParamType = ptInput
172	+	end>
173	+	end
174	+	inherited ReadOnlyFieldsSource: TDataSource
175	+	left = 436
176	+	top = 203
177	+	end
178		end
179	<	object PrimaryKeyList: TListBox
180	<	Left = 23
181	<	Height = 59
182	<	Top = 304
183	<	Width = 200
184	<	ItemHeight = 0
129	<	OnDblClick = PrimaryKeyListDblClick
179	>	object IncludePrimaryKeys: TCheckBox[9]
180	>	Left = 24
181	>	Height = 22
182	>	Top = 465
183	>	Width = 241
184	>	Caption = 'Include Primary keys in Update SQL'
185		TabOrder = 8
131	–	TopIndex = -1
186		end
187		end

Diff Legend

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