inherited KMeansForm: TKMeansForm Left = 664 Height = 389 Top = 318 Width = 657 HelpType = htKeyword HelpKeyword = 'html/KMeansClustering.htm' Caption = 'k Means Clustering ' ClientHeight = 389 ClientWidth = 657 inherited ParamsPanel: TPanel Height = 373 Width = 329 ClientHeight = 373 ClientWidth = 329 TabOrder = 1 inherited CloseBtn: TButton Left = 274 Top = 348 end inherited ComputeBtn: TButton Left = 190 Top = 348 end inherited ResetBtn: TButton Left = 128 Top = 348 end inherited HelpBtn: TButton Tag = 129 Left = 69 Top = 348 end inherited ButtonBevel: TBevel Top = 332 Width = 329 end object Label3: TLabel[5] AnchorSideLeft.Control = ParamsPanel AnchorSideTop.Control = ParamsPanel Left = 8 Height = 15 Top = 0 Width = 97 BorderSpacing.Left = 8 Caption = 'Available Variables' ParentColor = False end object VarList: TListBox[6] AnchorSideLeft.Control = ParamsPanel AnchorSideTop.Control = Label3 AnchorSideTop.Side = asrBottom AnchorSideRight.Control = AllBtn AnchorSideBottom.Side = asrBottom Left = 0 Height = 213 Top = 18 Width = 138 Anchors = [akTop, akLeft, akRight, akBottom] BorderSpacing.Top = 3 BorderSpacing.Right = 6 BorderSpacing.Bottom = 8 ItemHeight = 0 MultiSelect = True OnDblClick = VarListDblClick OnSelectionChange = VarListSelectionChange TabOrder = 4 end object VarInBtn: TBitBtn[7] AnchorSideLeft.Control = ParamsPanel AnchorSideLeft.Side = asrCenter Left = 151 Height = 26 Top = 18 Width = 26 Images = MainDataModule.ImageList ImageIndex = 1 OnClick = VarInBtnClick Spacing = 0 TabOrder = 5 end object VarOutBtn: TBitBtn[8] AnchorSideLeft.Control = ParamsPanel AnchorSideLeft.Side = asrCenter AnchorSideTop.Side = asrBottom Left = 151 Height = 26 Top = 50 Width = 26 BorderSpacing.Top = 4 Images = MainDataModule.ImageList ImageIndex = 0 OnClick = VarOutBtnClick Spacing = 0 TabOrder = 6 end object AllBtn: TBitBtn[9] AnchorSideLeft.Control = ParamsPanel AnchorSideLeft.Side = asrCenter AnchorSideTop.Side = asrBottom Left = 144 Height = 25 Top = 102 Width = 40 AutoSize = True BorderSpacing.Top = 24 Caption = 'All' OnClick = AllBtnClick Spacing = 0 TabOrder = 7 end object SelList: TListBox[10] AnchorSideLeft.Control = AllBtn AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = Label4 AnchorSideTop.Side = asrBottom AnchorSideRight.Control = ParamsPanel AnchorSideRight.Side = asrBottom AnchorSideBottom.Side = asrBottom Left = 190 Height = 213 Top = 18 Width = 139 Anchors = [akTop, akLeft, akRight, akBottom] BorderSpacing.Left = 6 BorderSpacing.Top = 3 ItemHeight = 0 MultiSelect = True OnDblClick = SelListDblClick OnSelectionChange = VarListSelectionChange TabOrder = 8 end object Label4: TLabel[11] AnchorSideLeft.Control = SelList AnchorSideTop.Control = ParamsPanel Left = 190 Height = 15 Top = 0 Width = 93 Caption = 'Selected Variables' ParentColor = False end object Label1: TLabel[12] AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = NoClustersEdit AnchorSideTop.Side = asrCenter AnchorSideRight.Control = NoClustersEdit Left = 185 Height = 30 Top = 243 Width = 81 Alignment = taRightJustify Anchors = [akTop, akRight] BorderSpacing.Right = 8 Caption = 'Number of '#13#10'desired clusters' ParentColor = False end object Label2: TLabel[13] AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = ItersEdit AnchorSideTop.Side = asrCenter AnchorSideRight.Control = ItersEdit Left = 181 Height = 15 Top = 286 Width = 85 Anchors = [akTop, akRight] BorderSpacing.Right = 8 Caption = 'No. of Iterations' ParentColor = False end object NoClustersEdit: TEdit[14] AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = GroupBox1 AnchorSideRight.Control = ParamsPanel AnchorSideRight.Side = asrBottom Left = 274 Height = 23 Top = 247 Width = 55 Alignment = taRightJustify Anchors = [akTop, akRight] BorderSpacing.Top = 8 TabOrder = 9 Text = 'NoClustersEdit' end object ItersEdit: TEdit[15] AnchorSideLeft.Control = NoClustersEdit AnchorSideTop.Control = NoClustersEdit AnchorSideTop.Side = asrBottom AnchorSideRight.Control = ParamsPanel AnchorSideRight.Side = asrBottom Left = 274 Height = 23 Top = 282 Width = 55 Alignment = taRightJustify Anchors = [akTop, akLeft, akRight] BorderSpacing.Top = 12 TabOrder = 10 Text = 'ItersEdit' end object GroupBox1: TGroupBox[16] AnchorSideLeft.Control = ParamsPanel AnchorSideRight.Side = asrBottom AnchorSideBottom.Control = ButtonBevel Left = 0 Height = 93 Top = 239 Width = 159 Anchors = [akLeft, akBottom] AutoSize = True BorderSpacing.Right = 16 Caption = 'Analysis Optons' ChildSizing.LeftRightSpacing = 12 ChildSizing.TopBottomSpacing = 6 ChildSizing.VerticalSpacing = 2 ChildSizing.Layout = cclLeftToRightThenTopToBottom ClientHeight = 73 ClientWidth = 155 TabOrder = 11 object StandardizeChk: TCheckBox Left = 12 Height = 19 Top = 6 Width = 131 Caption = 'Standardize Variables' OnChange = StandardizeChkChange TabOrder = 0 end object ReplaceChk: TCheckBox Left = 12 Height = 19 Top = 27 Width = 131 Caption = 'Replace Grid Values' Enabled = False TabOrder = 1 end object DescriptiveChk: TCheckBox Left = 12 Height = 19 Top = 48 Width = 131 Caption = 'Descriptive Statistics' Enabled = False TabOrder = 2 end end end inherited ParamsSplitter: TSplitter Left = 341 Height = 389 end object Panel1: TPanel[2] AnchorSideLeft.Control = Owner AnchorSideTop.Control = Owner AnchorSideRight.Control = Owner AnchorSideRight.Side = asrBottom AnchorSideBottom.Control = ButtonBevel Left = 0 Height = 0 Top = 340 Width = 657 Anchors = [akLeft, akRight, akBottom] AutoSize = True BevelOuter = bvNone TabOrder = 0 end end