1 |
object Form1: TForm1 |
2 |
Left = 363 |
3 |
Height = 339 |
4 |
Top = 171 |
5 |
Width = 487 |
6 |
Caption = 'Database Information' |
7 |
ClientHeight = 339 |
8 |
ClientWidth = 487 |
9 |
OnShow = FormShow |
10 |
LCLVersion = '1.6.4.0' |
11 |
object Memo1: TMemo |
12 |
Left = 12 |
13 |
Height = 302 |
14 |
Top = 18 |
15 |
Width = 461 |
16 |
Anchors = [akTop, akLeft, akRight, akBottom] |
17 |
Lines.Strings = ( |
18 |
'Memo1' |
19 |
) |
20 |
ReadOnly = True |
21 |
ScrollBars = ssAutoVertical |
22 |
TabOrder = 0 |
23 |
end |
24 |
object IBDatabase1: TIBDatabase |
25 |
Connected = False |
26 |
AfterConnect = IBDatabase1AfterConnect |
27 |
CreateIfNotExists = False |
28 |
AllowStreamedConnected = False |
29 |
DatabaseName = 'localhost:employee' |
30 |
Params.Strings = ( |
31 |
'lc_ctype=UTF8' |
32 |
'user_name=SYSDBA' |
33 |
) |
34 |
IdleTimer = 0 |
35 |
TraceFlags = [] |
36 |
UseDefaultSystemCodePage = False |
37 |
left = 280 |
38 |
top = 56 |
39 |
end |
40 |
object IBDatabaseInfo1: TIBDatabaseInfo |
41 |
Database = IBDatabase1 |
42 |
left = 328 |
43 |
top = 56 |
44 |
end |
45 |
end |