1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
|
object Form1: TForm1
Left = 238
Height = 523
Top = 145
Width = 609
Caption = 'Form1'
ClientHeight = 523
ClientWidth = 609
LCLVersion = '1.1'
object Host: TLabeledEdit
Left = 24
Height = 23
Top = 24
Width = 80
EditLabel.AnchorSideLeft.Control = Host
EditLabel.AnchorSideRight.Control = Host
EditLabel.AnchorSideRight.Side = asrBottom
EditLabel.AnchorSideBottom.Control = Host
EditLabel.Left = 24
EditLabel.Height = 16
EditLabel.Top = 5
EditLabel.Width = 80
EditLabel.Caption = 'Host'
EditLabel.ParentColor = False
TabOrder = 0
Text = '127.0.0.1'
end
object Port: TLabeledEdit
Left = 24
Height = 23
Top = 80
Width = 80
EditLabel.AnchorSideLeft.Control = Port
EditLabel.AnchorSideRight.Control = Port
EditLabel.AnchorSideRight.Side = asrBottom
EditLabel.AnchorSideBottom.Control = Port
EditLabel.Left = 24
EditLabel.Height = 16
EditLabel.Top = 61
EditLabel.Width = 80
EditLabel.Caption = 'Port'
EditLabel.ParentColor = False
TabOrder = 1
Text = '3050'
end
object User: TLabeledEdit
Left = 136
Height = 23
Top = 24
Width = 80
EditLabel.AnchorSideLeft.Control = User
EditLabel.AnchorSideRight.Control = User
EditLabel.AnchorSideRight.Side = asrBottom
EditLabel.AnchorSideBottom.Control = User
EditLabel.Left = 136
EditLabel.Height = 16
EditLabel.Top = 5
EditLabel.Width = 80
EditLabel.Caption = 'User'
EditLabel.ParentColor = False
TabOrder = 2
Text = 'SYSDBA'
end
object Password: TLabeledEdit
Left = 136
Height = 23
Top = 80
Width = 80
EditLabel.AnchorSideLeft.Control = Password
EditLabel.AnchorSideRight.Control = Password
EditLabel.AnchorSideRight.Side = asrBottom
EditLabel.AnchorSideBottom.Control = Password
EditLabel.Left = 136
EditLabel.Height = 16
EditLabel.Top = 61
EditLabel.Width = 80
EditLabel.Caption = 'Password'
EditLabel.ParentColor = False
TabOrder = 3
Text = 'masterkey'
end
object ConnectButton: TButton
Left = 276
Height = 25
Top = 80
Width = 75
Caption = 'Connect'
OnClick = ConnectButtonClick
TabOrder = 4
end
object OutputMemo: TMemo
Left = 22
Height = 337
Top = 137
Width = 577
ScrollBars = ssAutoBoth
TabOrder = 5
end
object FBAdmin1: TFBAdmin
Protocol = IBSPLOCAL
UseExceptions = False
left = 392
top = 16
end
end
|
