ViewVC Help
View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing
root/public/ibx/trunk/examples/dbInfo/Unit1.lfm
Revision: 268
Committed: Fri Dec 28 11:36:35 2018 UTC (5 years, 4 months ago) by tony
File size: 1825 byte(s)
Log Message:
Fixes merged

File Contents

# User Rev Content
1 tony 62 object Form1: TForm1
2 tony 267 Left = 839
3 tony 62 Height = 339
4 tony 267 Top = 239
5 tony 62 Width = 487
6     Caption = 'Database Information'
7     ClientHeight = 339
8     ClientWidth = 487
9 tony 68 DefaultMonitor = dmPrimary
10 tony 62 OnShow = FormShow
11 tony 68 Position = poScreenCenter
12 tony 263 LCLVersion = '2.0.0.2'
13 tony 62 object Memo1: TMemo
14     Left = 12
15     Height = 302
16     Top = 18
17     Width = 461
18     Anchors = [akTop, akLeft, akRight, akBottom]
19     Lines.Strings = (
20     'Memo1'
21     )
22     ReadOnly = True
23     ScrollBars = ssAutoVertical
24     TabOrder = 0
25     end
26     object IBDatabase1: TIBDatabase
27     Connected = False
28     AfterConnect = IBDatabase1AfterConnect
29     CreateIfNotExists = False
30     AllowStreamedConnected = False
31 tony 143 DatabaseName = 'employee'
32 tony 62 Params.Strings = (
33     'lc_ctype=UTF8'
34     'user_name=SYSDBA'
35     )
36 tony 268 ConfigOverrides.Strings = (
37     'WireCompression=true'
38     )
39 tony 62 IdleTimer = 0
40 tony 143 SQLDialect = 1
41 tony 62 TraceFlags = []
42     UseDefaultSystemCodePage = False
43 tony 143 left = 224
44 tony 62 top = 56
45     end
46     object IBDatabaseInfo1: TIBDatabaseInfo
47     Database = IBDatabase1
48     left = 328
49     top = 56
50     end
51 tony 82 object TableNameLookup: TIBQuery
52     AllowAutoActivateTransaction = False
53     Database = IBDatabase1
54     Transaction = IBTransaction1
55     BufferChunks = 1000
56     CachedUpdates = False
57 tony 263 EnableStatistics = False
58 tony 82 GenerateParamNames = False
59     GeneratorField.ApplyOnEvent = gaeOnNewRecord
60 tony 263 MasterDetailDelay = 0
61 tony 82 SQL.Strings = (
62     'SELECT r.RDB$RELATION_ID,'
63     ' trim(r.RDB$RELATION_NAME) as RDB$RELATION_NAME'
64     'FROM RDB$RELATIONS r'
65     )
66     Params = <>
67     DataSetCloseAction = dcDiscardChanges
68     left = 336
69     top = 128
70     end
71     object IBTransaction1: TIBTransaction
72     Active = False
73     DefaultDatabase = IBDatabase1
74     Params.Strings = (
75     'read'
76     'consistency'
77     )
78     left = 328
79     top = 212
80     end
81 tony 62 end