lazarus/components/editortoolbar/edttbconfigfrm.lfm

object EdtTbConfigForm: TEdtTbConfigForm
  Left = 676
  Height = 457
  Top = 302
  Width = 772
  Caption = 'EdtTbConfigForm'
  ClientHeight = 457
  ClientWidth = 772
  Constraints.MinHeight = 375
  Constraints.MinWidth = 500
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  Position = poScreenCenter
  LCLVersion = '1.5'
  object lblMenuTree: TLabel
    AnchorSideLeft.Control = TV
    AnchorSideLeft.Side = asrCenter
    Left = 173
    Height = 15
    Top = 14
    Width = 67
    Caption = 'lblMenuTree'
    ParentColor = False
  end
  object lblToolbar: TLabel
    AnchorSideLeft.Control = lvToolbar
    AnchorSideLeft.Side = asrCenter
    AnchorSideTop.Control = lblMenuTree
    Left = 572
    Height = 15
    Top = 14
    Width = 54
    Caption = 'lblToolbar'
    ParentColor = False
  end
  object btnRemove: TSpeedButton
    AnchorSideLeft.Control = btnAdd
    AnchorSideTop.Control = btnAdd
    AnchorSideTop.Side = asrBottom
    Left = 415
    Height = 26
    Top = 118
    Width = 22
    BorderSpacing.Top = 1
    Enabled = False
    OnClick = btnRemoveClick
    ShowHint = True
    ParentShowHint = False
  end
  object btnAdd: TSpeedButton
    AnchorSideLeft.Control = Splitter1
    AnchorSideLeft.Side = asrBottom
    AnchorSideTop.Control = TV
    Left = 415
    Height = 26
    Top = 91
    Width = 22
    BorderSpacing.Left = 6
    BorderSpacing.Top = 25
    Enabled = False
    OnClick = btnAddClick
    ShowHint = True
    ParentShowHint = False
  end
  object btnMoveUp: TSpeedButton
    AnchorSideLeft.Control = btnRemove
    AnchorSideTop.Control = btnRemove
    AnchorSideTop.Side = asrBottom
    Left = 415
    Height = 26
    Top = 169
    Width = 22
    BorderSpacing.Top = 25
    Enabled = False
    OnClick = btnMoveUpClick
    ShowHint = True
    ParentShowHint = False
  end
  object btnMoveDown: TSpeedButton
    AnchorSideLeft.Control = btnMoveUp
    AnchorSideTop.Control = btnMoveUp
    AnchorSideTop.Side = asrBottom
    Left = 415
    Height = 26
    Top = 196
    Width = 22
    BorderSpacing.Top = 1
    Enabled = False
    OnClick = btnMoveDownClick
    ShowHint = True
    ParentShowHint = False
  end
  object TV: TTreeView
    AnchorSideLeft.Control = FilterEdit
    AnchorSideTop.Control = FilterEdit
    AnchorSideTop.Side = asrBottom
    AnchorSideRight.Control = Splitter1
    Left = 16
    Height = 343
    Top = 66
    Width = 381
    Anchors = [akTop, akLeft, akRight, akBottom]
    BorderSpacing.Top = 6
    BorderSpacing.Right = 3
    BorderSpacing.Bottom = 6
    DefaultItemHeight = 18
    ReadOnly = True
    ScrollBars = ssAutoBoth
    TabOrder = 1
    OnSelectionChanged = TVSelectionChanged
    Options = [tvoAutoItemHeight, tvoHideSelection, tvoKeepCollapsedNodes, tvoReadOnly, tvoShowButtons, tvoShowLines, tvoShowRoot, tvoToolTips]
  end
  object FilterEdit: TTreeFilterEdit
    AnchorSideTop.Side = asrBottom
    Left = 16
    Height = 23
    Top = 37
    Width = 192
    UseFormActivate = True
    ButtonWidth = 23
    NumGlyphs = 1
    BorderSpacing.Top = 6
    MaxLength = 0
    ParentFont = False
    TabOrder = 0
    FilteredTreeview = TV
    ExpandAllInitially = True
  end
  object cbPos: TComboBox
    AnchorSideLeft.Side = asrBottom
    AnchorSideTop.Side = asrCenter
    AnchorSideRight.Control = lvToolbar
    AnchorSideRight.Side = asrBottom
    Left = 655
    Height = 23
    Top = 386
    Width = 100
    Anchors = [akRight, akBottom]
    BorderSpacing.Bottom = 6
    ItemHeight = 15
    ItemIndex = 0
    Items.Strings = (
      'Top'
      'Bottom'
      'Right'
      'Left'
    )
    OnChange = cbPosChange
    TabOrder = 2
    Text = 'Top'
  end
  object lblpos: TLabel
    AnchorSideLeft.Side = asrBottom
    AnchorSideTop.Control = cbPos
    AnchorSideTop.Side = asrCenter
    AnchorSideRight.Control = cbPos
    Left = 617
    Height = 15
    Top = 390
    Width = 32
    Anchors = [akTop, akRight]
    BorderSpacing.Right = 6
    Caption = 'lblpos'
    ParentColor = False
  end
  object Splitter1: TSplitter
    AnchorSideLeft.Control = TV
    AnchorSideLeft.Side = asrBottom
    AnchorSideTop.Control = TV
    AnchorSideBottom.Control = TV
    AnchorSideBottom.Side = asrBottom
    Left = 400
    Height = 343
    Top = 66
    Width = 9
    Align = alNone
    Anchors = [akTop, akBottom]
  end
  object lvToolbar: TListView
    AnchorSideLeft.Control = btnAdd
    AnchorSideLeft.Side = asrBottom
    AnchorSideTop.Control = TV
    Left = 443
    Height = 312
    Top = 66
    Width = 312
    Anchors = [akTop, akLeft, akRight, akBottom]
    BorderSpacing.Left = 6
    BorderSpacing.Bottom = 37
    Columns = <    
      item
        AutoSize = True
        Caption = 'Name'
        Width = 308
      end    
      item
        AutoSize = True
        Caption = 'Profile'
        Visible = False
        Width = 0
      end>
    HideSelection = False
    PopupMenu = puMenuItems
    ReadOnly = True
    ScrollBars = ssAutoBoth
    ShowColumnHeaders = False
    TabOrder = 4
    ViewStyle = vsReport
    OnDrawItem = lvToolbarDrawItem
    OnSelectItem = lvToolbarSelectItem
  end
  object sbAddDivider: TSpeedButton
    AnchorSideLeft.Control = btnAdd
    AnchorSideTop.Control = btnMoveDown
    AnchorSideTop.Side = asrBottom
    Left = 415
    Height = 26
    Top = 320
    Width = 22
    Anchors = [akLeft, akBottom]
    BorderSpacing.Top = 50
    OnClick = btnAddDividerClick
    ShowHint = True
    ParentShowHint = False
  end
  object lbSelect: TLabel
    AnchorSideLeft.Control = lvToolbar
    AnchorSideTop.Control = FilterEdit
    AnchorSideRight.Control = lvToolbar
    AnchorSideRight.Side = asrBottom
    Left = 714
    Height = 15
    Top = 37
    Width = 41
    Anchors = [akTop, akRight]
    Caption = 'lbSelect'
    ParentColor = False
    Visible = False
  end
  object btnClear: TSpeedButton
    AnchorSideLeft.Control = btnAdd
    AnchorSideBottom.Control = lvToolbar
    AnchorSideBottom.Side = asrBottom
    Left = 415
    Height = 26
    Top = 352
    Width = 22
    Anchors = [akLeft, akBottom]
    Enabled = False
    OnClick = btnClearClick
    ShowHint = True
    ParentShowHint = False
  end
  object btnShow: TButton
    Left = 443
    Height = 25
    Top = 384
    Width = 50
    Caption = 'Show'
    OnClick = btnShowClick
    TabOrder = 5
    Visible = False
  end
  object btnHide: TButton
    Left = 496
    Height = 25
    Top = 384
    Width = 50
    Caption = 'Hide'
    OnClick = btnHideClick
    TabOrder = 6
    Visible = False
  end
  object pnlButtons: TButtonPanel
    Left = 6
    Height = 34
    Top = 417
    Width = 760
    OKButton.Name = 'OKButton'
    OKButton.DefaultCaption = True
    OKButton.OnClick = OKButtonClick
    HelpButton.Name = 'HelpButton'
    HelpButton.DefaultCaption = True
    HelpButton.OnClick = HelpButtonClick
    CloseButton.Name = 'CloseButton'
    CloseButton.DefaultCaption = True
    CancelButton.Name = 'CancelButton'
    CancelButton.DefaultCaption = True
    TabOrder = 7
    OnResize = pnlButtonsResize
    ShowButtons = [pbOK, pbCancel, pbHelp]
    ShowGlyphs = [pbOK, pbCancel, pbHelp]
    object cbProfile: TComboBox
      AnchorSideLeft.Side = asrCenter
      AnchorSideBottom.Side = asrCenter
      Left = 336
      Height = 23
      Top = 9
      Width = 100
      Anchors = [akRight, akBottom]
      BorderSpacing.Bottom = 6
      ItemHeight = 15
      ItemIndex = 0
      Items.Strings = (
        'All'
        'Design'
        'Debug'
        'HTML'
        'Custom'
        ''
      )
      OnChange = cbProfileChange
      TabOrder = 4
      Text = 'All'
    end
    object lblProfile: TLabel
      AnchorSideTop.Side = asrCenter
      Left = 292
      Height = 15
      Top = 13
      Width = 34
      Anchors = [akLeft, akBottom]
      BorderSpacing.Right = 10
      Caption = 'Profile'
      ParentColor = False
    end
  end
  object puMenuItems: TPopupMenu
    OnPopup = puMenuItemsPopup
    left = 421
    top = 16
    object miAll: TMenuItem
      AutoCheck = True
      Caption = 'All'
      OnClick = miAllClick
    end
    object miDesign: TMenuItem
      AutoCheck = True
      Caption = 'Design'
      OnClick = miDesignClick
    end
    object miDebug: TMenuItem
      AutoCheck = True
      Caption = 'Debug'
      OnClick = miDebugClick
    end
    object miHTML: TMenuItem
      AutoCheck = True
      Caption = 'HTML'
      OnClick = miHTMLClick
    end
    object miCustom: TMenuItem
      AutoCheck = True
      Caption = 'Custom'
      OnClick = miCustomClick
    end
  end
end