object ToolPanelSetupForm: TToolPanelSetupForm Left = 383 Height = 487 Top = 176 Width = 657 ActiveControl = PageControl1 Caption = 'Tool panel setup' ClientHeight = 487 ClientWidth = 657 FormStyle = fsStayOnTop OnClose = FormClose OnCreate = FormCreate OnDestroy = FormDestroy OnResize = FormResize Position = poScreenCenter LCLVersion = '0.9.29' object PageControl1: TPageControl Left = 0 Height = 435 Top = 0 Width = 657 ActivePage = TabSheet1 Align = alClient TabIndex = 0 TabOrder = 0 object TabSheet1: TTabSheet Caption = 'Visible buttons' ClientHeight = 404 ClientWidth = 653 object Label1: TLabel AnchorSideLeft.Control = BitBtn3 AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = TabSheet1 Left = 350 Height = 18 Top = 6 Width = 118 BorderSpacing.Around = 6 Caption = 'Avaliable buttons' FocusControl = ListBtnAvaliable ParentColor = False end object Label2: TLabel AnchorSideTop.Control = TabSheet1 Left = 8 Height = 18 Top = 6 Width = 102 BorderSpacing.Around = 6 Caption = 'Visible buttons' FocusControl = ListBtnVisible ParentColor = False end object BitBtn3: TBitBtn AnchorSideLeft.Control = BitBtn6 AnchorSideTop.Control = BitBtn4 AnchorSideTop.Side = asrBottom AnchorSideRight.Control = BitBtn6 AnchorSideRight.Side = asrBottom Left = 309 Height = 30 Top = 148 Width = 35 Anchors = [akTop, akLeft, akRight] BorderSpacing.Top = 6 BorderSpacing.InnerBorder = 2 Caption = '<<' NumGlyphs = 0 OnClick = BitBtn3Click TabOrder = 0 end object BitBtn4: TBitBtn AnchorSideLeft.Control = BitBtn6 AnchorSideTop.Control = BitBtn5 AnchorSideTop.Side = asrBottom AnchorSideRight.Control = BitBtn6 AnchorSideRight.Side = asrBottom Left = 309 Height = 31 Top = 111 Width = 35 Anchors = [akTop, akLeft, akRight] AutoSize = True BorderSpacing.Top = 6 BorderSpacing.InnerBorder = 2 Caption = '<' NumGlyphs = 0 OnClick = BitBtn4Click TabOrder = 1 end object BitBtn5: TBitBtn AnchorSideLeft.Control = BitBtn6 AnchorSideTop.Control = BitBtn6 AnchorSideTop.Side = asrBottom AnchorSideRight.Control = BitBtn6 AnchorSideRight.Side = asrBottom Left = 309 Height = 38 Top = 67 Width = 35 Anchors = [akTop, akLeft, akRight] BorderSpacing.Top = 6 BorderSpacing.InnerBorder = 2 Caption = '>' NumGlyphs = 0 OnClick = BitBtn5Click TabOrder = 2 end object BitBtn6: TBitBtn AnchorSideLeft.Control = TabSheet1 AnchorSideLeft.Side = asrCenter AnchorSideTop.Control = ListBtnAvaliable Left = 309 Height = 31 Top = 30 Width = 35 AutoSize = True BorderSpacing.InnerBorder = 2 Caption = '>>' NumGlyphs = 0 OnClick = BitBtn6Click TabOrder = 3 end object ListBtnAvaliable: TListBox AnchorSideLeft.Control = BitBtn3 AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = Label1 AnchorSideTop.Side = asrBottom AnchorSideRight.Control = TabSheet1 AnchorSideRight.Side = asrBottom AnchorSideBottom.Control = cbShowCaption Left = 350 Height = 275 Top = 30 Width = 297 Anchors = [akTop, akLeft, akRight, akBottom] BorderSpacing.Around = 6 Items.Strings = ( '111' '222' '333' '44' '555' '666' '777' ) ItemHeight = 0 OnClick = ListBtnAvaliableClick OnDrawItem = ListBox1DrawItem Style = lbOwnerDrawFixed TabOrder = 4 end object ListBtnVisible: TListBox AnchorSideLeft.Control = Label2 AnchorSideTop.Control = Label2 AnchorSideTop.Side = asrBottom AnchorSideRight.Control = BitBtn6 AnchorSideBottom.Control = cbShowCaption Left = 14 Height = 275 Top = 30 Width = 289 Anchors = [akTop, akLeft, akRight, akBottom] BorderSpacing.Around = 6 ItemHeight = 0 OnClick = ListBtnAvaliableClick OnDrawItem = ListBox1DrawItem Style = lbOwnerDrawFixed TabOrder = 5 TopIndex = -1 end object Panel1: TPanel AnchorSideBottom.Control = TabSheet1 AnchorSideBottom.Side = asrBottom Left = 3 Height = 62 Top = 336 Width = 641 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 = 19 Top = 311 Width = 112 Anchors = [akLeft, akBottom] BorderSpacing.Around = 6 Caption = 'Show caption' OnChange = cbShowCaptionChange TabOrder = 7 end end object TabSheet2: TTabSheet Caption = 'Options' ClientHeight = 404 ClientWidth = 653 object cbShowHint: TCheckBox AnchorSideLeft.Control = TabSheet2 AnchorSideTop.Control = cbTransp AnchorSideTop.Side = asrBottom Left = 6 Height = 19 Top = 148 Width = 88 BorderSpacing.Around = 6 Caption = 'Show hint' TabOrder = 0 end object cbTransp: TCheckBox AnchorSideLeft.Control = TabSheet2 AnchorSideTop.Control = cbFlatBtn AnchorSideTop.Side = asrBottom Left = 6 Height = 19 Top = 123 Width = 101 BorderSpacing.Around = 6 Caption = 'Transparent' TabOrder = 1 end object cbFlatBtn: TCheckBox AnchorSideLeft.Control = TabSheet2 AnchorSideTop.Control = RadioGroup1 AnchorSideTop.Side = asrBottom Left = 6 Height = 19 Top = 98 Width = 101 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 = 334 Height = 86 Top = 6 Width = 313 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 = 69 ClientWidth = 313 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 = 86 Top = 6 Width = 313 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 = 69 ClientWidth = 313 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 = 325 Height = 392 Top = 6 Width = 3 Anchors = [akTop, akLeft, akBottom] BorderSpacing.Around = 6 TabOrder = 5 end end end object ButtonPanel1: TButtonPanel Left = 6 Height = 40 Top = 441 Width = 645 TabOrder = 1 ShowButtons = [pbClose, pbHelp] end end