ViewVC Help
View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing
root/public/ibx/trunk/examples/dbInfo/Unit1.lfm
Revision: 68
Committed: Tue Oct 17 10:07:58 2017 UTC (6 years, 5 months ago) by tony
File size: 997 byte(s)
Log Message:
IBX: Editor Positioning tidy up
FBINTF: Trap uninitialised SQL parameters on SQL Exec. Avoids Unknown SQL Type errors.
Consistent setting of Modified (SQLParam).

File Contents

# User Rev Content
1 tony 62 object Form1: TForm1
2 tony 68 Left = 389
3 tony 62 Height = 339
4 tony 68 Top = 220
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     LCLVersion = '1.8.0.4'
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     DatabaseName = 'localhost:employee'
32     Params.Strings = (
33     'lc_ctype=UTF8'
34     'user_name=SYSDBA'
35     )
36     IdleTimer = 0
37     TraceFlags = []
38     UseDefaultSystemCodePage = False
39     left = 280
40     top = 56
41     end
42     object IBDatabaseInfo1: TIBDatabaseInfo
43     Database = IBDatabase1
44     left = 328
45     top = 56
46     end
47     end