1 |
object IBXCreateDatabaseFromSQLDlg: TIBXCreateDatabaseFromSQLDlg
|
2 |
Left = 2028
|
3 |
Height = 111
|
4 |
Top = 371
|
5 |
Width = 255
|
6 |
BorderStyle = bsNone
|
7 |
Caption = 'IBXCreateDatabaseFromSQLDlg'
|
8 |
ClientHeight = 111
|
9 |
ClientWidth = 255
|
10 |
OnShow = FormShow
|
11 |
Position = poMainFormCenter
|
12 |
LCLVersion = '1.8.1.0'
|
13 |
object Bevel1: TBevel
|
14 |
Left = 0
|
15 |
Height = 111
|
16 |
Top = 0
|
17 |
Width = 255
|
18 |
Align = alClient
|
19 |
end
|
20 |
object Label1: TLabel
|
21 |
Left = 55
|
22 |
Height = 13
|
23 |
Top = 24
|
24 |
Width = 143
|
25 |
Caption = 'Creating New Database'
|
26 |
Font.Color = clWindowText
|
27 |
Font.Height = -11
|
28 |
Font.Name = 'Tahoma'
|
29 |
Font.Style = [fsBold]
|
30 |
ParentColor = False
|
31 |
ParentFont = False
|
32 |
end
|
33 |
object ProgressBar: TProgressBar
|
34 |
Left = 21
|
35 |
Height = 20
|
36 |
Top = 56
|
37 |
Width = 211
|
38 |
Smooth = True
|
39 |
Step = 1
|
40 |
TabOrder = 0
|
41 |
end
|
42 |
object IBXScript: TIBXScript
|
43 |
AutoDDL = False
|
44 |
Echo = False
|
45 |
IgnoreGrants = False
|
46 |
ShowAffectedRows = False
|
47 |
ShowPerformanceStats = False
|
48 |
OnProgressEvent = IBXScriptProgressEvent
|
49 |
OnCreateDatabase = IBXScriptCreateDatabase
|
50 |
left = 211
|
51 |
top = 11
|
52 |
end
|
53 |
end
|