ViewVC Help
View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing
root/public/ibx/trunk/examples/ibstoredproc/Unit2.lfm
Revision: 158
Committed: Thu Mar 1 11:23:33 2018 UTC (6 years, 8 months ago) by tony
File size: 876 byte(s)
Log Message:
Repository resync

File Contents

# User Rev Content
1 tony 158 object DBCreateForm: TDBCreateForm
2     Left = 1002
3     Height = 96
4     Top = 415
5     Width = 320
6     Caption = 'Please Wait'
7     ClientHeight = 96
8     ClientWidth = 320
9     FormStyle = fsSystemStayOnTop
10     OnShow = FormShow
11     Position = poScreenCenter
12     LCLVersion = '1.8.1.0'
13     object Panel1: TPanel
14     Left = 0
15     Height = 96
16     Top = 0
17     Width = 320
18     Align = alClient
19     BevelInner = bvLowered
20     Caption = 'Creating Database'
21     ClientHeight = 96
22     ClientWidth = 320
23     TabOrder = 0
24     object ProgressBar1: TProgressBar
25     Left = 40
26     Height = 20
27     Top = 64
28     Width = 232
29     Style = pbstMarquee
30     TabOrder = 0
31     end
32     end
33     object IBXScript1: TIBXScript
34     Database = Form1.IBDatabase1
35     IgnoreGrants = False
36     Transaction = Form1.IBTransaction1
37     ShowAffectedRows = False
38     ShowPerformanceStats = False
39     left = 264
40     top = 8
41     end
42     end