2020-03-30 18:01:44 +00:00
|
|
|
object LatinSqrsFrm: TLatinSqrsFrm
|
|
|
|
Left = 199
|
|
|
|
Height = 248
|
|
|
|
Top = 108
|
|
|
|
Width = 523
|
2020-05-11 20:30:56 +00:00
|
|
|
HelpType = htKeyword
|
2020-08-17 13:55:43 +00:00
|
|
|
HelpKeyword = 'html/LatinandGreco-LatinSquares.htm'
|
2020-03-30 18:01:44 +00:00
|
|
|
ActiveControl = Plan
|
|
|
|
AutoSize = True
|
|
|
|
BorderStyle = bsDialog
|
|
|
|
Caption = 'Latin and Greco-Latin Squares Analyses'
|
|
|
|
ClientHeight = 248
|
|
|
|
ClientWidth = 523
|
|
|
|
OnActivate = FormActivate
|
|
|
|
OnCreate = FormCreate
|
|
|
|
Position = poMainFormCenter
|
|
|
|
LCLVersion = '2.1.0.0'
|
2020-05-10 23:10:20 +00:00
|
|
|
object ComputeBtn: TButton
|
2020-03-30 18:01:44 +00:00
|
|
|
AnchorSideLeft.Side = asrCenter
|
|
|
|
AnchorSideTop.Control = Plan
|
|
|
|
AnchorSideTop.Side = asrBottom
|
2020-05-10 23:10:20 +00:00
|
|
|
AnchorSideRight.Control = CloseBtn
|
|
|
|
Left = 372
|
2020-03-30 18:01:44 +00:00
|
|
|
Height = 25
|
|
|
|
Top = 214
|
2020-05-10 23:10:20 +00:00
|
|
|
Width = 76
|
2020-03-30 18:01:44 +00:00
|
|
|
Anchors = [akTop, akRight]
|
|
|
|
AutoSize = True
|
|
|
|
BorderSpacing.Top = 8
|
|
|
|
BorderSpacing.Right = 12
|
|
|
|
BorderSpacing.Bottom = 8
|
2020-05-10 23:10:20 +00:00
|
|
|
Caption = 'Compute'
|
|
|
|
OnClick = ComputeBtnClick
|
2020-03-30 18:01:44 +00:00
|
|
|
TabOrder = 2
|
|
|
|
end
|
2020-05-10 23:10:20 +00:00
|
|
|
object CloseBtn: TButton
|
2020-03-30 18:01:44 +00:00
|
|
|
AnchorSideTop.Control = Plan
|
|
|
|
AnchorSideTop.Side = asrBottom
|
|
|
|
AnchorSideRight.Control = Owner
|
|
|
|
AnchorSideRight.Side = asrBottom
|
2020-05-10 23:10:20 +00:00
|
|
|
Left = 460
|
2020-03-30 18:01:44 +00:00
|
|
|
Height = 25
|
|
|
|
Top = 214
|
2020-05-10 23:10:20 +00:00
|
|
|
Width = 55
|
2020-03-30 18:01:44 +00:00
|
|
|
Anchors = [akTop, akRight]
|
|
|
|
AutoSize = True
|
|
|
|
BorderSpacing.Top = 8
|
|
|
|
BorderSpacing.Right = 8
|
|
|
|
BorderSpacing.Bottom = 8
|
2020-05-10 23:10:20 +00:00
|
|
|
Caption = 'Close'
|
|
|
|
ModalResult = 11
|
2020-03-30 18:01:44 +00:00
|
|
|
TabOrder = 3
|
|
|
|
end
|
|
|
|
object Plan: TRadioGroup
|
|
|
|
AnchorSideLeft.Control = Owner
|
|
|
|
AnchorSideTop.Control = Owner
|
|
|
|
Left = 8
|
|
|
|
Height = 198
|
|
|
|
Top = 8
|
|
|
|
Width = 515
|
|
|
|
AutoFill = True
|
|
|
|
AutoSize = True
|
|
|
|
BorderSpacing.Left = 8
|
|
|
|
BorderSpacing.Top = 8
|
|
|
|
BorderSpacing.Right = 8
|
|
|
|
Caption = 'Winer''s Plans:'
|
|
|
|
ChildSizing.LeftRightSpacing = 12
|
|
|
|
ChildSizing.TopBottomSpacing = 6
|
|
|
|
ChildSizing.VerticalSpacing = 2
|
|
|
|
ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
|
|
|
|
ChildSizing.EnlargeVertical = crsHomogenousChildResize
|
|
|
|
ChildSizing.ShrinkHorizontal = crsScaleChilds
|
|
|
|
ChildSizing.ShrinkVertical = crsScaleChilds
|
|
|
|
ChildSizing.Layout = cclLeftToRightThenTopToBottom
|
|
|
|
ChildSizing.ControlsPerLine = 1
|
|
|
|
ClientHeight = 178
|
|
|
|
ClientWidth = 511
|
|
|
|
Items.Strings = (
|
|
|
|
'Plan 1. Three Factors (A,B,C) with no interactions.'
|
|
|
|
'Plan 2. Four Factors (A,B,C,D) with partial interactions.'
|
|
|
|
'Plan 3. Like Plan 2 but different assumptions (Partial confounding of interaction ABC.)'
|
|
|
|
'The Greco-Latin with no interactions assumed.'
|
|
|
|
'Plan 5. Repeated measures Latin Square (random assignment of groups to rows.)'
|
|
|
|
'Plan 6. Fractional replication of a three factor factorial experiment in incomplete blocks.'
|
|
|
|
'Plan 7. Plan 5 with superimposing of an orthogonal Latin square.'
|
|
|
|
'Plan 9. AxBxC (same square used for all levels of Factor C.)'
|
|
|
|
)
|
|
|
|
TabOrder = 0
|
|
|
|
end
|
|
|
|
object HelpBtn: TButton
|
|
|
|
Tag = 130
|
|
|
|
AnchorSideTop.Control = Plan
|
|
|
|
AnchorSideTop.Side = asrBottom
|
2020-05-10 23:10:20 +00:00
|
|
|
AnchorSideRight.Control = ComputeBtn
|
|
|
|
Left = 313
|
2020-03-30 18:01:44 +00:00
|
|
|
Height = 25
|
|
|
|
Top = 214
|
|
|
|
Width = 51
|
|
|
|
Anchors = [akTop, akRight]
|
|
|
|
AutoSize = True
|
|
|
|
BorderSpacing.Left = 8
|
|
|
|
BorderSpacing.Top = 8
|
|
|
|
BorderSpacing.Right = 8
|
|
|
|
BorderSpacing.Bottom = 8
|
|
|
|
Caption = 'Help'
|
|
|
|
OnClick = HelpBtnClick
|
|
|
|
TabOrder = 1
|
|
|
|
end
|
|
|
|
end
|