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 231 by tony, Mon Apr 16 08:32:21 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 = '1.8.3.0'
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
# Line 239 | Line 136 | object IBDatabaseEditForm: TIBDatabaseEd
136        Height = 124
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 = 209
216 +      Height = 22
217 +      Top = 200
218 +      Width = 229
219 +      Caption = 'Use System Default Character Set'
220 +      OnChange = UseSystemDefaultCSChange
221 +      TabOrder = 6
222 +    end
223 +  end
224 +  object Label7: TLabel
225 +    Left = 24
226 +    Height = 14
227 +    Top = 56
228 +    Width = 43
229 +    Caption = '&Server:'
230 +    FocusControl = ServerName
231 +    ParentColor = False
232 +  end
233 +  object ServerName: TEdit
234 +    Left = 24
235 +    Height = 24
236 +    Top = 74
237 +    Width = 144
238 +    TabOrder = 2
239 +  end
240 +  object Label8: TLabel
241 +    Left = 209
242 +    Height = 14
243 +    Top = 56
244 +    Width = 52
245 +    Caption = '&Protocol:'
246 +    FocusControl = Protocol
247 +    ParentColor = False
248 +  end
249 +  object Protocol: TComboBox
250 +    Left = 209
251 +    Height = 27
252 +    Top = 74
253 +    Width = 120
254 +    ItemHeight = 0
255 +    ItemIndex = 4
256 +    Items.Strings = (
257 +      'TCP'
258 +      'NamedPipe'
259 +      'SPX'
260 +      'Local'
261 +      'inet'
262 +      'inet4'
263 +      'inet6'
264 +      'wnet'
265 +      'xnet'
266 +    )
267 +    OnCloseUp = ProtocolCloseUp
268 +    TabOrder = 3
269 +    Text = 'inet'
270 +  end
271 +  object Label9: TLabel
272 +    Left = 357
273 +    Height = 14
274 +    Top = 56
275 +    Width = 48
276 +    Caption = 'Port No.'
277 +    ParentColor = False
278 +  end
279 +  object PortNo: TEdit
280 +    Left = 357
281 +    Height = 24
282 +    Top = 77
283 +    Width = 48
284 +    TabOrder = 4
285 +  end
286 +  object Label1: TLabel
287 +    Left = 24
288 +    Height = 14
289 +    Top = 106
290 +    Width = 60
291 +    Caption = '&Database:'
292 +    FocusControl = DatabasePath
293 +    ParentColor = False
294 +  end
295 +  object DatabasePath: TEdit
296 +    Left = 24
297 +    Height = 24
298 +    Top = 124
299 +    Width = 328
300 +    TabOrder = 5
301 +  end
302 +  object Browse: TButton
303 +    Left = 357
304 +    Height = 30
305 +    Top = 120
306 +    Width = 75
307 +    Caption = '&Browse'
308 +    OnClick = BrowseClick
309 +    TabOrder = 6
310 +  end
311 +  object ConnectionTypeBtn: TRadioGroup
312 +    Left = 24
313 +    Height = 41
314 +    Top = 10
315 +    Width = 408
316 +    AutoFill = True
317 +    Caption = 'Connection'
318 +    ChildSizing.LeftRightSpacing = 6
319 +    ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
320 +    ChildSizing.EnlargeVertical = crsHomogenousChildResize
321 +    ChildSizing.ShrinkHorizontal = crsScaleChilds
322 +    ChildSizing.ShrinkVertical = crsScaleChilds
323 +    ChildSizing.Layout = cclLeftToRightThenTopToBottom
324 +    ChildSizing.ControlsPerLine = 2
325 +    ClientHeight = 26
326 +    ClientWidth = 406
327 +    Columns = 2
328 +    ItemIndex = 0
329 +    Items.Strings = (
330 +      'Local'
331 +      'Remote'
332 +    )
333 +    OnSelectionChanged = ConnectionTypeBtnSelectionChanged
334 +    TabOrder = 7
335    end
336   end

Diff Legend

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