object CheckListBoxEditorDlg: TCheckListBoxEditorDlg Left = 316 Height = 294 Top = 154 Width = 445 BorderIcons = [biSystemMenu] BorderStyle = bsDialog Caption = 'CheckListBoxEditorDlg' ClientHeight = 294 ClientWidth = 445 Constraints.MinHeight = 100 Constraints.MinWidth = 200 OnClose = FormClose OnCreate = FormCreate Position = poScreenCenter LCLVersion = '1.9.0.0' object FCheck: TCheckListBox Left = 0 Height = 231 Top = 24 Width = 445 Align = alClient ItemHeight = 0 OnClick = FCheckClick TabOrder = 0 end object ToolBar: TToolBar Left = 0 Height = 24 Top = 0 Width = 445 AutoSize = True Caption = 'ToolBar' ParentShowHint = False ShowHint = True TabOrder = 1 object tbAdd: TToolButton Left = 1 Top = 2 Action = actAdd ParentShowHint = False ShowHint = True end object tbDelete: TToolButton Left = 24 Top = 2 Action = actDel ParentShowHint = False ShowHint = True end object ToolButton3: TToolButton Left = 47 Height = 22 Top = 2 Caption = 'ToolButton3' Style = tbsDivider end object tbUp: TToolButton Left = 52 Top = 2 Action = actMoveUp ParentShowHint = False ShowHint = True end object tbDown: TToolButton Left = 75 Top = 2 Action = actMoveDown ParentShowHint = False ShowHint = True end object ToolButton6: TToolButton Left = 98 Height = 22 Top = 2 Caption = 'ToolButton6' Style = tbsDivider end object tbEdit: TToolButton Left = 103 Top = 2 Action = actEdit ParentShowHint = False ShowHint = True end end object BtnPanel: TButtonPanel Left = 6 Height = 27 Top = 261 Width = 433 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 = 2 ShowBevel = False end object ActionList1: TActionList left = 128 top = 64 object actAdd: TAction Caption = 'Add' OnExecute = actAddExecute ShortCut = 45 end object actDel: TAction Caption = 'actDel' OnExecute = actDelExecute ShortCut = 46 end object actMoveUp: TAction Caption = 'actMoveUp' OnExecute = actMoveUpExecute end object actMoveDown: TAction Caption = 'actMoveDown' OnExecute = actMoveDownExecute end object actEdit: TAction Caption = 'Edit' OnExecute = actEditExecute end end end