ViewVC Help

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

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

Comparing ibx/trunk/design/IBDatabaseEdit.lfm (file contents):
Revision 39 by tony, Tue May 17 08:14:52 2016 UTC vs.
Revision 267 by tony, Fri Dec 28 10:44:23 2018 UTC

#	Line 3 | Line 3 | object IBDatabaseEditForm: TIBDatabaseEd
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 = '1.6.0.4'
15	>	LCLVersion = '2.0.0.2'
16		object Panel1: TPanel
17		Left = 5
18		Height = 36
#	Line 23 | Line 22 | object IBDatabaseEditForm: TIBDatabaseEd
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
#	Line 54 | Line 53 | object IBDatabaseEditForm: TIBDatabaseEd
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 = 163
65	–	ClientWidth = 450
66	–	TabOrder = 0
67	–	object Label1: TLabel
68	–	Left = 24
69	–	Height = 15
70	–	Top = 98
71	–	Width = 60
72	–	Caption = '&Database:'
73	–	FocusControl = DatabaseName
74	–	ParentColor = False
75	–	end
76	–	object Label7: TLabel
77	–	Left = 24
78	–	Height = 15
79	–	Top = 48
80	–	Width = 43
81	–	Caption = '&Server:'
82	–	Enabled = False
83	–	FocusControl = ServerName
84	–	ParentColor = False
85	–	end
86	–	object Label8: TLabel
87	–	Left = 209
88	–	Height = 15
89	–	Top = 48
90	–	Width = 52
91	–	Caption = '&Protocol:'
92	–	Enabled = False
93	–	FocusControl = Protocol
94	–	ParentColor = False
95	–	end
96	–	object DatabaseName: TEdit
97	–	Left = 24
98	–	Height = 25
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 = 55
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 = 69
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 = 25
135	–	Top = 66
136	–	Width = 144
137	–	Enabled = False
138	–	TabOrder = 3
139	–	end
140	–	object Protocol: TComboBox
141	–	Left = 209
142	–	Height = 27
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 = 276
62	>	ClientHeight = 301
63		ClientWidth = 450
64	<	TabOrder = 1
64	>	TabOrder = 0
65		object Label2: TLabel
66		Left = 24
67	<	Height = 15
67	>	Height = 14
68		Top = 9
69		Width = 70
70		Caption = '&User Name:'
#	Line 173 | Line 73 | object IBDatabaseEditForm: TIBDatabaseEd
73		end
74		object Label3: TLabel
75		Left = 24
76	<	Height = 15
76	>	Height = 14
77		Top = 65
78		Width = 59
79		Caption = 'Pass&word:'
#	Line 182 | Line 82 | object IBDatabaseEditForm: TIBDatabaseEd
82		end
83		object Label4: TLabel
84		Left = 24
85	<	Height = 15
85	>	Height = 14
86		Top = 121
87		Width = 52
88		Caption = 'S&QLRole:'
#	Line 191 | Line 91 | object IBDatabaseEditForm: TIBDatabaseEd
91		end
92		object Label5: TLabel
93		Left = 249
94	<	Height = 15
94	>	Height = 14
95		Top = 9
96		Width = 54
97		Caption = 'Se&ttings:'
#	Line 200 | Line 100 | object IBDatabaseEditForm: TIBDatabaseEd
100		end
101		object Label6: TLabel
102		Left = 24
103	<	Height = 15
103	>	Height = 14
104		Top = 177
105		Width = 87
106		Caption = '&Character Set:'
#	Line 209 | Line 109 | object IBDatabaseEditForm: TIBDatabaseEd
109		end
110		object UserName: TEdit
111		Left = 24
112	<	Height = 25
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 = 25
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 = 25
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
#	Line 256 | Line 154 | object IBDatabaseEditForm: TIBDatabaseEd
154		Top = 195
155		Width = 134
156		ItemHeight = 0
259	–	ItemIndex = 0
157		Items.Strings = (
261	–	'None'
158		'ASCII'
159		'BIG_5'
160		'CP943C'
#	Line 314 | Line 210 | object IBDatabaseEditForm: TIBDatabaseEd
210		)
211		OnChange = CharacterSetChange
212		TabOrder = 3
317	–	Text = 'None'
213		end
214		object UseSystemDefaultCS: TCheckBox
215	<	Left = 209
215	>	Left = 24
216		Height = 22
217	<	Top = 200
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

Diff Legend

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