trunk/design/IBDatabaseEdit.lfm

object IBDatabaseEditForm: TIBDatabaseEditForm
  Left = 488
  Height = 517
  Top = 125
  Width = 462
  BorderStyle = bsDialog
  BorderWidth = 5
  Caption = 'Database Connection Editor'
  ClientHeight = 517
  ClientWidth = 462
  HelpFile = 'ibx.hlp'
  OnCreate = FormCreate
  ParentFont = True
  Position = poScreenCenter
  LCLVersion = '2.0.0.2'
  object Panel1: TPanel
    Left = 5
    Height = 36
    Top = 476
    Width = 452
    Align = alBottom
    BevelOuter = bvNone
    ClientHeight = 36
    ClientWidth = 452
    TabOrder = 1
    object OKBtn: TButton
      Left = 83
      Height = 30
      Top = 6
      Width = 75
      Caption = '&OK'
      Default = True
      OnClick = OKBtnClick
      TabOrder = 0
    end
    object CancelBtn: TButton
      Left = 164
      Height = 30
      Top = 7
      Width = 74
      Cancel = True
      Caption = 'Cancel'
      ModalResult = 2
      TabOrder = 1
    end
    object Test: TButton
      Left = 244
      Height = 30
      Top = 6
      Width = 75
      Caption = '&Test'
      OnClick = TestClick
      TabOrder = 2
    end
  end
  object GroupBox1: TGroupBox
    Left = 5
    Height = 316
    Top = 160
    Width = 452
    Caption = 'Database Parameters'
    ClientHeight = 301
    ClientWidth = 450
    TabOrder = 0
    object Label2: TLabel
      Left = 24
      Height = 14
      Top = 9
      Width = 70
      Caption = '&User Name:'
      FocusControl = UserName
      ParentColor = False
    end
    object Label3: TLabel
      Left = 24
      Height = 14
      Top = 65
      Width = 59
      Caption = 'Pass&word:'
      FocusControl = Password
      ParentColor = False
    end
    object Label4: TLabel
      Left = 24
      Height = 14
      Top = 121
      Width = 52
      Caption = 'S&QLRole:'
      FocusControl = SQLRole
      ParentColor = False
    end
    object Label5: TLabel
      Left = 249
      Height = 14
      Top = 9
      Width = 54
      Caption = 'Se&ttings:'
      FocusControl = DatabaseParams
      ParentColor = False
    end
    object Label6: TLabel
      Left = 24
      Height = 14
      Top = 177
      Width = 87
      Caption = '&Character Set:'
      FocusControl = CharacterSet
      ParentColor = False
    end
    object UserName: TEdit
      Left = 24
      Height = 24
      Top = 27
      Width = 137
      OnEditingDone = UserNameEditingDone
      TabOrder = 0
    end
    object Password: TEdit
      Left = 24
      Height = 24
      Top = 83
      Width = 137
      OnEditingDone = PasswordEditingDone
      TabOrder = 1
    end
    object SQLRole: TEdit
      Left = 24
      Height = 24
      Top = 139
      Width = 134
      OnEditingDone = SQLRoleEditingDone
      TabOrder = 2
    end
    object DatabaseParams: TMemo
      Left = 249
      Height = 80
      Top = 27
      Width = 183
      OnEditingDone = DatabaseParamsEditingDone
      ScrollBars = ssAutoVertical
      TabOrder = 5
    end
    object LoginPrompt: TCheckBox
      Left = 24
      Height = 22
      Top = 235
      Width = 105
      Caption = 'Lo&gin Prompt'
      TabOrder = 4
    end
    object CharacterSet: TComboBox
      Left = 24
      Height = 27
      Top = 195
      Width = 134
      ItemHeight = 0
      Items.Strings = (
        'ASCII'
        'BIG_5'
        'CP943C'
        'CYRL'
        'DOS437'
        'DOS737'
        'DOS775'
        'DOS850'
        'DOS852'
        'DOS857'
        'DOS858'
        'DOS860'
        'DOS861'
        'DOS862'
        'DOS863'
        'DOS864'
        'DOS865'
        'DOS866'
        'DOS869'
        'EUCJ_0208'
        'GB18030'
        'GBK'
        'GB_2312'
        'ISO8859_1'
        'ISO8859_13'
        'ISO8859_2'
        'ISO8859_3'
        'ISO8859_4'
        'ISO8859_5'
        'ISO8859_6'
        'ISO8859_7'
        'ISO8859_8'
        'ISO8859_9'
        'KOI8R'
        'KOI8U'
        'KSC_5601'
        'NEXT'
        'NONE'
        'OCTETS'
        'SJIS_0208'
        'TIS620'
        'UNICODE_FSS'
        'UTF8'
        'WIN1250'
        'WIN1251'
        'WIN1252'
        'WIN1253'
        'WIN1254'
        'WIN1255'
        'WIN1256'
        'WIN1257'
        'WIN1258'
      )
      OnChange = CharacterSetChange
      TabOrder = 3
    end
    object UseSystemDefaultCS: TCheckBox
      Left = 24
      Height = 22
      Top = 264
      Width = 229
      Caption = 'Use System Default Character Set'
      OnChange = UseSystemDefaultCSChange
      TabOrder = 6
    end
    object Label10: TLabel
      Left = 249
      Height = 14
      Top = 121
      Width = 123
      Caption = 'Config File Overrides'
      ParentColor = False
    end
    object ConfigOverrides: TMemo
      Left = 249
      Height = 86
      Top = 136
      Width = 182
      OnEditingDone = ConfigOverridesEditingDone
      TabOrder = 7
    end
    object UseWireCompression: TCheckBox
      Left = 249
      Height = 22
      Top = 235
      Width = 158
      Caption = 'Use Wire Compression'
      OnEditingDone = UseWireCompressionEditingDone
      TabOrder = 8
    end
  end
  object Label7: TLabel
    Left = 24
    Height = 14
    Top = 56
    Width = 43
    Caption = '&Server:'
    FocusControl = ServerName
    ParentColor = False
  end
  object ServerName: TEdit
    Left = 24
    Height = 24
    Top = 74
    Width = 144
    TabOrder = 2
  end
  object Label8: TLabel
    Left = 209
    Height = 14
    Top = 56
    Width = 52
    Caption = '&Protocol:'
    FocusControl = Protocol
    ParentColor = False
  end
  object Protocol: TComboBox
    Left = 209
    Height = 27
    Top = 74
    Width = 120
    ItemHeight = 0
    ItemIndex = 4
    Items.Strings = (
      'TCP'
      'NamedPipe'
      'SPX'
      'Local'
      'inet'
      'inet4'
      'inet6'
      'wnet'
      'xnet'
    )
    OnCloseUp = ProtocolCloseUp
    TabOrder = 3
    Text = 'inet'
  end
  object Label9: TLabel
    Left = 357
    Height = 14
    Top = 56
    Width = 48
    Caption = 'Port No.'
    ParentColor = False
  end
  object PortNo: TEdit
    Left = 357
    Height = 24
    Top = 77
    Width = 48
    TabOrder = 4
  end
  object Label1: TLabel
    Left = 24
    Height = 14
    Top = 106
    Width = 60
    Caption = '&Database:'
    FocusControl = DatabasePath
    ParentColor = False
  end
  object DatabasePath: TEdit
    Left = 24
    Height = 24
    Top = 124
    Width = 328
    TabOrder = 5
  end
  object Browse: TButton
    Left = 357
    Height = 30
    Top = 120
    Width = 75
    Caption = '&Browse'
    OnClick = BrowseClick
    TabOrder = 6
  end
  object ConnectionTypeBtn: TRadioGroup
    Left = 24
    Height = 41
    Top = 10
    Width = 408
    AutoFill = True
    Caption = 'Connection'
    ChildSizing.LeftRightSpacing = 6
    ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
    ChildSizing.EnlargeVertical = crsHomogenousChildResize
    ChildSizing.ShrinkHorizontal = crsScaleChilds
    ChildSizing.ShrinkVertical = crsScaleChilds
    ChildSizing.Layout = cclLeftToRightThenTopToBottom
    ChildSizing.ControlsPerLine = 2
    ClientHeight = 26
    ClientWidth = 406
    Columns = 2
    ItemIndex = 0
    Items.Strings = (
      'Local'
      'Remote'
    )
    OnSelectionChanged = ConnectionTypeBtnSelectionChanged
    TabOrder = 7
  end
