object KeyValPropEditorFrm: TKeyValPropEditorFrm Left = 416 Height = 302 Top = 487 Width = 400 Caption = 'KeyValPropEditorFrm' ClientHeight = 302 ClientWidth = 400 Constraints.MinHeight = 160 Constraints.MinWidth = 180 OnClose = FormClose OnCreate = FormCreate Position = poScreenCenter LCLVersion = '1.9.0.0' object TextGroupBox: TGroupBox AnchorSideLeft.Control = Owner AnchorSideTop.Control = Owner AnchorSideRight.Control = Owner AnchorSideRight.Side = asrBottom AnchorSideBottom.Control = BtnPanel Left = 6 Height = 257 Top = 6 Width = 388 Align = alTop Anchors = [akTop, akLeft, akRight, akBottom] BorderSpacing.Around = 6 ClientHeight = 253 ClientWidth = 384 TabOrder = 0 object StatusLabel: TLabel AnchorSideBottom.Control = TextGroupBox AnchorSideBottom.Side = asrBottom Left = 9 Height = 15 Top = 232 Width = 71 Anchors = [akLeft, akBottom] BorderSpacing.Around = 6 Caption = 'StatusLabel' ParentColor = False end object SortButton: TButton AnchorSideLeft.Side = asrBottom AnchorSideRight.Control = TextGroupBox AnchorSideRight.Side = asrBottom Left = 274 Height = 25 Top = 6 Width = 104 Anchors = [akTop, akRight] AutoSize = True BorderSpacing.Around = 6 Caption = 'Sort (not used)' Constraints.MinWidth = 75 OnClick = SortButtonClick TabOrder = 0 end object ValueListEdit: TValueListEditor AnchorSideLeft.Control = TextGroupBox AnchorSideRight.Control = SortButton AnchorSideBottom.Control = StatusLabel Left = 6 Height = 220 Top = 6 Width = 262 Anchors = [akTop, akLeft, akRight, akBottom] BorderSpacing.Around = 6 DefaultColWidth = 100 FixedCols = 0 RowCount = 2 TabOrder = 1 KeyOptions = [keyEdit, keyAdd, keyDelete] Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goColSizing, goEditing, goAutoAddRows, goAlwaysShowEditor, goThumbTracking] Strings.Strings = ( '' ) ColWidths = ( 100 158 ) end end object BtnPanel: TButtonPanel Left = 6 Height = 27 Top = 269 Width = 388 OKButton.Name = 'OKButton' OKButton.DefaultCaption = True HelpButton.Name = 'HelpButton' HelpButton.DefaultCaption = True CloseButton.Name = 'CloseButton' CloseButton.DefaultCaption = True CancelButton.Name = 'CancelButton' CancelButton.DefaultCaption = True TabOrder = 1 ShowButtons = [pbOK, pbCancel] ShowBevel = False end end