ViewVC Help
View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing
root/public/ibx/trunk/design/ibselectsqleditor.lfm
Revision: 35
Committed: Tue Jan 26 14:38:47 2016 UTC (8 years, 2 months ago) by tony
File size: 5273 byte(s)
Log Message:
Committing updates for Release R1-3-2

File Contents

# Content
1 object IBSelectSQLEditorForm: TIBSelectSQLEditorForm
2 Left = 582
3 Height = 437
4 Top = 460
5 Width = 747
6 ActiveControl = PageControl
7 Caption = 'Select SQL Editor'
8 ClientHeight = 437
9 ClientWidth = 747
10 OnShow = FormShow
11 LCLVersion = '1.4.4.0'
12 object Label3: TLabel
13 Left = 279
14 Height = 15
15 Top = 16
16 Width = 21
17 Caption = 'SQL'
18 ParentColor = False
19 end
20 object SQLText: TMemo
21 Left = 279
22 Height = 327
23 Top = 36
24 Width = 437
25 Anchors = [akTop, akLeft, akRight, akBottom]
26 ScrollBars = ssAutoBoth
27 TabOrder = 0
28 end
29 object Button1: TButton
30 Left = 550
31 Height = 30
32 Top = 379
33 Width = 72
34 Anchors = [akRight, akBottom]
35 Caption = 'OK'
36 Default = True
37 ModalResult = 1
38 TabOrder = 1
39 end
40 object Button2: TButton
41 Left = 638
42 Height = 30
43 Top = 379
44 Width = 72
45 Anchors = [akRight, akBottom]
46 Cancel = True
47 Caption = 'Cancel'
48 ModalResult = 2
49 TabOrder = 2
50 end
51 object GenerateBtn: TButton
52 Left = 278
53 Height = 30
54 Top = 379
55 Width = 101
56 Anchors = [akRight, akBottom]
57 Caption = 'Generate SQL'
58 OnClick = GenerateBtnClick
59 TabOrder = 3
60 end
61 object TestBtn: TButton
62 Left = 414
63 Height = 30
64 Top = 379
65 Width = 66
66 Anchors = [akRight, akBottom]
67 Caption = 'Test'
68 OnClick = TestBtnClick
69 TabOrder = 4
70 end
71 object QuoteFields: TCheckBox
72 Left = 24
73 Height = 19
74 Top = 400
75 Width = 108
76 Caption = '&Quote Identifiers'
77 TabOrder = 5
78 end
79 object PageControl: TPageControl
80 Left = 24
81 Height = 335
82 Top = 28
83 Width = 232
84 ActivePage = ExecutePage
85 TabIndex = 1
86 TabOrder = 6
87 object SelectPage: TTabSheet
88 Caption = 'Tables'
89 ClientHeight = 302
90 ClientWidth = 226
91 OnShow = SelectPageShow
92 object Label1: TLabel
93 Left = 7
94 Height = 15
95 Top = 4
96 Width = 69
97 Caption = 'Table Name'
98 ParentColor = False
99 end
100 object Label2: TLabel
101 Left = 7
102 Height = 15
103 Top = 72
104 Width = 33
105 Caption = 'Fields'
106 ParentColor = False
107 end
108 object Label4: TLabel
109 Left = 7
110 Height = 15
111 Top = 244
112 Width = 77
113 Caption = 'Primary Keys'
114 ParentColor = False
115 end
116 object TableNamesCombo: TComboBox
117 Left = 6
118 Height = 23
119 Top = 20
120 Width = 201
121 AutoComplete = True
122 AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
123 ItemHeight = 15
124 OnCloseUp = TableNamesComboCloseUp
125 TabOrder = 0
126 end
127 object FieldList: TListBox
128 Left = 7
129 Height = 138
130 Hint = 'Select Fields to include in Select Statements, or leave unselected to select all'
131 Top = 92
132 Width = 204
133 ItemHeight = 0
134 MultiSelect = True
135 OnDblClick = FieldListDblClick
136 ParentShowHint = False
137 ScrollWidth = 202
138 ShowHint = True
139 TabOrder = 1
140 end
141 object PrimaryKeyList: TListBox
142 Left = 7
143 Height = 28
144 Top = 260
145 Width = 200
146 ItemHeight = 0
147 OnDblClick = PrimaryKeyListDblClick
148 ScrollWidth = 198
149 TabOrder = 2
150 end
151 end
152 object ExecutePage: TTabSheet
153 Caption = 'Procedures'
154 ClientHeight = 307
155 ClientWidth = 224
156 OnShow = ExecutePageShow
157 object Label16: TLabel
158 Left = 7
159 Height = 15
160 Top = 3
161 Width = 89
162 Caption = 'Procedure Name'
163 ParentColor = False
164 end
165 object Label17: TLabel
166 Left = 7
167 Height = 15
168 Top = 60
169 Width = 90
170 Caption = 'Input Parameters'
171 ParentColor = False
172 end
173 object Label18: TLabel
174 Left = 8
175 Height = 15
176 Top = 172
177 Width = 100
178 Caption = 'Output Parameters'
179 ParentColor = False
180 end
181 object ProcedureNames: TComboBox
182 Left = 7
183 Height = 23
184 Top = 20
185 Width = 201
186 ItemHeight = 15
187 OnCloseUp = ProcedureNamesCloseUp
188 ParentColor = True
189 TabOrder = 0
190 end
191 object ProcInputList: TListBox
192 Left = 7
193 Height = 80
194 Top = 81
195 Width = 198
196 IntegralHeight = True
197 ItemHeight = 0
198 ScrollWidth = 190
199 TabOrder = 1
200 end
201 object ProcOutputList: TListBox
202 Left = 7
203 Height = 80
204 Top = 192
205 Width = 198
206 IntegralHeight = True
207 ItemHeight = 0
208 ScrollWidth = 190
209 TabOrder = 2
210 end
211 object SelectProcedure: TLabel
212 Left = 7
213 Height = 13
214 Top = 291
215 Width = 103
216 Anchors = [akLeft, akBottom]
217 Caption = 'Is ''Select Procedure'''
218 Font.Height = -11
219 Font.Style = [fsBold]
220 ParentColor = False
221 ParentFont = False
222 Visible = False
223 end
224 end
225 end
226 object GenerateParams: TCheckBox
227 Left = 24
228 Height = 19
229 Top = 376
230 Width = 152
231 Caption = 'Allow DSQL Placeholders'
232 TabOrder = 7
233 end
234 object IBTransaction1: TIBTransaction
235 Active = False
236 left = 212
237 top = 390
238 end
239 end