You've already forked lazarus-ccr
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@7821 8e941d3f-bd1b-0410-a28a-d453659cc2b4
257 lines
6.5 KiB
Plaintext
257 lines
6.5 KiB
Plaintext
inherited GenKappaFrm: TGenKappaFrm
|
|
Left = 641
|
|
Height = 306
|
|
Top = 378
|
|
Width = 452
|
|
HelpType = htKeyword
|
|
HelpKeyword = 'html/GeneralizedKappa.htm'
|
|
Caption = 'Generalized Kappa Coefficient'
|
|
ClientHeight = 306
|
|
ClientWidth = 452
|
|
inherited ParamsPanel: TPanel
|
|
Height = 290
|
|
Width = 296
|
|
ClientHeight = 290
|
|
ClientWidth = 296
|
|
inherited CloseBtn: TButton
|
|
Left = 241
|
|
Top = 265
|
|
end
|
|
inherited ComputeBtn: TButton
|
|
Left = 157
|
|
Top = 265
|
|
end
|
|
inherited ResetBtn: TButton
|
|
Left = 95
|
|
Top = 265
|
|
end
|
|
inherited HelpBtn: TButton
|
|
Tag = 125
|
|
Left = 36
|
|
Top = 265
|
|
end
|
|
inherited ButtonBevel: TBevel
|
|
Top = 249
|
|
Width = 296
|
|
end
|
|
object Label1: TLabel[5]
|
|
AnchorSideLeft.Control = CatEdit
|
|
AnchorSideBottom.Control = CatEdit
|
|
Left = 167
|
|
Height = 15
|
|
Top = 21
|
|
Width = 117
|
|
Anchors = [akLeft, akBottom]
|
|
BorderSpacing.Bottom = 2
|
|
Caption = 'Category Code (1,2,...)'
|
|
ParentColor = False
|
|
end
|
|
object Label2: TLabel[6]
|
|
AnchorSideLeft.Control = ObjectEdit
|
|
AnchorSideBottom.Control = ObjectEdit
|
|
Left = 167
|
|
Height = 15
|
|
Top = 109
|
|
Width = 144
|
|
Anchors = [akLeft, akBottom]
|
|
BorderSpacing.Bottom = 2
|
|
Caption = 'Object or Subject Classified'
|
|
ParentColor = False
|
|
end
|
|
object Label3: TLabel[7]
|
|
AnchorSideLeft.Control = RaterEdit
|
|
AnchorSideBottom.Control = RaterEdit
|
|
Left = 167
|
|
Height = 15
|
|
Top = 197
|
|
Width = 101
|
|
Anchors = [akLeft, akBottom]
|
|
BorderSpacing.Bottom = 2
|
|
Caption = 'Rater Codes (1,2,...)'
|
|
ParentColor = False
|
|
end
|
|
object Label4: TLabel[8]
|
|
AnchorSideLeft.Control = ParamsPanel
|
|
AnchorSideTop.Control = ParamsPanel
|
|
Left = 0
|
|
Height = 15
|
|
Top = 0
|
|
Width = 49
|
|
Caption = 'Variables:'
|
|
ParentColor = False
|
|
end
|
|
object VarList: TListBox[9]
|
|
AnchorSideLeft.Control = ParamsPanel
|
|
AnchorSideTop.Control = Label4
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = CatIn
|
|
AnchorSideBottom.Side = asrBottom
|
|
Left = 0
|
|
Height = 232
|
|
Top = 17
|
|
Width = 129
|
|
Anchors = [akTop, akLeft, akRight, akBottom]
|
|
BorderSpacing.Top = 2
|
|
BorderSpacing.Right = 6
|
|
ItemHeight = 0
|
|
OnDblClick = VarListDblClick
|
|
OnSelectionChange = VarListSelectionChange
|
|
TabOrder = 4
|
|
end
|
|
object CatIn: TBitBtn[10]
|
|
AnchorSideLeft.Control = ParamsPanel
|
|
AnchorSideLeft.Side = asrCenter
|
|
AnchorSideTop.Control = VarList
|
|
Left = 135
|
|
Height = 26
|
|
Top = 17
|
|
Width = 26
|
|
Images = MainDataModule.ImageList
|
|
ImageIndex = 1
|
|
OnClick = CatInClick
|
|
Spacing = 0
|
|
TabOrder = 5
|
|
end
|
|
object CatOut: TBitBtn[11]
|
|
AnchorSideLeft.Control = ParamsPanel
|
|
AnchorSideLeft.Side = asrCenter
|
|
AnchorSideTop.Control = CatIn
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 135
|
|
Height = 26
|
|
Top = 47
|
|
Width = 26
|
|
BorderSpacing.Top = 4
|
|
Images = MainDataModule.ImageList
|
|
ImageIndex = 0
|
|
OnClick = CatOutClick
|
|
Spacing = 0
|
|
TabOrder = 6
|
|
end
|
|
object ObjIn: TBitBtn[12]
|
|
AnchorSideLeft.Control = ParamsPanel
|
|
AnchorSideLeft.Side = asrCenter
|
|
AnchorSideTop.Control = CatOut
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 135
|
|
Height = 26
|
|
Top = 105
|
|
Width = 26
|
|
BorderSpacing.Top = 32
|
|
Images = MainDataModule.ImageList
|
|
ImageIndex = 1
|
|
OnClick = ObjInClick
|
|
Spacing = 0
|
|
TabOrder = 7
|
|
end
|
|
object ObjOut: TBitBtn[13]
|
|
AnchorSideLeft.Control = ParamsPanel
|
|
AnchorSideLeft.Side = asrCenter
|
|
AnchorSideTop.Control = ObjIn
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 135
|
|
Height = 26
|
|
Top = 135
|
|
Width = 26
|
|
BorderSpacing.Top = 4
|
|
Images = MainDataModule.ImageList
|
|
ImageIndex = 0
|
|
OnClick = ObjOutClick
|
|
Spacing = 0
|
|
TabOrder = 8
|
|
end
|
|
object RaterIn: TBitBtn[14]
|
|
AnchorSideLeft.Control = ParamsPanel
|
|
AnchorSideLeft.Side = asrCenter
|
|
AnchorSideTop.Control = ObjOut
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 135
|
|
Height = 26
|
|
Top = 193
|
|
Width = 26
|
|
BorderSpacing.Top = 32
|
|
Images = MainDataModule.ImageList
|
|
ImageIndex = 1
|
|
OnClick = RaterInClick
|
|
Spacing = 0
|
|
TabOrder = 9
|
|
end
|
|
object RaterOut: TBitBtn[15]
|
|
AnchorSideLeft.Control = ParamsPanel
|
|
AnchorSideLeft.Side = asrCenter
|
|
AnchorSideTop.Control = RaterIn
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 135
|
|
Height = 26
|
|
Top = 223
|
|
Width = 26
|
|
BorderSpacing.Top = 4
|
|
Images = MainDataModule.ImageList
|
|
ImageIndex = 0
|
|
OnClick = RaterOutClick
|
|
Spacing = 0
|
|
TabOrder = 10
|
|
end
|
|
object CatEdit: TEdit[16]
|
|
AnchorSideLeft.Control = CatIn
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = ParamsPanel
|
|
AnchorSideRight.Side = asrBottom
|
|
AnchorSideBottom.Control = CatOut
|
|
AnchorSideBottom.Side = asrBottom
|
|
Left = 167
|
|
Height = 23
|
|
Top = 38
|
|
Width = 129
|
|
Anchors = [akLeft, akRight, akBottom]
|
|
BorderSpacing.Left = 6
|
|
BorderSpacing.Bottom = 12
|
|
ReadOnly = True
|
|
TabOrder = 11
|
|
Text = 'CatEdit'
|
|
end
|
|
object ObjectEdit: TEdit[17]
|
|
AnchorSideLeft.Control = CatIn
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideRight.Control = ParamsPanel
|
|
AnchorSideRight.Side = asrBottom
|
|
AnchorSideBottom.Control = ObjOut
|
|
AnchorSideBottom.Side = asrBottom
|
|
Left = 167
|
|
Height = 23
|
|
Top = 126
|
|
Width = 129
|
|
Anchors = [akLeft, akRight, akBottom]
|
|
BorderSpacing.Left = 6
|
|
BorderSpacing.Bottom = 12
|
|
ReadOnly = True
|
|
TabOrder = 12
|
|
Text = 'ObjectEdit'
|
|
end
|
|
object RaterEdit: TEdit[18]
|
|
AnchorSideLeft.Control = CatIn
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = RaterIn
|
|
AnchorSideRight.Control = ParamsPanel
|
|
AnchorSideRight.Side = asrBottom
|
|
AnchorSideBottom.Control = RaterOut
|
|
AnchorSideBottom.Side = asrBottom
|
|
Left = 167
|
|
Height = 23
|
|
Top = 214
|
|
Width = 129
|
|
Anchors = [akLeft, akRight, akBottom]
|
|
BorderSpacing.Left = 6
|
|
BorderSpacing.Bottom = 12
|
|
ReadOnly = True
|
|
TabOrder = 13
|
|
Text = 'RaterEdit'
|
|
end
|
|
end
|
|
inherited ParamsSplitter: TSplitter
|
|
Left = 308
|
|
Height = 306
|
|
end
|
|
end
|