3 |
|
Height = 517 |
4 |
|
Top = 125 |
5 |
|
Width = 462 |
6 |
– |
ActiveControl = LocalRbtn |
6 |
|
BorderStyle = bsDialog |
7 |
|
BorderWidth = 5 |
8 |
< |
Caption = 'Database Component Editor' |
8 |
> |
Caption = 'Database Connection Editor' |
9 |
|
ClientHeight = 517 |
10 |
|
ClientWidth = 462 |
11 |
|
HelpFile = 'ibx.hlp' |
12 |
|
OnCreate = FormCreate |
13 |
|
ParentFont = True |
14 |
|
Position = poScreenCenter |
15 |
< |
LCLVersion = '0.9.30' |
15 |
> |
LCLVersion = '2.0.0.2' |
16 |
|
object Panel1: TPanel |
17 |
|
Left = 5 |
18 |
|
Height = 36 |
22 |
|
BevelOuter = bvNone |
23 |
|
ClientHeight = 36 |
24 |
|
ClientWidth = 452 |
25 |
< |
TabOrder = 2 |
25 |
> |
TabOrder = 1 |
26 |
|
object OKBtn: TButton |
27 |
|
Left = 83 |
28 |
|
Height = 30 |
53 |
|
TabOrder = 2 |
54 |
|
end |
55 |
|
end |
57 |
– |
object GroupBox2: TGroupBox |
58 |
– |
Left = 5 |
59 |
– |
Height = 179 |
60 |
– |
Top = 5 |
61 |
– |
Width = 452 |
62 |
– |
Align = alTop |
63 |
– |
Caption = 'Connection' |
64 |
– |
ClientHeight = 160 |
65 |
– |
ClientWidth = 448 |
66 |
– |
TabOrder = 0 |
67 |
– |
object Label1: TLabel |
68 |
– |
Left = 24 |
69 |
– |
Height = 18 |
70 |
– |
Top = 98 |
71 |
– |
Width = 67 |
72 |
– |
Caption = '&Database:' |
73 |
– |
FocusControl = DatabaseName |
74 |
– |
ParentColor = False |
75 |
– |
end |
76 |
– |
object Label7: TLabel |
77 |
– |
Left = 24 |
78 |
– |
Height = 18 |
79 |
– |
Top = 48 |
80 |
– |
Width = 47 |
81 |
– |
Caption = '&Server:' |
82 |
– |
Enabled = False |
83 |
– |
FocusControl = ServerName |
84 |
– |
ParentColor = False |
85 |
– |
end |
86 |
– |
object Label8: TLabel |
87 |
– |
Left = 209 |
88 |
– |
Height = 18 |
89 |
– |
Top = 48 |
90 |
– |
Width = 58 |
91 |
– |
Caption = '&Protocol:' |
92 |
– |
Enabled = False |
93 |
– |
FocusControl = Protocol |
94 |
– |
ParentColor = False |
95 |
– |
end |
96 |
– |
object DatabaseName: TEdit |
97 |
– |
Left = 24 |
98 |
– |
Height = 27 |
99 |
– |
Top = 116 |
100 |
– |
Width = 414 |
101 |
– |
TabOrder = 5 |
102 |
– |
end |
103 |
– |
object LocalRbtn: TRadioButton |
104 |
– |
Left = 24 |
105 |
– |
Height = 22 |
106 |
– |
Top = 9 |
107 |
– |
Width = 58 |
108 |
– |
Caption = '&Local' |
109 |
– |
Checked = True |
110 |
– |
OnClick = LocalRbtnClick |
111 |
– |
TabOrder = 0 |
112 |
– |
TabStop = True |
113 |
– |
end |
114 |
– |
object RemoteRbtn: TRadioButton |
115 |
– |
Left = 89 |
116 |
– |
Height = 22 |
117 |
– |
Top = 9 |
118 |
– |
Width = 74 |
119 |
– |
Caption = '&Remote' |
120 |
– |
OnClick = RemoteRbtnClick |
121 |
– |
TabOrder = 1 |
122 |
– |
end |
123 |
– |
object Browse: TButton |
124 |
– |
Left = 353 |
125 |
– |
Height = 30 |
126 |
– |
Top = 66 |
127 |
– |
Width = 75 |
128 |
– |
Caption = '&Browse' |
129 |
– |
OnClick = BrowseClick |
130 |
– |
TabOrder = 2 |
131 |
– |
end |
132 |
– |
object ServerName: TEdit |
133 |
– |
Left = 24 |
134 |
– |
Height = 27 |
135 |
– |
Top = 66 |
136 |
– |
Width = 144 |
137 |
– |
Enabled = False |
138 |
– |
TabOrder = 3 |
139 |
– |
end |
140 |
– |
object Protocol: TComboBox |
141 |
– |
Left = 209 |
142 |
– |
Height = 29 |
143 |
– |
Top = 66 |
144 |
– |
Width = 120 |
145 |
– |
Enabled = False |
146 |
– |
ItemHeight = 0 |
147 |
– |
Items.Strings = ( |
148 |
– |
'TCP' |
149 |
– |
'NamedPipe' |
150 |
– |
'SPX' |
151 |
– |
) |
152 |
– |
TabOrder = 4 |
153 |
– |
end |
154 |
– |
end |
56 |
|
object GroupBox1: TGroupBox |
57 |
|
Left = 5 |
58 |
< |
Height = 292 |
59 |
< |
Top = 184 |
58 |
> |
Height = 316 |
59 |
> |
Top = 160 |
60 |
|
Width = 452 |
160 |
– |
Align = alClient |
61 |
|
Caption = 'Database Parameters' |
62 |
< |
ClientHeight = 273 |
63 |
< |
ClientWidth = 448 |
64 |
< |
TabOrder = 1 |
62 |
> |
ClientHeight = 301 |
63 |
> |
ClientWidth = 450 |
64 |
> |
TabOrder = 0 |
65 |
|
object Label2: TLabel |
66 |
|
Left = 24 |
67 |
< |
Height = 18 |
67 |
> |
Height = 14 |
68 |
|
Top = 9 |
69 |
< |
Width = 78 |
69 |
> |
Width = 70 |
70 |
|
Caption = '&User Name:' |
71 |
|
FocusControl = UserName |
72 |
|
ParentColor = False |
73 |
|
end |
74 |
|
object Label3: TLabel |
75 |
|
Left = 24 |
76 |
< |
Height = 18 |
76 |
> |
Height = 14 |
77 |
|
Top = 65 |
78 |
< |
Width = 66 |
78 |
> |
Width = 59 |
79 |
|
Caption = 'Pass&word:' |
80 |
|
FocusControl = Password |
81 |
|
ParentColor = False |
82 |
|
end |
83 |
|
object Label4: TLabel |
84 |
|
Left = 24 |
85 |
< |
Height = 18 |
85 |
> |
Height = 14 |
86 |
|
Top = 121 |
87 |
< |
Width = 58 |
87 |
> |
Width = 52 |
88 |
|
Caption = 'S&QLRole:' |
89 |
|
FocusControl = SQLRole |
90 |
|
ParentColor = False |
91 |
|
end |
92 |
|
object Label5: TLabel |
93 |
|
Left = 249 |
94 |
< |
Height = 18 |
94 |
> |
Height = 14 |
95 |
|
Top = 9 |
96 |
< |
Width = 58 |
96 |
> |
Width = 54 |
97 |
|
Caption = 'Se&ttings:' |
98 |
|
FocusControl = DatabaseParams |
99 |
|
ParentColor = False |
100 |
|
end |
101 |
|
object Label6: TLabel |
102 |
|
Left = 24 |
103 |
< |
Height = 18 |
103 |
> |
Height = 14 |
104 |
|
Top = 177 |
105 |
< |
Width = 93 |
105 |
> |
Width = 87 |
106 |
|
Caption = '&Character Set:' |
107 |
|
FocusControl = CharacterSet |
108 |
|
ParentColor = False |
109 |
|
end |
110 |
|
object UserName: TEdit |
111 |
|
Left = 24 |
112 |
< |
Height = 27 |
112 |
> |
Height = 24 |
113 |
|
Top = 27 |
114 |
|
Width = 137 |
115 |
< |
OnChange = UserNameChange |
216 |
< |
OnExit = UserNameChange |
115 |
> |
OnEditingDone = UserNameEditingDone |
116 |
|
TabOrder = 0 |
117 |
|
end |
118 |
|
object Password: TEdit |
119 |
|
Left = 24 |
120 |
< |
Height = 27 |
120 |
> |
Height = 24 |
121 |
|
Top = 83 |
122 |
|
Width = 137 |
123 |
< |
OnChange = PasswordChange |
225 |
< |
OnExit = PasswordChange |
123 |
> |
OnEditingDone = PasswordEditingDone |
124 |
|
TabOrder = 1 |
125 |
|
end |
126 |
|
object SQLRole: TEdit |
127 |
|
Left = 24 |
128 |
< |
Height = 27 |
128 |
> |
Height = 24 |
129 |
|
Top = 139 |
130 |
|
Width = 134 |
131 |
< |
OnChange = SQLRoleChange |
234 |
< |
OnExit = SQLRoleChange |
131 |
> |
OnEditingDone = SQLRoleEditingDone |
132 |
|
TabOrder = 2 |
133 |
|
end |
134 |
|
object DatabaseParams: TMemo |
135 |
|
Left = 249 |
136 |
< |
Height = 124 |
136 |
> |
Height = 80 |
137 |
|
Top = 27 |
138 |
|
Width = 183 |
139 |
+ |
OnEditingDone = DatabaseParamsEditingDone |
140 |
|
ScrollBars = ssAutoVertical |
141 |
|
TabOrder = 5 |
142 |
|
end |
144 |
|
Left = 24 |
145 |
|
Height = 22 |
146 |
|
Top = 235 |
147 |
< |
Width = 110 |
147 |
> |
Width = 105 |
148 |
|
Caption = 'Lo&gin Prompt' |
149 |
|
TabOrder = 4 |
150 |
|
end |
151 |
|
object CharacterSet: TComboBox |
152 |
|
Left = 24 |
153 |
< |
Height = 29 |
153 |
> |
Height = 27 |
154 |
|
Top = 195 |
155 |
|
Width = 134 |
156 |
|
ItemHeight = 0 |
259 |
– |
ItemIndex = 0 |
157 |
|
Items.Strings = ( |
261 |
– |
'None' |
158 |
|
'ASCII' |
159 |
|
'BIG_5' |
160 |
+ |
'CP943C' |
161 |
|
'CYRL' |
162 |
|
'DOS437' |
163 |
+ |
'DOS737' |
164 |
+ |
'DOS775' |
165 |
|
'DOS850' |
166 |
|
'DOS852' |
167 |
|
'DOS857' |
168 |
+ |
'DOS858' |
169 |
|
'DOS860' |
170 |
|
'DOS861' |
171 |
+ |
'DOS862' |
172 |
|
'DOS863' |
173 |
+ |
'DOS864' |
174 |
|
'DOS865' |
175 |
+ |
'DOS866' |
176 |
+ |
'DOS869' |
177 |
|
'EUCJ_0208' |
178 |
+ |
'GB18030' |
179 |
+ |
'GBK' |
180 |
|
'GB_2312' |
181 |
|
'ISO8859_1' |
182 |
+ |
'ISO8859_13' |
183 |
+ |
'ISO8859_2' |
184 |
+ |
'ISO8859_3' |
185 |
+ |
'ISO8859_4' |
186 |
+ |
'ISO8859_5' |
187 |
+ |
'ISO8859_6' |
188 |
+ |
'ISO8859_7' |
189 |
+ |
'ISO8859_8' |
190 |
+ |
'ISO8859_9' |
191 |
+ |
'KOI8R' |
192 |
+ |
'KOI8U' |
193 |
|
'KSC_5601' |
194 |
|
'NEXT' |
195 |
+ |
'NONE' |
196 |
|
'OCTETS' |
197 |
|
'SJIS_0208' |
198 |
+ |
'TIS620' |
199 |
|
'UNICODE_FSS' |
200 |
< |
'UTF-8' |
200 |
> |
'UTF8' |
201 |
|
'WIN1250' |
202 |
|
'WIN1251' |
203 |
|
'WIN1252' |
204 |
|
'WIN1253' |
205 |
|
'WIN1254' |
206 |
+ |
'WIN1255' |
207 |
+ |
'WIN1256' |
208 |
+ |
'WIN1257' |
209 |
+ |
'WIN1258' |
210 |
|
) |
211 |
|
OnChange = CharacterSetChange |
212 |
|
TabOrder = 3 |
290 |
– |
Text = 'None' |
213 |
|
end |
214 |
+ |
object UseSystemDefaultCS: TCheckBox |
215 |
+ |
Left = 24 |
216 |
+ |
Height = 22 |
217 |
+ |
Top = 264 |
218 |
+ |
Width = 229 |
219 |
+ |
Caption = 'Use System Default Character Set' |
220 |
+ |
OnChange = UseSystemDefaultCSChange |
221 |
+ |
TabOrder = 6 |
222 |
+ |
end |
223 |
+ |
object Label10: TLabel |
224 |
+ |
Left = 249 |
225 |
+ |
Height = 14 |
226 |
+ |
Top = 121 |
227 |
+ |
Width = 123 |
228 |
+ |
Caption = 'Config File Overrides' |
229 |
+ |
ParentColor = False |
230 |
+ |
end |
231 |
+ |
object ConfigOverrides: TMemo |
232 |
+ |
Left = 249 |
233 |
+ |
Height = 86 |
234 |
+ |
Top = 136 |
235 |
+ |
Width = 182 |
236 |
+ |
OnEditingDone = ConfigOverridesEditingDone |
237 |
+ |
TabOrder = 7 |
238 |
+ |
end |
239 |
+ |
object UseWireCompression: TCheckBox |
240 |
+ |
Left = 249 |
241 |
+ |
Height = 22 |
242 |
+ |
Top = 235 |
243 |
+ |
Width = 158 |
244 |
+ |
Caption = 'Use Wire Compression' |
245 |
+ |
OnEditingDone = UseWireCompressionEditingDone |
246 |
+ |
TabOrder = 8 |
247 |
+ |
end |
248 |
+ |
end |
249 |
+ |
object Label7: TLabel |
250 |
+ |
Left = 24 |
251 |
+ |
Height = 14 |
252 |
+ |
Top = 56 |
253 |
+ |
Width = 43 |
254 |
+ |
Caption = '&Server:' |
255 |
+ |
FocusControl = ServerName |
256 |
+ |
ParentColor = False |
257 |
+ |
end |
258 |
+ |
object ServerName: TEdit |
259 |
+ |
Left = 24 |
260 |
+ |
Height = 24 |
261 |
+ |
Top = 74 |
262 |
+ |
Width = 144 |
263 |
+ |
TabOrder = 2 |
264 |
+ |
end |
265 |
+ |
object Label8: TLabel |
266 |
+ |
Left = 209 |
267 |
+ |
Height = 14 |
268 |
+ |
Top = 56 |
269 |
+ |
Width = 52 |
270 |
+ |
Caption = '&Protocol:' |
271 |
+ |
FocusControl = Protocol |
272 |
+ |
ParentColor = False |
273 |
+ |
end |
274 |
+ |
object Protocol: TComboBox |
275 |
+ |
Left = 209 |
276 |
+ |
Height = 27 |
277 |
+ |
Top = 74 |
278 |
+ |
Width = 120 |
279 |
+ |
ItemHeight = 0 |
280 |
+ |
ItemIndex = 4 |
281 |
+ |
Items.Strings = ( |
282 |
+ |
'TCP' |
283 |
+ |
'NamedPipe' |
284 |
+ |
'SPX' |
285 |
+ |
'Local' |
286 |
+ |
'inet' |
287 |
+ |
'inet4' |
288 |
+ |
'inet6' |
289 |
+ |
'wnet' |
290 |
+ |
'xnet' |
291 |
+ |
) |
292 |
+ |
OnCloseUp = ProtocolCloseUp |
293 |
+ |
TabOrder = 3 |
294 |
+ |
Text = 'inet' |
295 |
+ |
end |
296 |
+ |
object Label9: TLabel |
297 |
+ |
Left = 357 |
298 |
+ |
Height = 14 |
299 |
+ |
Top = 56 |
300 |
+ |
Width = 48 |
301 |
+ |
Caption = 'Port No.' |
302 |
+ |
ParentColor = False |
303 |
+ |
end |
304 |
+ |
object PortNo: TEdit |
305 |
+ |
Left = 357 |
306 |
+ |
Height = 24 |
307 |
+ |
Top = 77 |
308 |
+ |
Width = 48 |
309 |
+ |
TabOrder = 4 |
310 |
+ |
end |
311 |
+ |
object Label1: TLabel |
312 |
+ |
Left = 24 |
313 |
+ |
Height = 14 |
314 |
+ |
Top = 106 |
315 |
+ |
Width = 60 |
316 |
+ |
Caption = '&Database:' |
317 |
+ |
FocusControl = DatabasePath |
318 |
+ |
ParentColor = False |
319 |
+ |
end |
320 |
+ |
object DatabasePath: TEdit |
321 |
+ |
Left = 24 |
322 |
+ |
Height = 24 |
323 |
+ |
Top = 124 |
324 |
+ |
Width = 328 |
325 |
+ |
TabOrder = 5 |
326 |
+ |
end |
327 |
+ |
object Browse: TButton |
328 |
+ |
Left = 357 |
329 |
+ |
Height = 30 |
330 |
+ |
Top = 120 |
331 |
+ |
Width = 75 |
332 |
+ |
Caption = '&Browse' |
333 |
+ |
OnClick = BrowseClick |
334 |
+ |
TabOrder = 6 |
335 |
+ |
end |
336 |
+ |
object ConnectionTypeBtn: TRadioGroup |
337 |
+ |
Left = 24 |
338 |
+ |
Height = 41 |
339 |
+ |
Top = 10 |
340 |
+ |
Width = 408 |
341 |
+ |
AutoFill = True |
342 |
+ |
Caption = 'Connection' |
343 |
+ |
ChildSizing.LeftRightSpacing = 6 |
344 |
+ |
ChildSizing.EnlargeHorizontal = crsHomogenousChildResize |
345 |
+ |
ChildSizing.EnlargeVertical = crsHomogenousChildResize |
346 |
+ |
ChildSizing.ShrinkHorizontal = crsScaleChilds |
347 |
+ |
ChildSizing.ShrinkVertical = crsScaleChilds |
348 |
+ |
ChildSizing.Layout = cclLeftToRightThenTopToBottom |
349 |
+ |
ChildSizing.ControlsPerLine = 2 |
350 |
+ |
ClientHeight = 26 |
351 |
+ |
ClientWidth = 406 |
352 |
+ |
Columns = 2 |
353 |
+ |
ItemIndex = 0 |
354 |
+ |
Items.Strings = ( |
355 |
+ |
'Local' |
356 |
+ |
'Remote' |
357 |
+ |
) |
358 |
+ |
OnSelectionChanged = ConnectionTypeBtnSelectionChanged |
359 |
+ |
TabOrder = 7 |
360 |
|
end |
361 |
|
end |