Files
2020-08-17 13:55:43 +00:00

222 lines
5.5 KiB
Plaintext

object SpBrFrm: TSpBrFrm
Left = 770
Height = 149
Top = 373
Width = 473
HelpType = htKeyword
HelpKeyword = 'html/Spearman-BrownProphecyReliabilit.htm'
AutoSize = True
BorderStyle = bsDialog
Caption = 'Spearman-Brown Prophecy Formula'
ClientHeight = 149
ClientWidth = 473
OnActivate = FormActivate
OnShow = FormShow
Position = poMainFormCenter
LCLVersion = '2.1.0.0'
object ResetBtn: TButton
AnchorSideTop.Control = Bevel1
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = ComputeBtn
Left = 264
Height = 25
Top = 111
Width = 54
Anchors = [akTop, akRight]
AutoSize = True
BorderSpacing.Left = 8
BorderSpacing.Top = 8
BorderSpacing.Right = 8
BorderSpacing.Bottom = 8
Caption = 'Reset'
OnClick = ResetBtnClick
TabOrder = 2
end
object ComputeBtn: TButton
AnchorSideTop.Control = Bevel1
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = CloseBtn
Left = 326
Height = 25
Top = 111
Width = 76
Anchors = [akTop, akRight]
AutoSize = True
BorderSpacing.Left = 8
BorderSpacing.Top = 8
BorderSpacing.Right = 8
BorderSpacing.Bottom = 8
Caption = 'Compute'
OnClick = ComputeBtnClick
TabOrder = 3
end
object CloseBtn: TButton
AnchorSideTop.Control = Bevel1
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 410
Height = 25
Top = 111
Width = 55
Anchors = [akTop, akRight]
AutoSize = True
BorderSpacing.Left = 8
BorderSpacing.Top = 8
BorderSpacing.Right = 8
BorderSpacing.Bottom = 8
Caption = 'Close'
ModalResult = 11
TabOrder = 4
end
object HelpBtn: TButton
Tag = 147
AnchorSideTop.Control = Bevel1
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = ResetBtn
Left = 205
Height = 25
Top = 111
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
object Panel1: TPanel
AnchorSideLeft.Control = Owner
AnchorSideLeft.Side = asrCenter
AnchorSideTop.Control = Owner
Left = 120
Height = 87
Top = 8
Width = 233
AutoSize = True
BorderSpacing.Left = 16
BorderSpacing.Top = 8
BorderSpacing.Right = 16
BevelOuter = bvNone
ClientHeight = 87
ClientWidth = 233
TabOrder = 0
object Label1: TLabel
AnchorSideTop.Control = OldRelEdit
AnchorSideTop.Side = asrCenter
AnchorSideRight.Control = OldRelEdit
Left = 28
Height = 15
Top = 4
Width = 122
Anchors = [akTop, akRight]
BorderSpacing.Right = 8
Caption = 'Original Test Reliability:'
ParentColor = False
end
object Label2: TLabel
AnchorSideTop.Control = MultKEdit
AnchorSideTop.Side = asrCenter
AnchorSideRight.Control = MultKEdit
Left = 0
Height = 15
Top = 31
Width = 150
Anchors = [akTop, akRight]
BorderSpacing.Right = 8
Caption = 'Multiplier K for the new Test:'
ParentColor = False
end
object Label3: TLabel
AnchorSideTop.Control = NewRelEdit
AnchorSideTop.Side = asrCenter
AnchorSideRight.Control = NewRelEdit
Left = 21
Height = 15
Top = 68
Width = 129
Anchors = [akTop, akRight]
BorderSpacing.Right = 8
Caption = 'New Reliability Estimate:'
ParentColor = False
end
object OldRelEdit: TEdit
AnchorSideTop.Control = Panel1
AnchorSideRight.Control = Panel1
AnchorSideRight.Side = asrBottom
Left = 158
Height = 23
Top = 0
Width = 75
Alignment = taRightJustify
Anchors = [akTop, akRight]
TabOrder = 0
Text = 'OldRelEdit'
end
object MultKEdit: TEdit
AnchorSideLeft.Control = OldRelEdit
AnchorSideTop.Control = OldRelEdit
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Panel1
AnchorSideRight.Side = asrBottom
Left = 158
Height = 23
Top = 27
Width = 75
Alignment = taRightJustify
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 4
TabOrder = 1
Text = 'Edit1'
end
object NewRelEdit: TEdit
AnchorSideLeft.Control = OldRelEdit
AnchorSideTop.Control = Bevel2
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Panel1
AnchorSideRight.Side = asrBottom
Left = 158
Height = 23
Top = 64
Width = 75
Alignment = taRightJustify
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 6
Font.Style = [fsBold]
ParentFont = False
ReadOnly = True
TabOrder = 2
Text = 'Edit1'
end
object Bevel2: TBevel
AnchorSideLeft.Control = Panel1
AnchorSideTop.Control = MultKEdit
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Panel1
AnchorSideRight.Side = asrBottom
Left = 0
Height = 8
Top = 50
Width = 233
Anchors = [akTop, akLeft, akRight]
Shape = bsBottomLine
end
end
object Bevel1: TBevel
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = Panel1
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 0
Height = 8
Top = 95
Width = 473
Anchors = [akTop, akLeft, akRight]
Shape = bsBottomLine
end
end