1 |
object ShutdownReqDlg: TShutdownReqDlg
|
2 |
Left = 1350
|
3 |
Height = 198
|
4 |
Top = 612
|
5 |
Width = 425
|
6 |
BorderStyle = bsDialog
|
7 |
Caption = 'Database Shutdown'
|
8 |
ClientHeight = 198
|
9 |
ClientWidth = 425
|
10 |
OnShow = FormShow
|
11 |
Position = poMainFormCenter
|
12 |
LCLVersion = '1.8.3.0'
|
13 |
object Bevel1: TBevel
|
14 |
Left = 8
|
15 |
Height = 176
|
16 |
Top = 8
|
17 |
Width = 328
|
18 |
Shape = bsFrame
|
19 |
end
|
20 |
object Label1: TLabel
|
21 |
Left = 24
|
22 |
Height = 14
|
23 |
Top = 24
|
24 |
Width = 95
|
25 |
Caption = 'Database Name'
|
26 |
ParentColor = False
|
27 |
end
|
28 |
object Label2: TLabel
|
29 |
Left = 24
|
30 |
Height = 14
|
31 |
Top = 152
|
32 |
Width = 119
|
33 |
Caption = '&Delay Shutdown for'
|
34 |
FocusControl = Delay
|
35 |
ParentColor = False
|
36 |
end
|
37 |
object Label3: TLabel
|
38 |
Left = 208
|
39 |
Height = 14
|
40 |
Top = 152
|
41 |
Width = 51
|
42 |
Caption = 'Seconds'
|
43 |
ParentColor = False
|
44 |
end
|
45 |
object OKBtn: TButton
|
46 |
Left = 344
|
47 |
Height = 28
|
48 |
Top = 8
|
49 |
Width = 75
|
50 |
Caption = 'OK'
|
51 |
Default = True
|
52 |
ModalResult = 1
|
53 |
TabOrder = 0
|
54 |
end
|
55 |
object CancelBtn: TButton
|
56 |
Left = 344
|
57 |
Height = 28
|
58 |
Top = 40
|
59 |
Width = 75
|
60 |
Cancel = True
|
61 |
Caption = 'Cancel'
|
62 |
ModalResult = 2
|
63 |
TabOrder = 1
|
64 |
end
|
65 |
object DatabaseName: TEdit
|
66 |
Left = 24
|
67 |
Height = 24
|
68 |
Top = 40
|
69 |
Width = 296
|
70 |
TabOrder = 2
|
71 |
Text = 'DatabaseName'
|
72 |
end
|
73 |
object ShutdownOptions: TRadioGroup
|
74 |
Left = 24
|
75 |
Height = 65
|
76 |
Top = 72
|
77 |
Width = 304
|
78 |
AutoFill = True
|
79 |
Caption = 'Options'
|
80 |
ChildSizing.LeftRightSpacing = 6
|
81 |
ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
|
82 |
ChildSizing.EnlargeVertical = crsHomogenousChildResize
|
83 |
ChildSizing.ShrinkHorizontal = crsScaleChilds
|
84 |
ChildSizing.ShrinkVertical = crsScaleChilds
|
85 |
ChildSizing.Layout = cclLeftToRightThenTopToBottom
|
86 |
ChildSizing.ControlsPerLine = 2
|
87 |
ClientHeight = 50
|
88 |
ClientWidth = 302
|
89 |
Columns = 2
|
90 |
ItemIndex = 0
|
91 |
Items.Strings = (
|
92 |
'&Forced '
|
93 |
'Deny &Transactions '
|
94 |
'Deny &Attachments '
|
95 |
)
|
96 |
TabOrder = 3
|
97 |
end
|
98 |
object Delay: TEdit
|
99 |
Left = 152
|
100 |
Height = 24
|
101 |
Top = 148
|
102 |
Width = 49
|
103 |
NumbersOnly = True
|
104 |
TabOrder = 4
|
105 |
Text = 'Delay'
|
106 |
end
|
107 |
end
|