ViewVC Help
View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing
root/public/ibx/trunk/design/IBDatabaseEdit.lfm
(Generate patch)

Comparing ibx/trunk/design/IBDatabaseEdit.lfm (file contents):
Revision 39 by tony, Tue May 17 08:14:52 2016 UTC vs.
Revision 380 by tony, Mon Jan 10 10:13:17 2022 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

Comparing ibx/trunk/design/IBDatabaseEdit.lfm (property svn:eol-style):
Revision 39 by tony, Tue May 17 08:14:52 2016 UTC vs.
Revision 380 by tony, Mon Jan 10 10:13:17 2022 UTC

# Line 0 | Line 1
1 + native

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines