ViewVC Help
View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing
root/public/ibx/trunk/design/ibsqleditor.lfm
Revision: 107
Committed: Thu Jan 18 14:37:40 2018 UTC (6 years, 2 months ago) by tony
File size: 5293 byte(s)
Log Message:
Fixes merged

File Contents

# Content
1 inherited IBSQLEditorForm: TIBSQLEditorForm
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 = 576
15 Top = 504
16 end
17 inherited Button2: TButton
18 Left = 664
19 Top = 504
20 end
21 inherited GenerateBtn: TButton
22 Left = 304
23 Top = 504
24 OnClick = GenerateBtnClick
25 end
26 inherited TestBtn: TButton
27 Left = 440
28 Top = 504
29 end
30 inherited QuoteFields: TCheckBox
31 Left = 11
32 Top = 496
33 end
34 inherited PageControl: TPageControl
35 Left = 68
36 ShowTabs = False
37 inherited SelectPage: TTabSheet
38 ClientHeight = 450
39 inherited FieldNamesGrid: TIBDynamicGrid
40 Height = 104
41 end
42 inherited SelectSelectAll: TCheckBox
43 Top = 424
44 end
45 inherited ReadOnlyGrid: TIBDynamicGrid
46 Left = 9
47 end
48 end
49 inherited ExecutePage: TTabSheet
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 = 11
113 Top = 472
114 end
115 inherited IBSQLEditFrame1: TIBSQLEditFrame
116 Left = 312
117 Height = 440
118 Top = 24
119 Width = 447
120 Anchors = [akTop, akLeft, akRight, akBottom]
121 ClientHeight = 440
122 ClientWidth = 447
123 TabOrder = 7
124 DesignLeft = 1974
125 DesignTop = 200
126 inherited SQLText: TSynEdit
127 Height = 414
128 Width = 447
129 end
130 inherited ToolBar1: TToolBar
131 Width = 447
132 end
133 inherited FieldNameList: TIBQuery
134 ParamData = <
135 item
136 DataType = ftUnknown
137 Name = 'RDB$RELATION_NAME'
138 ParamType = ptInput
139 end>
140 end
141 inherited PrimaryKeys: TIBQuery
142 ParamData = <
143 item
144 DataType = ftUnknown
145 Name = 'RDB$RELATION_NAME'
146 ParamType = ptInput
147 end>
148 end
149 inherited UserProcedures: TIBQuery
150 AfterScroll = UserProceduresAfterScroll
151 end
152 inherited ProcInputParams: TIBQuery
153 ParamData = <
154 item
155 DataType = ftUnknown
156 Name = 'RDB$PROCEDURE_NAME'
157 ParamType = ptInput
158 end>
159 end
160 inherited ProcOutputParams: TIBQuery
161 ParamData = <
162 item
163 DataType = ftUnknown
164 Name = 'RDB$PROCEDURE_NAME'
165 ParamType = ptInput
166 end>
167 end
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
197 Height = 312
198 Top = 8
199 Width = 59
200 OnChange = TabControl1Change
201 TabPosition = tpLeft
202 TabIndex = 4
203 Tabs.Strings = (
204 'Select'
205 'Insert'
206 'Modify'
207 'Delete'
208 'Execute'
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