1 |
|
inherited IBSQLEditorForm: TIBSQLEditorForm |
2 |
< |
Left = 315 |
2 |
> |
Left = 506 |
3 |
> |
Height = 555 |
4 |
> |
Top = 383 |
5 |
|
Width = 776 |
6 |
|
Caption = 'IBSQL Editor' |
7 |
+ |
ClientHeight = 555 |
8 |
|
ClientWidth = 776 |
9 |
|
OnShow = FormShow |
10 |
|
inherited Label3: TLabel |
11 |
|
Left = 312 |
12 |
|
end |
13 |
|
inherited Button1: TButton |
14 |
< |
Left = 579 |
14 |
> |
Left = 576 |
15 |
> |
Top = 504 |
16 |
|
end |
17 |
|
inherited Button2: TButton |
18 |
< |
Left = 667 |
18 |
> |
Left = 664 |
19 |
> |
Top = 504 |
20 |
|
end |
21 |
|
inherited GenerateBtn: TButton |
22 |
< |
Left = 307 |
22 |
> |
Left = 304 |
23 |
> |
Top = 504 |
24 |
|
OnClick = GenerateBtnClick |
25 |
|
end |
26 |
|
inherited TestBtn: TButton |
27 |
< |
Left = 443 |
27 |
> |
Left = 440 |
28 |
> |
Top = 504 |
29 |
|
end |
30 |
|
inherited QuoteFields: TCheckBox |
31 |
< |
Left = 68 |
31 |
> |
Left = 11 |
32 |
> |
Top = 496 |
33 |
|
end |
34 |
|
inherited PageControl: TPageControl |
35 |
|
Left = 68 |
28 |
– |
ActivePage = SelectPage |
36 |
|
ShowTabs = False |
30 |
– |
TabIndex = 0 |
37 |
|
inherited SelectPage: TTabSheet |
38 |
< |
ClientHeight = 349 |
33 |
< |
inherited Label4: TLabel |
34 |
< |
Top = 256 |
35 |
< |
end |
38 |
> |
ClientHeight = 450 |
39 |
|
inherited FieldNamesGrid: TIBDynamicGrid |
40 |
< |
Height = 136 |
38 |
< |
end |
39 |
< |
inherited PrimaryKeysGrid: TIBDynamicGrid |
40 |
< |
Top = 272 |
40 |
> |
Height = 104 |
41 |
|
end |
42 |
|
inherited SelectSelectAll: TCheckBox |
43 |
< |
Left = 8 |
44 |
< |
Top = 224 |
43 |
> |
Top = 424 |
44 |
|
end |
45 |
< |
object IncludePrimaryKeys: TCheckBox[8] |
46 |
< |
Left = 5 |
48 |
< |
Height = 22 |
49 |
< |
Top = 328 |
50 |
< |
Width = 221 |
51 |
< |
Caption = 'Include Primary keys in Field List' |
52 |
< |
Checked = True |
53 |
< |
OnChange = IncludePrimaryKeysChange |
54 |
< |
State = cbChecked |
55 |
< |
TabOrder = 5 |
45 |
> |
inherited ReadOnlyGrid: TIBDynamicGrid |
46 |
> |
Left = 9 |
47 |
|
end |
48 |
|
end |
49 |
|
inherited ExecutePage: TTabSheet |
50 |
< |
ClientHeight = 349 |
50 |
> |
ClientHeight = 450 |
51 |
> |
inherited Label16: TLabel |
52 |
> |
Left = 10 |
53 |
> |
end |
54 |
> |
inherited Label17: TLabel |
55 |
> |
Top = 128 |
56 |
> |
end |
57 |
> |
inherited Label18: TLabel |
58 |
> |
Top = 280 |
59 |
> |
end |
60 |
> |
inherited ProcedureNames: TIBLookupComboEditBox |
61 |
> |
Left = 10 |
62 |
> |
Top = 72 |
63 |
> |
end |
64 |
> |
inherited InputProcGrid: TIBDynamicGrid |
65 |
> |
Left = 8 |
66 |
> |
Height = 122 |
67 |
> |
Top = 144 |
68 |
> |
end |
69 |
> |
inherited OutputProcGrid: TIBDynamicGrid |
70 |
> |
Top = 296 |
71 |
> |
Columns = < |
72 |
> |
item |
73 |
> |
ButtonStyle = cbsCheckboxColumn |
74 |
> |
PickList.Strings = ( ) |
75 |
> |
Title.Caption = 'SELECTED' |
76 |
> |
Width = 30 |
77 |
> |
FieldName = 'SELECTED' |
78 |
> |
AutoSizeColumn = False |
79 |
> |
InitialSortColumn = False |
80 |
> |
DBLookupProperties.ItemHeight = 0 |
81 |
> |
DBLookupProperties.ItemWidth = 0 |
82 |
> |
DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending] |
83 |
> |
end |
84 |
> |
item |
85 |
> |
PickList.Strings = ( ) |
86 |
> |
Title.Caption = 'COLUMNNAME' |
87 |
> |
Width = 64 |
88 |
> |
FieldName = 'COLUMNNAME' |
89 |
> |
AutoSizeColumn = True |
90 |
> |
InitialSortColumn = False |
91 |
> |
DBLookupProperties.ItemHeight = 0 |
92 |
> |
DBLookupProperties.ItemWidth = 0 |
93 |
> |
DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending] |
94 |
> |
end> |
95 |
> |
end |
96 |
> |
object SelectProcedure: TLabel[8] |
97 |
> |
Left = 10 |
98 |
> |
Height = 13 |
99 |
> |
Top = 104 |
100 |
> |
Width = 168 |
101 |
> |
Anchors = [akLeft, akBottom] |
102 |
> |
Caption = 'This is a ''Select Procedure''' |
103 |
> |
Font.Height = -11 |
104 |
> |
Font.Style = [fsBold] |
105 |
> |
ParentColor = False |
106 |
> |
ParentFont = False |
107 |
> |
Visible = False |
108 |
> |
end |
109 |
|
end |
110 |
|
end |
111 |
|
inherited GenerateParams: TCheckBox |
112 |
< |
Left = 68 |
112 |
> |
Left = 11 |
113 |
> |
Top = 472 |
114 |
|
end |
115 |
|
inherited IBSQLEditFrame1: TIBSQLEditFrame |
116 |
|
Left = 312 |
117 |
< |
Height = 339 |
117 |
> |
Height = 440 |
118 |
|
Top = 24 |
119 |
|
Width = 447 |
120 |
|
Anchors = [akTop, akLeft, akRight, akBottom] |
121 |
< |
ClientHeight = 339 |
121 |
> |
ClientHeight = 440 |
122 |
|
ClientWidth = 447 |
123 |
|
TabOrder = 7 |
124 |
|
DesignLeft = 1974 |
125 |
|
DesignTop = 200 |
126 |
|
inherited SQLText: TSynEdit |
127 |
< |
Height = 313 |
127 |
> |
Height = 414 |
128 |
|
Width = 447 |
129 |
|
end |
130 |
|
inherited ToolBar1: TToolBar |
168 |
|
inherited SQLTransaction: TIBTransaction |
169 |
|
Params.Strings = ( ) |
170 |
|
end |
171 |
+ |
inherited IdentityCols: TIBQuery |
172 |
+ |
ParamData = < |
173 |
+ |
item |
174 |
+ |
DataType = ftUnknown |
175 |
+ |
Name = 'RDB$RELATION_NAME' |
176 |
+ |
ParamType = ptInput |
177 |
+ |
end> |
178 |
+ |
end |
179 |
+ |
inherited ReadOnlyFields: TIBQuery |
180 |
+ |
ParamData = < |
181 |
+ |
item |
182 |
+ |
DataType = ftUnknown |
183 |
+ |
Name = 'RDB$RELATION_NAME' |
184 |
+ |
ParamType = ptInput |
185 |
+ |
end> |
186 |
+ |
end |
187 |
+ |
inherited ReadOnlyFieldsSource: TDataSource |
188 |
+ |
left = 436 |
189 |
+ |
top = 203 |
190 |
+ |
end |
191 |
+ |
inherited PackageNames: TIBQuery |
192 |
+ |
BeforeClose = nil |
193 |
+ |
end |
194 |
|
end |
195 |
|
object TabControl1: TTabControl[9] |
196 |
|
Left = 11 |
199 |
|
Width = 59 |
200 |
|
OnChange = TabControl1Change |
201 |
|
TabPosition = tpLeft |
202 |
< |
TabIndex = 0 |
202 |
> |
TabIndex = 4 |
203 |
|
Tabs.Strings = ( |
204 |
|
'Select' |
205 |
|
'Insert' |
209 |
|
) |
210 |
|
TabOrder = 8 |
211 |
|
end |
212 |
+ |
object IncludePrimaryKeys: TCheckBox[10] |
213 |
+ |
Left = 11 |
214 |
+ |
Height = 22 |
215 |
+ |
Top = 520 |
216 |
+ |
Width = 241 |
217 |
+ |
Caption = 'Include Primary keys in Update SQL' |
218 |
+ |
TabOrder = 9 |
219 |
+ |
end |
220 |
|
end |