lazarus-ccr/components/rx/trunk/rxcontrols/rxtbrsetup.lfm

object ToolPanelSetupForm: TToolPanelSetupForm
  Left = 383
  Height = 487
  Top = 176
  Width = 657
  ActiveControl = PageControl1
  Caption = 'Tool panel setup'
  ClientHeight = 487
  ClientWidth = 657
  OnClose = FormClose
  OnResize = FormResize
  Position = poScreenCenter
  LCLVersion = '2.1.0.0'
  object PageControl1: TPageControl
    Left = 0
    Height = 429
    Top = 0
    Width = 657
    ActivePage = TabSheet1
    Align = alClient
    TabIndex = 0
    TabOrder = 0
    object TabSheet1: TTabSheet
      Caption = 'Visible buttons'
      ClientHeight = 398
      ClientWidth = 647
      object Label1: TLabel
        AnchorSideLeft.Control = btnLeft2
        AnchorSideLeft.Side = asrBottom
        AnchorSideTop.Control = TabSheet1
        Left = 339
        Height = 17
        Top = 6
        Width = 105
        BorderSpacing.Around = 6
        Caption = 'Avaliable buttons'
        FocusControl = ListBtnAvaliable
        ParentColor = False
      end
      object Label2: TLabel
        AnchorSideTop.Control = TabSheet1
        Left = 8
        Height = 17
        Top = 6
        Width = 90
        BorderSpacing.Around = 6
        Caption = 'Visible buttons'
        FocusControl = ListBtnVisible
        ParentColor = False
      end
      object btnLeft2: TBitBtn
        AnchorSideLeft.Control = btnRight2
        AnchorSideTop.Control = btnLeft
        AnchorSideTop.Side = asrBottom
        AnchorSideRight.Control = btnRight2
        AnchorSideRight.Side = asrBottom
        Left = 313
        Height = 30
        Top = 125
        Width = 20
        Anchors = [akTop, akLeft, akRight]
        BorderSpacing.Top = 6
        BorderSpacing.InnerBorder = 2
        OnClick = btnLeft2Click
        TabOrder = 0
      end
      object btnLeft: TBitBtn
        AnchorSideLeft.Control = btnRight2
        AnchorSideTop.Control = btnRight
        AnchorSideTop.Side = asrBottom
        AnchorSideRight.Control = btnRight2
        AnchorSideRight.Side = asrBottom
        Left = 313
        Height = 20
        Top = 99
        Width = 20
        Anchors = [akTop, akLeft, akRight]
        AutoSize = True
        BorderSpacing.Top = 6
        BorderSpacing.InnerBorder = 2
        OnClick = btnLeftClick
        TabOrder = 1
      end
      object btnRight: TBitBtn
        AnchorSideLeft.Control = btnRight2
        AnchorSideTop.Control = btnRight2
        AnchorSideTop.Side = asrBottom
        AnchorSideRight.Control = btnRight2
        AnchorSideRight.Side = asrBottom
        Left = 313
        Height = 38
        Top = 55
        Width = 20
        Anchors = [akTop, akLeft, akRight]
        BorderSpacing.Top = 6
        BorderSpacing.InnerBorder = 2
        OnClick = btnRightClick
        TabOrder = 2
      end
      object btnRight2: TBitBtn
        AnchorSideLeft.Control = TabSheet1
        AnchorSideLeft.Side = asrCenter
        AnchorSideTop.Control = ListBtnAvaliable
        Left = 313
        Height = 20
        Top = 29
        Width = 20
        AutoSize = True
        BorderSpacing.InnerBorder = 2
        OnClick = btnRight2Click
        TabOrder = 3
      end
      object ListBtnAvaliable: TListBox
        AnchorSideLeft.Control = btnLeft2
        AnchorSideLeft.Side = asrBottom
        AnchorSideTop.Control = Label1
        AnchorSideTop.Side = asrBottom
        AnchorSideRight.Control = TabSheet1
        AnchorSideRight.Side = asrBottom
        AnchorSideBottom.Control = cbShowCaption
        Left = 339
        Height = 266
        Top = 29
        Width = 302
        Anchors = [akTop, akLeft, akRight, akBottom]
        BorderSpacing.Around = 6
        IntegralHeight = True
        Items.Strings = (
          '111'
          '222'
          '333'
          '44'
          '555'
          '666'
          '777'
        )
        ItemHeight = 0
        OnClick = ListBtnAvaliableClick
        OnDblClick = ListBtnVisibleDblClick
        OnDrawItem = ListBox1DrawItem
        ScrollWidth = 300
        Style = lbOwnerDrawFixed
        TabOrder = 4
      end
      object ListBtnVisible: TListBox
        AnchorSideLeft.Control = btnUp
        AnchorSideLeft.Side = asrBottom
        AnchorSideTop.Control = Label2
        AnchorSideTop.Side = asrBottom
        AnchorSideRight.Control = btnRight2
        AnchorSideBottom.Control = cbShowCaption
        Left = 32
        Height = 266
        Top = 29
        Width = 275
        Anchors = [akTop, akLeft, akRight, akBottom]
        BorderSpacing.Around = 6
        DragMode = dmAutomatic
        ItemHeight = 0
        OnClick = ListBtnAvaliableClick
        OnDblClick = ListBtnVisibleDblClick
        OnDragDrop = ListBtnVisibleDragDrop
        OnDragOver = ListBtnVisibleDragOver
        OnDrawItem = ListBox1DrawItem
        ScrollWidth = 273
        Style = lbOwnerDrawFixed
        TabOrder = 5
        TopIndex = -1
      end
      object Panel1: TPanel
        AnchorSideBottom.Control = TabSheet1
        AnchorSideBottom.Side = asrBottom
        Left = 3
        Height = 62
        Top = 330
        Width = 635
        Alignment = taLeftJustify
        Anchors = [akLeft, akRight, akBottom]
        BorderSpacing.Around = 6
        BevelOuter = bvLowered
        FullRepaint = False
        TabOrder = 6
      end
      object cbShowCaption: TCheckBox
        AnchorSideLeft.Control = TabSheet1
        AnchorSideBottom.Control = Panel1
        Left = 6
        Height = 23
        Top = 301
        Width = 108
        Anchors = [akLeft, akBottom]
        BorderSpacing.Around = 6
        Caption = 'Show caption'
        OnChange = cbShowCaptionChange
        TabOrder = 7
      end
      object btnUp: TBitBtn
        Tag = -1
        AnchorSideLeft.Control = TabSheet1
        AnchorSideTop.Control = Label2
        AnchorSideTop.Side = asrBottom
        AnchorSideRight.Control = btnRight2
        AnchorSideRight.Side = asrBottom
        Left = 6
        Height = 20
        Top = 29
        Width = 20
        AutoSize = True
        BorderSpacing.Around = 6
        BorderSpacing.InnerBorder = 2
        OnClick = btnUpClick
        TabOrder = 8
      end
      object btnDown: TBitBtn
        Tag = 1
        AnchorSideLeft.Control = TabSheet1
        AnchorSideTop.Control = btnUp
        AnchorSideTop.Side = asrBottom
        AnchorSideRight.Control = btnRight2
        AnchorSideRight.Side = asrBottom
        Left = 6
        Height = 20
        Top = 55
        Width = 20
        AutoSize = True
        BorderSpacing.Around = 6
        BorderSpacing.InnerBorder = 2
        OnClick = btnUpClick
        TabOrder = 9
      end
    end
    object TabSheet2: TTabSheet
      Caption = 'Options'
      ClientHeight = 398
      ClientWidth = 647
      object cbShowHint: TCheckBox
        AnchorSideLeft.Control = TabSheet2
        AnchorSideTop.Control = cbTransp
        AnchorSideTop.Side = asrBottom
        Left = 6
        Height = 23
        Top = 169
        Width = 87
        BorderSpacing.Around = 6
        Caption = 'Show hint'
        TabOrder = 0
      end
      object cbTransp: TCheckBox
        AnchorSideLeft.Control = TabSheet2
        AnchorSideTop.Control = cbFlatBtn
        AnchorSideTop.Side = asrBottom
        Left = 6
        Height = 23
        Top = 140
        Width = 100
        BorderSpacing.Around = 6
        Caption = 'Transparent'
        TabOrder = 1
      end
      object cbFlatBtn: TCheckBox
        AnchorSideLeft.Control = TabSheet2
        AnchorSideTop.Control = RadioGroup1
        AnchorSideTop.Side = asrBottom
        Left = 6
        Height = 23
        Top = 111
        Width = 100
        BorderSpacing.Around = 6
        Caption = 'Flat buttons'
        TabOrder = 2
      end
      object RadioGroup1: TRadioGroup
        AnchorSideLeft.Control = Panel2
        AnchorSideLeft.Side = asrBottom
        AnchorSideTop.Control = TabSheet2
        AnchorSideRight.Control = TabSheet2
        AnchorSideRight.Side = asrBottom
        Left = 331
        Height = 99
        Top = 6
        Width = 310
        Anchors = [akTop, akLeft, akRight]
        AutoFill = False
        AutoSize = True
        BorderSpacing.Around = 6
        Caption = 'Button align'
        ChildSizing.LeftRightSpacing = 6
        ChildSizing.TopBottomSpacing = 6
        ChildSizing.ShrinkHorizontal = crsScaleChilds
        ChildSizing.ShrinkVertical = crsScaleChilds
        ChildSizing.Layout = cclLeftToRightThenTopToBottom
        ChildSizing.ControlsPerLine = 1
        ClientHeight = 81
        ClientWidth = 308
        Items.Strings = (
          'None'
          'Left'
          'Rignt'
        )
        TabOrder = 3
        TabStop = True
      end
      object RadioGroup2: TRadioGroup
        AnchorSideLeft.Control = TabSheet2
        AnchorSideTop.Control = TabSheet2
        AnchorSideRight.Control = Panel2
        Left = 6
        Height = 99
        Top = 6
        Width = 310
        Anchors = [akTop, akLeft, akRight]
        AutoFill = True
        AutoSize = True
        BorderSpacing.Around = 6
        Caption = 'Tool bar style'
        ChildSizing.LeftRightSpacing = 6
        ChildSizing.TopBottomSpacing = 6
        ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
        ChildSizing.EnlargeVertical = crsHomogenousChildResize
        ChildSizing.ShrinkHorizontal = crsScaleChilds
        ChildSizing.ShrinkVertical = crsScaleChilds
        ChildSizing.Layout = cclLeftToRightThenTopToBottom
        ChildSizing.ControlsPerLine = 1
        ClientHeight = 81
        ClientWidth = 308
        Items.Strings = (
          'Standart'
          'Windows XP'
          'Native'
        )
        TabOrder = 4
        TabStop = True
      end
      object Panel2: TPanel
        AnchorSideLeft.Control = TabSheet2
        AnchorSideLeft.Side = asrCenter
        AnchorSideTop.Control = TabSheet2
        AnchorSideBottom.Control = TabSheet2
        AnchorSideBottom.Side = asrBottom
        Left = 322
        Height = 386
        Top = 6
        Width = 3
        Anchors = [akTop, akLeft, akBottom]
        BorderSpacing.Around = 6
        TabOrder = 5
      end
    end
  end
  object ButtonPanel1: TButtonPanel
    Left = 6
    Height = 46
    Top = 435
    Width = 645
    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 = [pbClose, pbHelp]
  end
end