ViewVC Help
View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing
root/public/ibx/trunk/iblocaldb/gui/IBXUpgradeDatabaseDlg.lfm
Revision: 272
Committed: Mon Feb 4 13:34:37 2019 UTC (5 years, 10 months ago) by tony
File size: 1706 byte(s)
Log Message:
Fixes merged

File Contents

# Content
1 object UpgradeDatabaseDlg: TUpgradeDatabaseDlg
2 Left = 528
3 Height = 132
4 Top = 302
5 Width = 324
6 ActiveControl = Panel1
7 BorderStyle = bsNone
8 Caption = 'UpdateDatabaseDlg'
9 ClientHeight = 132
10 ClientWidth = 324
11 OnShow = FormShow
12 Position = poMainFormCenter
13 LCLVersion = '2.0.0.3'
14 object Panel1: TPanel
15 Left = 0
16 Height = 132
17 Top = 0
18 Width = 324
19 Align = alClient
20 BorderStyle = bsSingle
21 ClientHeight = 130
22 ClientWidth = 322
23 TabOrder = 1
24 object Label1: TLabel
25 Left = 58
26 Height = 14
27 Top = 16
28 Width = 190
29 Caption = 'Updating Database Schema'
30 Font.Style = [fsBold]
31 ParentColor = False
32 ParentFont = False
33 end
34 object Status: TLabel
35 Left = 23
36 Height = 34
37 Top = 48
38 Width = 279
39 Alignment = taCenter
40 AutoSize = False
41 Caption = 'Status'
42 ParentColor = False
43 WordWrap = True
44 end
45 end
46 object ProgressBar1: TProgressBar
47 Left = 23
48 Height = 20
49 Top = 96
50 Width = 279
51 Smooth = True
52 TabOrder = 0
53 end
54 object Timer1: TTimer
55 Enabled = False
56 Interval = 200
57 OnTimer = HandleCompletionEvent
58 left = 270
59 top = 16
60 end
61 object IBXScript: TIBXScript
62 IgnoreGrants = True
63 IgnoreCreateDatabase = True
64 Transaction = UpdateTransaction
65 ShowAffectedRows = False
66 ShowPerformanceStats = False
67 OnOutputLog = IBXScriptLogProc
68 OnErrorLog = IBXScriptLogProc
69 OnProgressEvent = IBXScriptProgressEvent
70 left = 272
71 top = 48
72 end
73 object UpdateTransaction: TIBTransaction
74 Active = False
75 Params.Strings = (
76 'concurrency'
77 'wait'
78 )
79 left = 232
80 top = 48
81 end
82 end