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 33 by tony, Sat Jul 18 12:30:52 2015 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.4.2.0'
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 257 | Line 155 | object IBDatabaseEditForm: TIBDatabaseEd
155        Width = 134
156        ItemHeight = 0
157        Items.Strings = (
158 <        'None'
159 <        'ASCII                          '
160 <        'BIG_5                          '
161 <        'CP943C                         '
162 <        'CYRL                           '
163 <        'DOS437                         '
164 <        'DOS737                         '
165 <        'DOS775                         '
166 <        'DOS850                         '
167 <        'DOS852                         '
168 <        'DOS857                         '
169 <        'DOS858                         '
170 <        'DOS860                         '
171 <        'DOS861                         '
172 <        'DOS862                         '
173 <        'DOS863                         '
174 <        'DOS864                         '
175 <        'DOS865                         '
176 <        'DOS866                         '
177 <        'DOS869                         '
178 <        'EUCJ_0208                      '
179 <        'GB18030                        '
180 <        'GBK                            '
181 <        'GB_2312                        '
182 <        'ISO8859_1                      '
183 <        'ISO8859_13                     '
184 <        'ISO8859_2                      '
185 <        'ISO8859_3                      '
186 <        'ISO8859_4                      '
187 <        'ISO8859_5                      '
188 <        'ISO8859_6                      '
189 <        'ISO8859_7                      '
190 <        'ISO8859_8                      '
191 <        'ISO8859_9                      '
192 <        'KOI8R                          '
193 <        'KOI8U                          '
194 <        'KSC_5601                       '
195 <        'NEXT                           '
196 <        'NONE                           '
197 <        'OCTETS                         '
198 <        'SJIS_0208                      '
199 <        'TIS620                         '
200 <        'UNICODE_FSS                    '
201 <        'UTF8                           '
202 <        'WIN1250                        '
203 <        'WIN1251                        '
204 <        'WIN1252                        '
205 <        'WIN1253                        '
206 <        'WIN1254                        '
207 <        'WIN1255                        '
208 <        'WIN1256                        '
209 <        'WIN1257                        '
312 <        'WIN1258                        '
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 >        '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
316 –      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

Diff Legend

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