2020-03-30 18:01:44 +00:00
|
|
|
object BlkMregFrm: TBlkMregFrm
|
|
|
|
Left = 503
|
|
|
|
Height = 451
|
|
|
|
Top = 292
|
|
|
|
Width = 465
|
2020-05-26 14:51:03 +00:00
|
|
|
HelpType = htKeyword
|
|
|
|
HelpKeyword = 'BlockEntryMultipleRegression.htm'
|
2020-03-30 18:01:44 +00:00
|
|
|
AutoSize = True
|
|
|
|
Caption = 'Block Entry Multiple Regression'
|
|
|
|
ClientHeight = 451
|
|
|
|
ClientWidth = 465
|
|
|
|
OnActivate = FormActivate
|
|
|
|
OnCreate = FormCreate
|
|
|
|
OnShow = FormShow
|
|
|
|
Position = poMainFormCenter
|
|
|
|
LCLVersion = '2.1.0.0'
|
|
|
|
object Label1: TLabel
|
|
|
|
AnchorSideLeft.Control = Owner
|
|
|
|
AnchorSideTop.Control = Bevel3
|
|
|
|
AnchorSideTop.Side = asrBottom
|
|
|
|
Left = 8
|
|
|
|
Height = 15
|
|
|
|
Top = 48
|
|
|
|
Width = 97
|
|
|
|
BorderSpacing.Left = 8
|
|
|
|
BorderSpacing.Top = 8
|
|
|
|
Caption = 'Available Variables'
|
|
|
|
ParentColor = False
|
|
|
|
end
|
|
|
|
object Label2: TLabel
|
|
|
|
AnchorSideLeft.Control = DepVar
|
|
|
|
AnchorSideTop.Side = asrBottom
|
|
|
|
AnchorSideBottom.Control = DepVar
|
|
|
|
Left = 263
|
|
|
|
Height = 15
|
|
|
|
Top = 77
|
|
|
|
Width = 102
|
|
|
|
Anchors = [akLeft, akBottom]
|
|
|
|
BorderSpacing.Top = 8
|
|
|
|
BorderSpacing.Bottom = 2
|
|
|
|
Caption = 'Dependent Variable'
|
|
|
|
ParentColor = False
|
|
|
|
end
|
|
|
|
object Label3: TLabel
|
|
|
|
AnchorSideLeft.Control = BlockList
|
|
|
|
Left = 263
|
|
|
|
Height = 15
|
|
|
|
Top = 144
|
|
|
|
Width = 166
|
|
|
|
Caption = 'Independent Var.s for this block'
|
|
|
|
ParentColor = False
|
|
|
|
end
|
|
|
|
object Label4: TLabel
|
|
|
|
AnchorSideLeft.Control = Owner
|
|
|
|
AnchorSideTop.Control = BlockNoEdit
|
|
|
|
AnchorSideTop.Side = asrCenter
|
|
|
|
AnchorSideRight.Control = BlockNoEdit
|
|
|
|
Left = 8
|
|
|
|
Height = 15
|
|
|
|
Top = 12
|
|
|
|
Width = 54
|
|
|
|
BorderSpacing.Left = 8
|
|
|
|
BorderSpacing.Right = 8
|
|
|
|
Caption = 'Block No. '
|
|
|
|
ParentColor = False
|
|
|
|
end
|
|
|
|
object Label5: TLabel
|
|
|
|
AnchorSideLeft.Control = NextBlkBtn
|
|
|
|
AnchorSideLeft.Side = asrBottom
|
|
|
|
AnchorSideTop.Control = InProb
|
|
|
|
AnchorSideTop.Side = asrCenter
|
|
|
|
AnchorSideRight.Control = InProb
|
|
|
|
Left = 218
|
|
|
|
Height = 15
|
|
|
|
Top = 13
|
|
|
|
Width = 187
|
|
|
|
Alignment = taRightJustify
|
|
|
|
Anchors = [akTop, akLeft, akRight]
|
|
|
|
BorderSpacing.Right = 8
|
|
|
|
Caption = 'Minimum Prob. to enter block:'
|
|
|
|
ParentColor = False
|
|
|
|
WordWrap = True
|
|
|
|
end
|
|
|
|
object VarList: TListBox
|
|
|
|
AnchorSideLeft.Control = Owner
|
|
|
|
AnchorSideTop.Control = Label1
|
|
|
|
AnchorSideTop.Side = asrBottom
|
|
|
|
AnchorSideRight.Control = AllBtn
|
|
|
|
AnchorSideBottom.Control = GroupBox1
|
|
|
|
Left = 8
|
|
|
|
Height = 220
|
|
|
|
Top = 65
|
|
|
|
Width = 193
|
|
|
|
Anchors = [akTop, akLeft, akRight, akBottom]
|
|
|
|
BorderSpacing.Left = 8
|
|
|
|
BorderSpacing.Top = 2
|
|
|
|
BorderSpacing.Right = 8
|
|
|
|
BorderSpacing.Bottom = 8
|
|
|
|
Constraints.MinHeight = 220
|
|
|
|
ItemHeight = 0
|
|
|
|
MultiSelect = True
|
2020-04-04 23:26:20 +00:00
|
|
|
OnSelectionChange = VarListSelectionChange
|
2020-03-30 18:01:44 +00:00
|
|
|
TabOrder = 3
|
|
|
|
end
|
|
|
|
object DepInBtn: TBitBtn
|
|
|
|
AnchorSideLeft.Control = AllBtn
|
|
|
|
AnchorSideLeft.Side = asrCenter
|
|
|
|
AnchorSideTop.Control = VarList
|
|
|
|
Left = 217
|
|
|
|
Height = 28
|
|
|
|
Top = 69
|
|
|
|
Width = 28
|
|
|
|
Anchors = [akTop]
|
|
|
|
BorderSpacing.Top = 4
|
|
|
|
Images = MainDataModule.ImageList
|
|
|
|
ImageIndex = 1
|
|
|
|
OnClick = DepInBtnClick
|
|
|
|
Spacing = 0
|
|
|
|
TabOrder = 4
|
|
|
|
end
|
|
|
|
object DepOutBtn: TBitBtn
|
|
|
|
AnchorSideLeft.Control = AllBtn
|
|
|
|
AnchorSideLeft.Side = asrCenter
|
|
|
|
AnchorSideTop.Control = DepInBtn
|
|
|
|
AnchorSideTop.Side = asrBottom
|
|
|
|
Left = 218
|
|
|
|
Height = 28
|
|
|
|
Top = 101
|
|
|
|
Width = 28
|
|
|
|
BorderSpacing.Top = 4
|
|
|
|
Images = MainDataModule.ImageList
|
|
|
|
ImageIndex = 0
|
|
|
|
OnClick = DepOutBtnClick
|
|
|
|
Spacing = 0
|
|
|
|
TabOrder = 5
|
|
|
|
end
|
|
|
|
object InBtn: TBitBtn
|
|
|
|
AnchorSideLeft.Control = AllBtn
|
|
|
|
AnchorSideLeft.Side = asrCenter
|
|
|
|
AnchorSideBottom.Control = OutBtn
|
|
|
|
Left = 218
|
|
|
|
Height = 28
|
|
|
|
Top = 174
|
|
|
|
Width = 28
|
|
|
|
Anchors = [akLeft, akBottom]
|
|
|
|
BorderSpacing.Bottom = 4
|
|
|
|
Images = MainDataModule.ImageList
|
|
|
|
ImageIndex = 1
|
|
|
|
OnClick = InBtnClick
|
|
|
|
Spacing = 0
|
|
|
|
TabOrder = 7
|
|
|
|
end
|
|
|
|
object OutBtn: TBitBtn
|
|
|
|
AnchorSideLeft.Control = AllBtn
|
|
|
|
AnchorSideLeft.Side = asrCenter
|
|
|
|
AnchorSideTop.Control = BlockList
|
|
|
|
AnchorSideTop.Side = asrCenter
|
|
|
|
Left = 218
|
|
|
|
Height = 28
|
|
|
|
Top = 206
|
|
|
|
Width = 28
|
|
|
|
Images = MainDataModule.ImageList
|
|
|
|
ImageIndex = 0
|
|
|
|
OnClick = OutBtnClick
|
|
|
|
Spacing = 0
|
|
|
|
TabOrder = 8
|
|
|
|
end
|
|
|
|
object AllBtn: TBitBtn
|
|
|
|
AnchorSideLeft.Control = Owner
|
|
|
|
AnchorSideLeft.Side = asrCenter
|
|
|
|
AnchorSideTop.Control = OutBtn
|
|
|
|
AnchorSideTop.Side = asrBottom
|
|
|
|
Left = 209
|
|
|
|
Height = 25
|
|
|
|
Top = 244
|
|
|
|
Width = 46
|
|
|
|
AutoSize = True
|
|
|
|
BorderSpacing.Top = 10
|
|
|
|
Caption = 'ALL'
|
|
|
|
OnClick = AllBtnClick
|
|
|
|
Spacing = 0
|
|
|
|
TabOrder = 9
|
|
|
|
end
|
|
|
|
object DepVar: TEdit
|
|
|
|
AnchorSideLeft.Control = AllBtn
|
|
|
|
AnchorSideLeft.Side = asrBottom
|
|
|
|
AnchorSideTop.Side = asrBottom
|
|
|
|
AnchorSideRight.Control = Owner
|
|
|
|
AnchorSideRight.Side = asrBottom
|
|
|
|
AnchorSideBottom.Control = DepOutBtn
|
|
|
|
AnchorSideBottom.Side = asrBottom
|
|
|
|
Left = 263
|
|
|
|
Height = 23
|
|
|
|
Top = 94
|
|
|
|
Width = 194
|
|
|
|
Anchors = [akLeft, akRight, akBottom]
|
|
|
|
BorderSpacing.Left = 8
|
|
|
|
BorderSpacing.Top = 2
|
|
|
|
BorderSpacing.Right = 8
|
|
|
|
BorderSpacing.Bottom = 12
|
2020-04-04 23:26:20 +00:00
|
|
|
ReadOnly = True
|
2020-03-30 18:01:44 +00:00
|
|
|
TabOrder = 6
|
|
|
|
Text = 'DepVar'
|
|
|
|
end
|
|
|
|
object BlockList: TListBox
|
|
|
|
AnchorSideLeft.Control = AllBtn
|
|
|
|
AnchorSideLeft.Side = asrBottom
|
|
|
|
AnchorSideTop.Control = Label3
|
|
|
|
AnchorSideTop.Side = asrBottom
|
|
|
|
AnchorSideRight.Control = Owner
|
|
|
|
AnchorSideRight.Side = asrBottom
|
|
|
|
AnchorSideBottom.Control = GroupBox1
|
|
|
|
Left = 263
|
|
|
|
Height = 119
|
|
|
|
Top = 161
|
|
|
|
Width = 194
|
|
|
|
Anchors = [akTop, akLeft, akRight, akBottom]
|
|
|
|
BorderSpacing.Left = 8
|
|
|
|
BorderSpacing.Top = 2
|
|
|
|
BorderSpacing.Right = 8
|
|
|
|
BorderSpacing.Bottom = 8
|
|
|
|
ItemHeight = 0
|
2020-04-04 23:26:20 +00:00
|
|
|
MultiSelect = True
|
|
|
|
OnSelectionChange = VarListSelectionChange
|
2020-03-30 18:01:44 +00:00
|
|
|
TabOrder = 10
|
|
|
|
end
|
|
|
|
object BlockNoEdit: TEdit
|
|
|
|
AnchorSideLeft.Control = Label4
|
|
|
|
AnchorSideLeft.Side = asrBottom
|
|
|
|
AnchorSideTop.Control = Owner
|
|
|
|
AnchorSideRight.Control = NextBlkBtn
|
|
|
|
Left = 70
|
|
|
|
Height = 23
|
|
|
|
Top = 8
|
|
|
|
Width = 37
|
|
|
|
Alignment = taRightJustify
|
|
|
|
BorderSpacing.Left = 8
|
|
|
|
BorderSpacing.Top = 8
|
|
|
|
BorderSpacing.Right = 8
|
|
|
|
TabOrder = 0
|
|
|
|
Text = 'BlockNoEdit'
|
|
|
|
end
|
|
|
|
object NextBlkBtn: TButton
|
|
|
|
AnchorSideLeft.Control = BlockNoEdit
|
|
|
|
AnchorSideLeft.Side = asrBottom
|
|
|
|
AnchorSideTop.Control = BlockNoEdit
|
|
|
|
AnchorSideRight.Control = Owner
|
|
|
|
AnchorSideRight.Side = asrBottom
|
|
|
|
Left = 127
|
|
|
|
Height = 25
|
|
|
|
Top = 8
|
|
|
|
Width = 83
|
|
|
|
AutoSize = True
|
|
|
|
BorderSpacing.Left = 20
|
|
|
|
BorderSpacing.Right = 8
|
|
|
|
Caption = 'Next Block'
|
|
|
|
OnClick = NextBlkBtnClick
|
|
|
|
TabOrder = 1
|
|
|
|
end
|
|
|
|
object InProb: TEdit
|
|
|
|
AnchorSideTop.Control = NextBlkBtn
|
|
|
|
AnchorSideTop.Side = asrCenter
|
|
|
|
AnchorSideRight.Control = Owner
|
|
|
|
AnchorSideRight.Side = asrBottom
|
|
|
|
Left = 413
|
|
|
|
Height = 23
|
|
|
|
Top = 9
|
|
|
|
Width = 44
|
|
|
|
Alignment = taRightJustify
|
|
|
|
Anchors = [akTop, akRight]
|
|
|
|
BorderSpacing.Top = 8
|
|
|
|
BorderSpacing.Right = 8
|
|
|
|
TabOrder = 2
|
|
|
|
Text = 'InProb'
|
|
|
|
end
|
|
|
|
object GroupBox1: TGroupBox
|
|
|
|
AnchorSideLeft.Control = Owner
|
|
|
|
AnchorSideBottom.Control = Bevel1
|
|
|
|
Left = 8
|
|
|
|
Height = 114
|
|
|
|
Top = 288
|
|
|
|
Width = 449
|
|
|
|
Anchors = [akLeft, akBottom]
|
|
|
|
AutoSize = True
|
|
|
|
BorderSpacing.Left = 8
|
|
|
|
BorderSpacing.Right = 8
|
|
|
|
Caption = 'Options'
|
|
|
|
ChildSizing.LeftRightSpacing = 16
|
|
|
|
ChildSizing.TopBottomSpacing = 6
|
|
|
|
ChildSizing.HorizontalSpacing = 20
|
|
|
|
ChildSizing.VerticalSpacing = 2
|
|
|
|
ChildSizing.Layout = cclTopToBottomThenLeftToRight
|
|
|
|
ChildSizing.ControlsPerLine = 4
|
|
|
|
ClientHeight = 94
|
|
|
|
ClientWidth = 445
|
|
|
|
TabOrder = 11
|
|
|
|
object CPChkBox: TCheckBox
|
|
|
|
Left = 16
|
|
|
|
Height = 19
|
|
|
|
Top = 6
|
|
|
|
Width = 198
|
|
|
|
Caption = 'Show Cross-Products Matrix'
|
|
|
|
TabOrder = 0
|
|
|
|
end
|
|
|
|
object CovChkBox: TCheckBox
|
|
|
|
Left = 16
|
|
|
|
Height = 19
|
|
|
|
Top = 27
|
|
|
|
Width = 198
|
|
|
|
Caption = 'Show Variance-Covariance Matrix'
|
|
|
|
TabOrder = 1
|
|
|
|
end
|
|
|
|
object CorrsChkBox: TCheckBox
|
|
|
|
Left = 16
|
|
|
|
Height = 19
|
|
|
|
Top = 48
|
|
|
|
Width = 198
|
|
|
|
Caption = 'Show Intercorrelation Matrix'
|
|
|
|
TabOrder = 2
|
|
|
|
end
|
|
|
|
object MeansChkBox: TCheckBox
|
|
|
|
Left = 16
|
|
|
|
Height = 19
|
|
|
|
Top = 69
|
|
|
|
Width = 198
|
|
|
|
Caption = 'Show Means'
|
|
|
|
TabOrder = 3
|
|
|
|
end
|
|
|
|
object VarChkBox: TCheckBox
|
|
|
|
Left = 234
|
|
|
|
Height = 19
|
|
|
|
Top = 6
|
|
|
|
Width = 195
|
|
|
|
Caption = 'Show Variances'
|
|
|
|
TabOrder = 4
|
|
|
|
end
|
|
|
|
object SDChkBox: TCheckBox
|
|
|
|
Left = 234
|
|
|
|
Height = 19
|
|
|
|
Top = 27
|
|
|
|
Width = 195
|
|
|
|
Caption = 'Show Standard Deviations'
|
|
|
|
TabOrder = 5
|
|
|
|
end
|
|
|
|
object MatSaveChkBox: TCheckBox
|
|
|
|
Left = 234
|
|
|
|
Height = 19
|
|
|
|
Top = 48
|
|
|
|
Width = 195
|
|
|
|
Caption = 'Save Correlation Matrix'
|
|
|
|
TabOrder = 6
|
|
|
|
end
|
|
|
|
object PredictChkBox: TCheckBox
|
|
|
|
Left = 234
|
|
|
|
Height = 19
|
|
|
|
Top = 69
|
|
|
|
Width = 195
|
|
|
|
Caption = 'Predictions,residuals,C.I.''s to Grid'
|
|
|
|
TabOrder = 7
|
|
|
|
end
|
|
|
|
end
|
|
|
|
object ResetBtn: TButton
|
2020-04-04 23:26:20 +00:00
|
|
|
AnchorSideRight.Control = ComputeBtn
|
2020-03-30 18:01:44 +00:00
|
|
|
AnchorSideBottom.Control = Owner
|
|
|
|
AnchorSideBottom.Side = asrBottom
|
2020-04-04 23:26:20 +00:00
|
|
|
Left = 256
|
2020-03-30 18:01:44 +00:00
|
|
|
Height = 25
|
|
|
|
Top = 418
|
|
|
|
Width = 54
|
|
|
|
Anchors = [akRight, akBottom]
|
|
|
|
AutoSize = True
|
2020-04-04 23:26:20 +00:00
|
|
|
BorderSpacing.Left = 8
|
2020-03-30 18:01:44 +00:00
|
|
|
BorderSpacing.Top = 8
|
2020-04-04 23:26:20 +00:00
|
|
|
BorderSpacing.Right = 8
|
2020-03-30 18:01:44 +00:00
|
|
|
BorderSpacing.Bottom = 8
|
|
|
|
Caption = 'Reset'
|
|
|
|
OnClick = ResetBtnClick
|
|
|
|
TabOrder = 12
|
|
|
|
end
|
|
|
|
object ComputeBtn: TButton
|
2020-04-04 23:26:20 +00:00
|
|
|
AnchorSideRight.Control = CloseBtn
|
2020-03-30 18:01:44 +00:00
|
|
|
AnchorSideBottom.Control = Owner
|
|
|
|
AnchorSideBottom.Side = asrBottom
|
2020-04-04 23:26:20 +00:00
|
|
|
Left = 318
|
2020-03-30 18:01:44 +00:00
|
|
|
Height = 25
|
|
|
|
Top = 418
|
|
|
|
Width = 76
|
|
|
|
Anchors = [akRight, akBottom]
|
|
|
|
AutoSize = True
|
2020-04-04 23:26:20 +00:00
|
|
|
BorderSpacing.Left = 8
|
2020-03-30 18:01:44 +00:00
|
|
|
BorderSpacing.Top = 8
|
2020-04-04 23:26:20 +00:00
|
|
|
BorderSpacing.Right = 8
|
2020-03-30 18:01:44 +00:00
|
|
|
BorderSpacing.Bottom = 8
|
|
|
|
Caption = 'Compute'
|
|
|
|
OnClick = ComputeBtnClick
|
2020-04-04 23:26:20 +00:00
|
|
|
TabOrder = 13
|
2020-03-30 18:01:44 +00:00
|
|
|
end
|
2020-04-04 23:26:20 +00:00
|
|
|
object CloseBtn: TButton
|
2020-03-30 18:01:44 +00:00
|
|
|
AnchorSideRight.Control = Owner
|
|
|
|
AnchorSideRight.Side = asrBottom
|
|
|
|
AnchorSideBottom.Control = Owner
|
|
|
|
AnchorSideBottom.Side = asrBottom
|
2020-04-04 23:26:20 +00:00
|
|
|
Left = 402
|
2020-03-30 18:01:44 +00:00
|
|
|
Height = 25
|
|
|
|
Top = 418
|
2020-04-04 23:26:20 +00:00
|
|
|
Width = 55
|
2020-03-30 18:01:44 +00:00
|
|
|
Anchors = [akRight, akBottom]
|
|
|
|
AutoSize = True
|
2020-04-04 23:26:20 +00:00
|
|
|
BorderSpacing.Left = 8
|
2020-03-30 18:01:44 +00:00
|
|
|
BorderSpacing.Top = 8
|
2020-04-04 23:26:20 +00:00
|
|
|
BorderSpacing.Right = 8
|
2020-03-30 18:01:44 +00:00
|
|
|
BorderSpacing.Bottom = 8
|
2020-04-04 23:26:20 +00:00
|
|
|
Caption = 'Close'
|
|
|
|
ModalResult = 11
|
|
|
|
TabOrder = 14
|
2020-03-30 18:01:44 +00:00
|
|
|
end
|
|
|
|
object Bevel1: TBevel
|
|
|
|
AnchorSideLeft.Control = Owner
|
|
|
|
AnchorSideRight.Control = Owner
|
|
|
|
AnchorSideRight.Side = asrBottom
|
2020-04-04 23:26:20 +00:00
|
|
|
AnchorSideBottom.Control = CloseBtn
|
2020-03-30 18:01:44 +00:00
|
|
|
Left = 0
|
|
|
|
Height = 8
|
|
|
|
Top = 402
|
|
|
|
Width = 465
|
|
|
|
Anchors = [akLeft, akRight, akBottom]
|
|
|
|
Shape = bsBottomLine
|
|
|
|
end
|
|
|
|
object Bevel3: TBevel
|
|
|
|
AnchorSideLeft.Control = Owner
|
|
|
|
AnchorSideTop.Control = Label5
|
|
|
|
AnchorSideTop.Side = asrBottom
|
|
|
|
AnchorSideRight.Control = Owner
|
|
|
|
AnchorSideRight.Side = asrBottom
|
2020-04-04 23:26:20 +00:00
|
|
|
AnchorSideBottom.Control = CloseBtn
|
2020-03-30 18:01:44 +00:00
|
|
|
Left = 0
|
|
|
|
Height = 12
|
|
|
|
Top = 28
|
|
|
|
Width = 465
|
|
|
|
Anchors = [akTop, akLeft, akRight]
|
|
|
|
Shape = bsBottomLine
|
|
|
|
end
|
|
|
|
object SaveDialog1: TSaveDialog
|
|
|
|
left = 72
|
|
|
|
top = 112
|
|
|
|
end
|
|
|
|
end
|