Files
lazarus-ccr/applications/lazstats/source/forms/analysis/nonparametric/lifetableunit.lfm
2021-05-09 18:05:59 +00:00

433 lines
11 KiB
Plaintext

inherited LifeTableForm: TLifeTableForm
Left = 496
Height = 528
Top = 122
Width = 784
HelpType = htKeyword
HelpKeyword = 'html/LifeTable.htm'
Caption = 'Life Table'
ClientHeight = 528
ClientWidth = 784
OnCreate = FormCreate
inherited ParamsPanel: TPanel
Height = 512
Width = 260
AutoSize = True
ClientHeight = 512
ClientWidth = 260
TabOrder = 1
inherited CloseBtn: TButton
Left = 205
Top = 487
end
inherited ComputeBtn: TButton
Left = 121
Top = 487
end
inherited ResetBtn: TButton
Left = 59
Top = 487
end
inherited HelpBtn: TButton
Left = 0
Top = 487
Visible = False
end
inherited ButtonBevel: TBevel
Top = 471
Width = 260
end
object Label1: TLabel[5]
AnchorSideLeft.Control = ParamsPanel
AnchorSideTop.Control = ParamsPanel
Left = 0
Height = 15
Top = 0
Width = 49
Caption = 'Variables:'
ParentColor = False
end
object VarList: TListBox[6]
AnchorSideLeft.Control = ParamsPanel
AnchorSideTop.Control = Label1
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = ObsStartInBtn
AnchorSideBottom.Side = asrBottom
Left = 0
Height = 454
Top = 17
Width = 110
Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Top = 2
BorderSpacing.Right = 6
ItemHeight = 0
OnDblClick = VarListDblClick
OnSelectionChange = VarListSelectionChange
TabOrder = 4
end
object ObsStartInBtn: TBitBtn[7]
AnchorSideLeft.Control = ParamsPanel
AnchorSideLeft.Side = asrCenter
AnchorSideTop.Control = VarList
Left = 116
Height = 28
Top = 19
Width = 28
BorderSpacing.Top = 2
Images = MainDataModule.ImageList
ImageIndex = 1
OnClick = ObsStartInBtnClick
Spacing = 0
TabOrder = 5
end
object ObsStartOutBtn: TBitBtn[8]
AnchorSideLeft.Control = ParamsPanel
AnchorSideLeft.Side = asrCenter
AnchorSideTop.Control = ObsStartInBtn
AnchorSideTop.Side = asrBottom
Left = 116
Height = 28
Top = 51
Width = 28
BorderSpacing.Top = 4
Images = MainDataModule.ImageList
ImageIndex = 0
OnClick = ObsStartOutBtnClick
Spacing = 0
TabOrder = 6
end
object Label2: TLabel[9]
AnchorSideLeft.Control = ObsStartEdit
AnchorSideBottom.Control = ObsStartEdit
Left = 150
Height = 15
Top = 27
Width = 91
Anchors = [akLeft, akBottom]
BorderSpacing.Bottom = 2
Caption = 'Observation Start'
ParentColor = False
end
object ObsStartEdit: TEdit[10]
AnchorSideLeft.Control = ObsStartInBtn
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = Label2
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = ParamsPanel
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = ObsStartOutBtn
AnchorSideBottom.Side = asrBottom
Left = 150
Height = 23
Top = 44
Width = 110
Anchors = [akLeft, akRight, akBottom]
BorderSpacing.Left = 6
BorderSpacing.Bottom = 12
ReadOnly = True
TabOrder = 7
Text = 'ObsStartEdit'
end
object Label3: TLabel[11]
AnchorSideLeft.Control = ObsEndEdit
AnchorSideBottom.Control = ObsEndEdit
Left = 152
Height = 15
Top = 111
Width = 90
Anchors = [akLeft, akBottom]
BorderSpacing.Bottom = 2
Caption = 'Observation End:'
ParentColor = False
end
object ObsEndEdit: TEdit[12]
AnchorSideLeft.Control = ObsEndInBtn
AnchorSideLeft.Side = asrBottom
AnchorSideRight.Control = ParamsPanel
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = ObsEndOutBtn
AnchorSideBottom.Side = asrBottom
Left = 152
Height = 23
Top = 128
Width = 108
Anchors = [akLeft, akRight, akBottom]
BorderSpacing.Left = 8
BorderSpacing.Bottom = 12
ReadOnly = True
TabOrder = 8
Text = 'ObsEndEdit'
end
object ObsEndInBtn: TBitBtn[13]
AnchorSideLeft.Control = ParamsPanel
AnchorSideLeft.Side = asrCenter
AnchorSideTop.Control = ObsStartOutBtn
AnchorSideTop.Side = asrBottom
Left = 116
Height = 28
Top = 103
Width = 28
BorderSpacing.Top = 24
Images = MainDataModule.ImageList
ImageIndex = 1
OnClick = ObsEndInBtnClick
Spacing = 0
TabOrder = 9
end
object ObsEndOutBtn: TBitBtn[14]
AnchorSideLeft.Control = ParamsPanel
AnchorSideLeft.Side = asrCenter
AnchorSideTop.Control = ObsEndInBtn
AnchorSideTop.Side = asrBottom
Left = 116
Height = 28
Top = 135
Width = 28
BorderSpacing.Top = 4
Images = MainDataModule.ImageList
ImageIndex = 0
OnClick = ObsEndOutBtnClick
Spacing = 0
TabOrder = 10
end
object Label4: TLabel[15]
AnchorSideLeft.Control = NoAliveEdit
AnchorSideBottom.Control = NoAliveEdit
Left = 152
Height = 15
Top = 195
Width = 76
Anchors = [akLeft, akBottom]
BorderSpacing.Bottom = 2
Caption = 'Number Alive:'
ParentColor = False
end
object NoAliveEdit: TEdit[16]
AnchorSideLeft.Control = ObsEndInBtn
AnchorSideLeft.Side = asrBottom
AnchorSideRight.Control = ParamsPanel
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = AliveOutBtn
AnchorSideBottom.Side = asrBottom
Left = 152
Height = 23
Top = 212
Width = 108
Anchors = [akLeft, akRight, akBottom]
BorderSpacing.Left = 8
BorderSpacing.Bottom = 12
ReadOnly = True
TabOrder = 11
Text = 'NoAliveEdit'
end
object AliveInBtn: TBitBtn[17]
AnchorSideLeft.Control = ParamsPanel
AnchorSideLeft.Side = asrCenter
AnchorSideTop.Control = ObsEndOutBtn
AnchorSideTop.Side = asrBottom
Left = 116
Height = 28
Top = 187
Width = 28
BorderSpacing.Top = 24
Images = MainDataModule.ImageList
ImageIndex = 1
OnClick = AliveInBtnClick
Spacing = 0
TabOrder = 12
end
object AliveOutBtn: TBitBtn[18]
AnchorSideLeft.Control = ParamsPanel
AnchorSideLeft.Side = asrCenter
AnchorSideTop.Control = AliveInBtn
AnchorSideTop.Side = asrBottom
Left = 116
Height = 28
Top = 219
Width = 28
BorderSpacing.Top = 4
Images = MainDataModule.ImageList
ImageIndex = 0
OnClick = AliveOutBtnClick
Spacing = 0
TabOrder = 13
end
object Label5: TLabel[19]
AnchorSideLeft.Control = NoDiedEdit
AnchorSideBottom.Control = NoDiedEdit
Left = 152
Height = 15
Top = 279
Width = 74
Anchors = [akLeft, akBottom]
BorderSpacing.Bottom = 2
Caption = 'Number Died:'
ParentColor = False
end
object NoDiedEdit: TEdit[20]
AnchorSideLeft.Control = ObsEndInBtn
AnchorSideLeft.Side = asrBottom
AnchorSideRight.Control = ParamsPanel
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = NoDiedOutBtn
AnchorSideBottom.Side = asrBottom
Left = 152
Height = 23
Top = 296
Width = 108
Anchors = [akLeft, akRight, akBottom]
BorderSpacing.Left = 8
BorderSpacing.Bottom = 12
ReadOnly = True
TabOrder = 14
Text = 'NoDiedEdit'
end
object NoDiedInBtn: TBitBtn[21]
AnchorSideLeft.Control = ParamsPanel
AnchorSideLeft.Side = asrCenter
AnchorSideTop.Control = AliveOutBtn
AnchorSideTop.Side = asrBottom
Left = 116
Height = 28
Top = 271
Width = 28
BorderSpacing.Top = 24
Images = MainDataModule.ImageList
ImageIndex = 1
OnClick = NoDiedInBtnClick
Spacing = 0
TabOrder = 15
end
object NoDiedOutBtn: TBitBtn[22]
AnchorSideLeft.Control = ParamsPanel
AnchorSideLeft.Side = asrCenter
AnchorSideTop.Control = NoDiedInBtn
AnchorSideTop.Side = asrBottom
Left = 116
Height = 28
Top = 303
Width = 28
BorderSpacing.Top = 4
Images = MainDataModule.ImageList
ImageIndex = 0
OnClick = NoDiedOutBtnClick
Spacing = 0
TabOrder = 16
end
object Label6: TLabel[23]
AnchorSideLeft.Control = NoCensoredEdit
AnchorSideBottom.Control = NoCensoredEdit
Left = 152
Height = 15
Top = 363
Width = 100
Anchors = [akLeft, akBottom]
BorderSpacing.Bottom = 2
Caption = 'Number Censored:'
ParentColor = False
end
object NoCensoredEdit: TEdit[24]
AnchorSideLeft.Control = ObsEndInBtn
AnchorSideLeft.Side = asrBottom
AnchorSideRight.Control = ParamsPanel
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = NoCensoredOutBtn
AnchorSideBottom.Side = asrBottom
Left = 152
Height = 23
Top = 380
Width = 108
Anchors = [akLeft, akRight, akBottom]
BorderSpacing.Left = 8
BorderSpacing.Bottom = 12
ReadOnly = True
TabOrder = 17
Text = 'NoCensoredEdit'
end
object NoCensoredInBtn: TBitBtn[25]
AnchorSideLeft.Control = ParamsPanel
AnchorSideLeft.Side = asrCenter
AnchorSideTop.Control = NoDiedOutBtn
AnchorSideTop.Side = asrBottom
Left = 116
Height = 28
Top = 355
Width = 28
BorderSpacing.Top = 24
Images = MainDataModule.ImageList
ImageIndex = 1
OnClick = NoCensoredInBtnClick
Spacing = 0
TabOrder = 18
end
object NoCensoredOutBtn: TBitBtn[26]
AnchorSideLeft.Control = ParamsPanel
AnchorSideLeft.Side = asrCenter
AnchorSideTop.Control = NoCensoredInBtn
AnchorSideTop.Side = asrBottom
Left = 116
Height = 28
Hint = '0'
Top = 387
Width = 28
BorderSpacing.Top = 4
Images = MainDataModule.ImageList
ImageIndex = 0
OnClick = NoCensoredOutBtnClick
Spacing = 0
TabOrder = 19
end
object Label7: TLabel[27]
AnchorSideTop.Control = CIEdit
AnchorSideTop.Side = asrCenter
AnchorSideRight.Control = CIEdit
Left = 115
Height = 30
Top = 435
Width = 94
Anchors = [akTop, akRight]
BorderSpacing.Right = 8
Caption = 'Confidence Level'#13#10'for Number Alive:'
ParentColor = False
end
object CIEdit: TEdit[28]
AnchorSideTop.Control = NoCensoredOutBtn
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = ParamsPanel
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Side = asrBottom
Left = 217
Height = 23
Top = 439
Width = 43
Alignment = taRightJustify
Anchors = [akTop, akRight]
BorderSpacing.Top = 24
BorderSpacing.Bottom = 8
TabOrder = 20
Text = '0.95'
end
end
inherited ParamsSplitter: TSplitter
Left = 272
Height = 528
end
object Grid: TStringGrid[2]
Left = 281
Height = 512
Top = 8
Width = 495
Align = alClient
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 4
BorderSpacing.Top = 8
BorderSpacing.Right = 8
BorderSpacing.Bottom = 8
ColCount = 13
Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goColSizing, goThumbTracking, goSmoothScroll]
RowCount = 2
TabOrder = 0
OnPrepareCanvas = GridPrepareCanvas
end
end