end
Revision:	267
Committed:	Fri Dec 28 10:44:23 2018 UTC (5 years, 11 months ago) by tony
File size:	7221 byte(s)
Log Message:	Fixes Merged
#	User	Rev	Content
1	tony	5	object IBDatabaseEditForm: TIBDatabaseEditForm
2	tony	7	Left = 488
3			Height = 517
4	tony	5	Top = 125
5			Width = 462
6			BorderStyle = bsDialog
7			BorderWidth = 5
8	tony	231	Caption = 'Database Connection Editor'
9	tony	7	ClientHeight = 517
10	tony	5	ClientWidth = 462
11			HelpFile = 'ibx.hlp'
12			OnCreate = FormCreate
13			ParentFont = True
14			Position = poScreenCenter
15	tony	267	LCLVersion = '2.0.0.2'
16	tony	5	object Panel1: TPanel
17			Left = 5
18			Height = 36
19	tony	7	Top = 476
20	tony	5	Width = 452
21			Align = alBottom
22			BevelOuter = bvNone
23			ClientHeight = 36
24			ClientWidth = 452
25	tony	231	TabOrder = 1
26	tony	5	object OKBtn: TButton
27	tony	7	Left = 83
28			Height = 30
29			Top = 6
30	tony	5	Width = 75
31	tony	7	Caption = '&OK'
32	tony	5	Default = True
33			OnClick = OKBtnClick
34			TabOrder = 0
35			end
36			object CancelBtn: TButton
37	tony	7	Left = 164
38			Height = 30
39	tony	5	Top = 7
40			Width = 74
41			Cancel = True
42			Caption = 'Cancel'
43			ModalResult = 2
44			TabOrder = 1
45			end
46			object Test: TButton
47	tony	7	Left = 244
48			Height = 30
49	tony	5	Top = 6
50			Width = 75
51			Caption = '&Test'
52			OnClick = TestClick
53			TabOrder = 2
54			end
55			end
56			object GroupBox1: TGroupBox
57			Left = 5
58	tony	231	Height = 316
59			Top = 160
60	tony	5	Width = 452
61			Caption = 'Database Parameters'
62	tony	231	ClientHeight = 301
63	tony	33	ClientWidth = 450
64	tony	231	TabOrder = 0
65	tony	5	object Label2: TLabel
66	tony	7	Left = 24
67	tony	67	Height = 14
68	tony	7	Top = 9
69	tony	33	Width = 70
70	tony	5	Caption = '&User Name:'
71			FocusControl = UserName
72			ParentColor = False
73			end
74			object Label3: TLabel
75	tony	7	Left = 24
76	tony	67	Height = 14
77	tony	7	Top = 65
78	tony	33	Width = 59
79	tony	5	Caption = 'Pass&word:'
80			FocusControl = Password
81			ParentColor = False
82			end
83			object Label4: TLabel
84			Left = 24
85	tony	67	Height = 14
86	tony	7	Top = 121
87	tony	33	Width = 52
88	tony	5	Caption = 'S&QLRole:'
89			FocusControl = SQLRole
90			ParentColor = False
91			end
92			object Label5: TLabel
93			Left = 249
94	tony	67	Height = 14
95	tony	7	Top = 9
96	tony	33	Width = 54
97	tony	5	Caption = 'Se&ttings:'
98			FocusControl = DatabaseParams
99			ParentColor = False
100			end
101			object Label6: TLabel
102	tony	7	Left = 24
103	tony	67	Height = 14
104	tony	7	Top = 177
105	tony	33	Width = 87
106	tony	5	Caption = '&Character Set:'
107			FocusControl = CharacterSet
108			ParentColor = False
109			end
110			object UserName: TEdit
111			Left = 24
112	tony	67	Height = 24
113	tony	7	Top = 27
114	tony	5	Width = 137
115	tony	231	OnEditingDone = UserNameEditingDone
116	tony	5	TabOrder = 0
117			end
118			object Password: TEdit
119	tony	7	Left = 24
120	tony	67	Height = 24
121	tony	7	Top = 83
122	tony	5	Width = 137
123	tony	231	OnEditingDone = PasswordEditingDone
124	tony	5	TabOrder = 1
125			end
126			object SQLRole: TEdit
127	tony	7	Left = 24
128	tony	67	Height = 24
129	tony	7	Top = 139
130	tony	5	Width = 134
131	tony	231	OnEditingDone = SQLRoleEditingDone
132	tony	5	TabOrder = 2
133			end
134			object DatabaseParams: TMemo
135	tony	7	Left = 249
136	tony	267	Height = 80
137	tony	7	Top = 27
138	tony	5	Width = 183
139	tony	231	OnEditingDone = DatabaseParamsEditingDone
140	tony	7	ScrollBars = ssAutoVertical
141	tony	5	TabOrder = 5
142			end
143			object LoginPrompt: TCheckBox
144	tony	7	Left = 24
145	tony	5	Height = 22
146	tony	7	Top = 235
147	tony	33	Width = 105
148	tony	5	Caption = 'Lo&gin Prompt'
149			TabOrder = 4
150			end
151			object CharacterSet: TComboBox
152	tony	7	Left = 24
153	tony	33	Height = 27
154	tony	7	Top = 195
155	tony	5	Width = 134
156			ItemHeight = 0
157			Items.Strings = (
158	tony	39	'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	tony	5	)
211	tony	7	OnChange = CharacterSetChange
212	tony	5	TabOrder = 3
213			end
214	tony	39	object UseSystemDefaultCS: TCheckBox
215	tony	267	Left = 24
216	tony	39	Height = 22
217	tony	267	Top = 264
218	tony	39	Width = 229
219			Caption = 'Use System Default Character Set'
220			OnChange = UseSystemDefaultCSChange
221			TabOrder = 6
222			end
223	tony	267	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	tony	5	end
249	tony	231	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	tony	5	end