2020-10-28 19:01:05 +00:00
|
|
|
inherited KaplanMeierForm: TKaplanMeierForm
|
2020-05-10 10:37:19 +00:00
|
|
|
Left = 596
|
2020-10-28 19:01:05 +00:00
|
|
|
Height = 400
|
2020-05-10 10:37:19 +00:00
|
|
|
Top = 239
|
2020-10-28 19:01:05 +00:00
|
|
|
Width = 879
|
2020-05-10 10:37:19 +00:00
|
|
|
HelpType = htKeyword
|
2020-08-17 13:55:43 +00:00
|
|
|
HelpKeyword = 'html/Kaplan-MeierSurvivalTest.htm'
|
2020-03-30 18:01:44 +00:00
|
|
|
Caption = 'Kaplan-Meier Survival Analysis'
|
2020-10-28 19:01:05 +00:00
|
|
|
ClientHeight = 400
|
|
|
|
ClientWidth = 879
|
|
|
|
inherited ParamsPanel: TPanel
|
|
|
|
Height = 384
|
|
|
|
Width = 363
|
|
|
|
ClientHeight = 384
|
|
|
|
ClientWidth = 363
|
|
|
|
inherited CloseBtn: TButton
|
|
|
|
Left = 308
|
|
|
|
Top = 359
|
|
|
|
end
|
|
|
|
inherited ComputeBtn: TButton
|
|
|
|
Left = 224
|
|
|
|
Top = 359
|
|
|
|
end
|
|
|
|
inherited ResetBtn: TButton
|
|
|
|
Left = 162
|
|
|
|
Top = 359
|
|
|
|
end
|
|
|
|
inherited HelpBtn: TButton
|
|
|
|
Tag = 127
|
|
|
|
Left = 103
|
|
|
|
Top = 359
|
|
|
|
end
|
|
|
|
inherited ButtonBevel: TBevel
|
|
|
|
Top = 343
|
|
|
|
Width = 363
|
|
|
|
end
|
|
|
|
object Label1: TLabel[5]
|
|
|
|
AnchorSideLeft.Control = ParamsPanel
|
|
|
|
AnchorSideTop.Control = ParamsPanel
|
2020-03-30 18:01:44 +00:00
|
|
|
Left = 0
|
|
|
|
Height = 15
|
|
|
|
Top = 0
|
|
|
|
Width = 97
|
|
|
|
Caption = 'Available Variables'
|
|
|
|
ParentColor = False
|
|
|
|
end
|
2020-10-28 19:01:05 +00:00
|
|
|
object TimeVarLabel: TLabel[6]
|
|
|
|
AnchorSideLeft.Control = TimeVarEdit
|
|
|
|
AnchorSideBottom.Control = TimeVarEdit
|
|
|
|
Left = 201
|
2020-03-30 18:01:44 +00:00
|
|
|
Height = 15
|
2020-10-28 19:01:05 +00:00
|
|
|
Top = 133
|
2020-03-30 18:01:44 +00:00
|
|
|
Width = 70
|
|
|
|
Anchors = [akLeft, akBottom]
|
|
|
|
BorderSpacing.Bottom = 2
|
|
|
|
Caption = 'Time Variable'
|
|
|
|
ParentColor = False
|
|
|
|
end
|
2020-10-28 19:01:05 +00:00
|
|
|
object EventVarLabel: TLabel[7]
|
|
|
|
AnchorSideLeft.Control = EventVarEdit
|
|
|
|
AnchorSideBottom.Control = EventVarEdit
|
|
|
|
Left = 201
|
2020-03-30 18:01:44 +00:00
|
|
|
Height = 30
|
2020-10-28 19:01:05 +00:00
|
|
|
Top = 210
|
2020-03-30 18:01:44 +00:00
|
|
|
Width = 140
|
|
|
|
Anchors = [akLeft, akBottom]
|
|
|
|
BorderSpacing.Bottom = 2
|
|
|
|
Caption = 'Event vs Censored Variable'#13#10'(Event = 1, Censored = 2)'
|
|
|
|
ParentColor = False
|
|
|
|
end
|
2020-10-28 19:01:05 +00:00
|
|
|
object GroupVarLabel: TLabel[8]
|
|
|
|
AnchorSideLeft.Control = GroupVarEdit
|
|
|
|
AnchorSideBottom.Control = GroupVarEdit
|
|
|
|
Left = 201
|
2020-03-30 18:01:44 +00:00
|
|
|
Height = 30
|
2020-10-28 19:01:05 +00:00
|
|
|
Top = 42
|
2020-03-30 18:01:44 +00:00
|
|
|
Width = 160
|
|
|
|
Anchors = [akLeft, akBottom]
|
|
|
|
BorderSpacing.Bottom = 2
|
|
|
|
Caption = 'Group Variable (if 2 groups)'#13#10'(Experimental = 1, Control =2)'
|
|
|
|
ParentColor = False
|
|
|
|
end
|
2020-10-28 19:01:05 +00:00
|
|
|
object VarList: TListBox[9]
|
|
|
|
AnchorSideLeft.Control = ParamsPanel
|
2020-03-30 18:01:44 +00:00
|
|
|
AnchorSideTop.Control = Label1
|
|
|
|
AnchorSideTop.Side = asrBottom
|
|
|
|
AnchorSideRight.Control = TimeInBtn
|
2020-10-28 19:01:05 +00:00
|
|
|
AnchorSideBottom.Control = ButtonBevel
|
2020-03-30 18:01:44 +00:00
|
|
|
Left = 0
|
2020-10-28 19:01:05 +00:00
|
|
|
Height = 326
|
2020-03-30 18:01:44 +00:00
|
|
|
Top = 17
|
2020-10-28 19:01:05 +00:00
|
|
|
Width = 161
|
2020-03-30 18:01:44 +00:00
|
|
|
Anchors = [akTop, akLeft, akRight, akBottom]
|
|
|
|
BorderSpacing.Top = 2
|
2020-10-28 19:01:05 +00:00
|
|
|
BorderSpacing.Right = 6
|
2020-03-30 18:01:44 +00:00
|
|
|
ItemHeight = 0
|
2020-10-28 19:01:05 +00:00
|
|
|
OnDblClick = VarListDblClick
|
2020-03-30 18:01:44 +00:00
|
|
|
OnSelectionChange = VarListSelectionChange
|
2020-10-28 19:01:05 +00:00
|
|
|
TabOrder = 4
|
2020-03-30 18:01:44 +00:00
|
|
|
end
|
2020-10-28 19:01:05 +00:00
|
|
|
object TimeInBtn: TBitBtn[10]
|
|
|
|
AnchorSideLeft.Control = ParamsPanel
|
2020-03-30 18:01:44 +00:00
|
|
|
AnchorSideLeft.Side = asrCenter
|
2020-10-28 19:01:05 +00:00
|
|
|
AnchorSideTop.Control = GroupOutBtn
|
|
|
|
AnchorSideTop.Side = asrBottom
|
|
|
|
Left = 167
|
2020-03-30 18:01:44 +00:00
|
|
|
Height = 28
|
2020-10-28 19:01:05 +00:00
|
|
|
Top = 125
|
2020-03-30 18:01:44 +00:00
|
|
|
Width = 28
|
2020-10-28 19:01:05 +00:00
|
|
|
BorderSpacing.Top = 24
|
2020-03-30 18:01:44 +00:00
|
|
|
Images = MainDataModule.ImageList
|
|
|
|
ImageIndex = 1
|
|
|
|
OnClick = TimeInBtnClick
|
|
|
|
Spacing = 0
|
2020-10-28 19:01:05 +00:00
|
|
|
TabOrder = 5
|
2020-03-30 18:01:44 +00:00
|
|
|
end
|
2020-10-28 19:01:05 +00:00
|
|
|
object TimeOutBtn: TBitBtn[11]
|
|
|
|
AnchorSideLeft.Control = ParamsPanel
|
2020-03-30 18:01:44 +00:00
|
|
|
AnchorSideLeft.Side = asrCenter
|
|
|
|
AnchorSideTop.Control = TimeInBtn
|
|
|
|
AnchorSideTop.Side = asrBottom
|
2020-10-28 19:01:05 +00:00
|
|
|
Left = 167
|
2020-03-30 18:01:44 +00:00
|
|
|
Height = 28
|
2020-10-28 19:01:05 +00:00
|
|
|
Top = 157
|
2020-03-30 18:01:44 +00:00
|
|
|
Width = 28
|
|
|
|
BorderSpacing.Top = 4
|
|
|
|
Images = MainDataModule.ImageList
|
|
|
|
ImageIndex = 0
|
|
|
|
OnClick = TimeOutBtnClick
|
|
|
|
Spacing = 0
|
2020-10-28 19:01:05 +00:00
|
|
|
TabOrder = 6
|
2020-03-30 18:01:44 +00:00
|
|
|
end
|
2020-10-28 19:01:05 +00:00
|
|
|
object EventInBtn: TBitBtn[12]
|
|
|
|
AnchorSideLeft.Control = ParamsPanel
|
2020-03-30 18:01:44 +00:00
|
|
|
AnchorSideLeft.Side = asrCenter
|
|
|
|
AnchorSideTop.Control = TimeOutBtn
|
|
|
|
AnchorSideTop.Side = asrBottom
|
2020-10-28 19:01:05 +00:00
|
|
|
Left = 167
|
2020-03-30 18:01:44 +00:00
|
|
|
Height = 28
|
2020-10-28 19:01:05 +00:00
|
|
|
Top = 209
|
2020-03-30 18:01:44 +00:00
|
|
|
Width = 28
|
2020-10-28 19:01:05 +00:00
|
|
|
BorderSpacing.Top = 24
|
2020-03-30 18:01:44 +00:00
|
|
|
Images = MainDataModule.ImageList
|
|
|
|
ImageIndex = 1
|
|
|
|
OnClick = EventInBtnClick
|
|
|
|
Spacing = 0
|
2020-10-28 19:01:05 +00:00
|
|
|
TabOrder = 7
|
2020-03-30 18:01:44 +00:00
|
|
|
end
|
2020-10-28 19:01:05 +00:00
|
|
|
object EventOutBtn: TBitBtn[13]
|
|
|
|
AnchorSideLeft.Control = ParamsPanel
|
2020-03-30 18:01:44 +00:00
|
|
|
AnchorSideLeft.Side = asrCenter
|
|
|
|
AnchorSideTop.Control = EventInBtn
|
|
|
|
AnchorSideTop.Side = asrBottom
|
2020-10-28 19:01:05 +00:00
|
|
|
Left = 167
|
2020-03-30 18:01:44 +00:00
|
|
|
Height = 28
|
2020-10-28 19:01:05 +00:00
|
|
|
Top = 241
|
2020-03-30 18:01:44 +00:00
|
|
|
Width = 28
|
|
|
|
BorderSpacing.Top = 4
|
|
|
|
Images = MainDataModule.ImageList
|
|
|
|
ImageIndex = 0
|
|
|
|
OnClick = EventOutBtnClick
|
|
|
|
Spacing = 0
|
2020-10-28 19:01:05 +00:00
|
|
|
TabOrder = 8
|
2020-03-30 18:01:44 +00:00
|
|
|
end
|
2020-10-28 19:01:05 +00:00
|
|
|
object GroupInBtn: TBitBtn[14]
|
|
|
|
AnchorSideLeft.Control = ParamsPanel
|
2020-03-30 18:01:44 +00:00
|
|
|
AnchorSideLeft.Side = asrCenter
|
2020-10-28 19:01:05 +00:00
|
|
|
AnchorSideTop.Control = VarList
|
|
|
|
Left = 167
|
2020-03-30 18:01:44 +00:00
|
|
|
Height = 28
|
2020-10-28 19:01:05 +00:00
|
|
|
Top = 41
|
2020-03-30 18:01:44 +00:00
|
|
|
Width = 28
|
|
|
|
BorderSpacing.Top = 24
|
|
|
|
Images = MainDataModule.ImageList
|
|
|
|
ImageIndex = 1
|
|
|
|
OnClick = GroupInBtnClick
|
|
|
|
Spacing = 0
|
2020-10-28 19:01:05 +00:00
|
|
|
TabOrder = 9
|
2020-03-30 18:01:44 +00:00
|
|
|
end
|
2020-10-28 19:01:05 +00:00
|
|
|
object GroupOutBtn: TBitBtn[15]
|
|
|
|
AnchorSideLeft.Control = ParamsPanel
|
2020-03-30 18:01:44 +00:00
|
|
|
AnchorSideLeft.Side = asrCenter
|
|
|
|
AnchorSideTop.Control = GroupInBtn
|
|
|
|
AnchorSideTop.Side = asrBottom
|
2020-10-28 19:01:05 +00:00
|
|
|
Left = 167
|
2020-03-30 18:01:44 +00:00
|
|
|
Height = 28
|
2020-10-28 19:01:05 +00:00
|
|
|
Top = 73
|
2020-03-30 18:01:44 +00:00
|
|
|
Width = 28
|
|
|
|
BorderSpacing.Top = 4
|
|
|
|
Images = MainDataModule.ImageList
|
|
|
|
ImageIndex = 0
|
|
|
|
OnClick = GroupOutBtnClick
|
|
|
|
Spacing = 0
|
2020-10-28 19:01:05 +00:00
|
|
|
TabOrder = 10
|
2020-03-30 18:01:44 +00:00
|
|
|
end
|
2020-10-28 19:01:05 +00:00
|
|
|
object TimeVarEdit: TEdit[16]
|
2020-03-30 18:01:44 +00:00
|
|
|
AnchorSideLeft.Control = TimeInBtn
|
|
|
|
AnchorSideLeft.Side = asrBottom
|
2020-10-28 19:01:05 +00:00
|
|
|
AnchorSideRight.Control = ParamsPanel
|
2020-03-30 18:01:44 +00:00
|
|
|
AnchorSideRight.Side = asrBottom
|
|
|
|
AnchorSideBottom.Control = TimeOutBtn
|
|
|
|
AnchorSideBottom.Side = asrBottom
|
2020-10-28 19:01:05 +00:00
|
|
|
Left = 201
|
2020-03-30 18:01:44 +00:00
|
|
|
Height = 23
|
2020-10-28 19:01:05 +00:00
|
|
|
Top = 150
|
|
|
|
Width = 162
|
2020-03-30 18:01:44 +00:00
|
|
|
Anchors = [akLeft, akRight, akBottom]
|
2020-10-28 19:01:05 +00:00
|
|
|
BorderSpacing.Left = 6
|
2020-03-30 18:01:44 +00:00
|
|
|
BorderSpacing.Bottom = 12
|
2020-10-28 19:01:05 +00:00
|
|
|
TabOrder = 11
|
|
|
|
Text = 'TimeVarEdit'
|
2020-03-30 18:01:44 +00:00
|
|
|
end
|
2020-10-28 19:01:05 +00:00
|
|
|
object EventVarEdit: TEdit[17]
|
|
|
|
AnchorSideLeft.Control = GroupInBtn
|
2020-03-30 18:01:44 +00:00
|
|
|
AnchorSideLeft.Side = asrBottom
|
2020-10-28 19:01:05 +00:00
|
|
|
AnchorSideRight.Control = ParamsPanel
|
2020-03-30 18:01:44 +00:00
|
|
|
AnchorSideRight.Side = asrBottom
|
|
|
|
AnchorSideBottom.Control = EventOutBtn
|
|
|
|
AnchorSideBottom.Side = asrBottom
|
2020-10-28 19:01:05 +00:00
|
|
|
Left = 201
|
2020-03-30 18:01:44 +00:00
|
|
|
Height = 23
|
2020-10-28 19:01:05 +00:00
|
|
|
Top = 242
|
|
|
|
Width = 162
|
2020-03-30 18:01:44 +00:00
|
|
|
Anchors = [akLeft, akRight, akBottom]
|
2020-10-28 19:01:05 +00:00
|
|
|
BorderSpacing.Left = 6
|
|
|
|
BorderSpacing.Bottom = 4
|
|
|
|
TabOrder = 12
|
|
|
|
Text = 'EventVarEdit'
|
2020-03-30 18:01:44 +00:00
|
|
|
end
|
2020-10-28 19:01:05 +00:00
|
|
|
object GroupVarEdit: TEdit[18]
|
2020-03-30 18:01:44 +00:00
|
|
|
AnchorSideLeft.Control = GroupInBtn
|
|
|
|
AnchorSideLeft.Side = asrBottom
|
2020-10-28 19:01:05 +00:00
|
|
|
AnchorSideTop.Control = GroupVarLabel
|
|
|
|
AnchorSideTop.Side = asrBottom
|
|
|
|
AnchorSideRight.Control = ParamsPanel
|
2020-03-30 18:01:44 +00:00
|
|
|
AnchorSideRight.Side = asrBottom
|
|
|
|
AnchorSideBottom.Control = GroupOutBtn
|
|
|
|
AnchorSideBottom.Side = asrBottom
|
2020-10-28 19:01:05 +00:00
|
|
|
Left = 201
|
2020-03-30 18:01:44 +00:00
|
|
|
Height = 23
|
2020-10-28 19:01:05 +00:00
|
|
|
Top = 74
|
|
|
|
Width = 162
|
2020-03-30 18:01:44 +00:00
|
|
|
Anchors = [akLeft, akRight, akBottom]
|
2020-10-28 19:01:05 +00:00
|
|
|
BorderSpacing.Left = 6
|
|
|
|
BorderSpacing.Bottom = 4
|
|
|
|
TabOrder = 13
|
|
|
|
Text = 'GroupVarEdit'
|
2020-03-30 18:01:44 +00:00
|
|
|
end
|
|
|
|
end
|
2020-10-28 19:01:05 +00:00
|
|
|
inherited ParamsSplitter: TSplitter
|
|
|
|
Left = 375
|
|
|
|
Height = 400
|
|
|
|
end
|
|
|
|
inherited PageControl: TPageControl
|
|
|
|
Left = 384
|
|
|
|
Height = 384
|
|
|
|
Width = 487
|
|
|
|
ActivePage = ReportPage
|
|
|
|
TabIndex = 0
|
|
|
|
TabOrder = 1
|
|
|
|
end
|
2020-03-30 18:01:44 +00:00
|
|
|
end
|