object IdeCoolbarOptionsFrame: TIdeCoolbarOptionsFrame Left = 0 Height = 451 Top = 0 Width = 520 ClientHeight = 451 ClientWidth = 520 TabOrder = 0 DesignLeft = 744 DesignTop = 282 object pnBottom: TPanel AnchorSideLeft.Control = Owner AnchorSideTop.Control = dbAddConfigDelete AnchorSideTop.Side = asrBottom AnchorSideRight.Control = Owner AnchorSideRight.Side = asrBottom AnchorSideBottom.Control = Owner AnchorSideBottom.Side = asrBottom Left = 0 Height = 264 Top = 187 Width = 520 Align = alClient BorderSpacing.Top = 6 BevelOuter = bvNone ClientHeight = 264 ClientWidth = 520 Constraints.MinHeight = 115 TabOrder = 1 object pnButtons: TPanel AnchorSideLeft.Control = pnBottom AnchorSideRight.Control = pnBottom AnchorSideRight.Side = asrBottom AnchorSideBottom.Control = lblNoAutoSaveActiveDesktop Left = 0 Height = 35 Top = 210 Width = 520 Anchors = [akLeft, akRight, akBottom] AutoSize = True BevelOuter = bvNone ClientHeight = 35 ClientWidth = 520 Constraints.MinHeight = 35 TabOrder = 1 object bAdd: TBitBtn AnchorSideLeft.Control = pnButtons AnchorSideBottom.Control = pnButtons AnchorSideBottom.Side = asrBottom Left = 6 Height = 23 Top = 6 Width = 45 Anchors = [akLeft, akBottom] AutoSize = True BorderSpacing.Left = 6 BorderSpacing.Bottom = 6 Caption = 'Add' OnClick = bAddClick TabOrder = 0 end object bDelete: TBitBtn AnchorSideLeft.Control = bConfig AnchorSideLeft.Side = asrBottom AnchorSideBottom.Control = pnButtons AnchorSideBottom.Side = asrBottom Left = 120 Height = 23 Top = 6 Width = 57 Anchors = [akLeft, akBottom] AutoSize = True BorderSpacing.Left = 6 BorderSpacing.Bottom = 6 Caption = 'Delete' OnClick = bDeleteClick TabOrder = 2 end object bConfig: TBitBtn AnchorSideLeft.Control = bAdd AnchorSideLeft.Side = asrBottom AnchorSideBottom.Control = pnButtons AnchorSideBottom.Side = asrBottom Left = 57 Height = 23 Top = 6 Width = 57 Anchors = [akLeft, akBottom] AutoSize = True BorderSpacing.Left = 6 BorderSpacing.Bottom = 6 Caption = 'Config' OnClick = bConfigClick TabOrder = 1 end object bDefaultToolbar: TBitBtn AnchorSideRight.Control = pnButtons AnchorSideRight.Side = asrBottom AnchorSideBottom.Control = pnButtons AnchorSideBottom.Side = asrBottom Left = 453 Height = 23 Top = 6 Width = 61 Anchors = [akRight, akBottom] AutoSize = True BorderSpacing.Right = 6 BorderSpacing.Bottom = 6 Caption = 'Default' OnClick = bDefaultToolbarClick TabOrder = 3 end end object sbCoolBar: TScrollBox AnchorSideLeft.Control = pnBottom AnchorSideTop.Control = pnBottom AnchorSideRight.Control = pnBottom AnchorSideRight.Side = asrBottom AnchorSideBottom.Control = pnButtons Left = 0 Height = 198 Top = 0 Width = 520 HorzScrollBar.Page = 75 VertScrollBar.Page = 25 Anchors = [akTop, akLeft, akRight, akBottom] BorderSpacing.Bottom = 12 BorderStyle = bsNone ClientHeight = 198 ClientWidth = 520 Constraints.MinHeight = 75 TabOrder = 0 object Coolbar: TCoolBar Left = 0 Height = 25 Top = 0 Width = 520 AutoSize = True Bands = < item end> EdgeBorders = [ebRight] EdgeInner = esNone EdgeOuter = esNone FixedSize = True GrabStyle = gsGripper GrabWidth = 5 HorizontalSpacing = 1 ShowText = False OnChange = CoolbarChange OnMouseDown = CoolbarMouseDown OnResize = CoolbarResize end end object lblNoAutoSaveActiveDesktop: TLabel AnchorSideLeft.Control = pnBottom AnchorSideRight.Control = pnBottom AnchorSideRight.Side = asrBottom AnchorSideBottom.Control = pnBottom AnchorSideBottom.Side = asrBottom Left = 0 Height = 13 Top = 245 Width = 520 Anchors = [akLeft, akRight, akBottom] BorderSpacing.Bottom = 6 Caption = 'lblNoAutoSaveActiveDesktop' Font.Color = clInactiveCaption ParentColor = False ParentFont = False WordWrap = True end end object pnTop: TPanel Left = 0 Height = 168 Top = 0 Width = 520 Align = alTop AutoSize = True BevelOuter = bvNone ClientHeight = 168 ClientWidth = 520 Constraints.MinWidth = 350 TabOrder = 0 object dbGeneralSettings: TDividerBevel Left = 0 Height = 13 Top = 5 Width = 520 Caption = 'General Coolbars Settings' Align = alTop BorderSpacing.Top = 5 BorderSpacing.Bottom = 5 Font.Style = [fsBold] ParentColor = False ParentFont = False end object gbGrabStyle: TGroupBox AnchorSideLeft.Control = pnTop AnchorSideTop.Control = spCoolBarWidth AnchorSideTop.Side = asrBottom AnchorSideRight.Control = pnTopCenterLabel Left = 0 Height = 78 Top = 55 Width = 257 Anchors = [akTop, akLeft, akRight] AutoSize = True BorderSpacing.Top = 6 BorderSpacing.Right = 3 Caption = 'Grab Style' ClientHeight = 60 ClientWidth = 253 TabOrder = 1 object lbGrabWidth: TLabel AnchorSideTop.Control = spGrabWidth AnchorSideTop.Side = asrCenter AnchorSideRight.Control = spGrabWidth Left = 107 Height = 13 Top = 37 Width = 58 Anchors = [akTop, akRight] BorderSpacing.Around = 6 Caption = 'Grab Width:' ParentColor = False end object spGrabWidth: TSpinEdit AnchorSideTop.Control = cbGrabStyle AnchorSideTop.Side = asrBottom AnchorSideRight.Control = gbGrabStyle AnchorSideRight.Side = asrBottom Left = 171 Height = 21 Top = 33 Width = 76 Anchors = [akTop, akRight] BorderSpacing.Around = 6 MaxValue = 50 MinValue = 1 OnChange = spGrabWidthChange TabOrder = 1 Value = 5 end object cbGrabStyle: TComboBox AnchorSideLeft.Control = gbGrabStyle AnchorSideTop.Control = gbGrabStyle AnchorSideRight.Control = gbGrabStyle AnchorSideRight.Side = asrBottom Left = 6 Height = 21 Top = 6 Width = 241 Anchors = [akTop, akLeft, akRight] BorderSpacing.Around = 6 ItemHeight = 13 ItemIndex = 1 Items.Strings = ( 'gsSimple' 'gsDouble' 'gsHorLines' 'gsVerLines' 'gsGripper' 'gsButton' ) OnChange = cbGrabStyleChange Style = csDropDownList TabOrder = 0 Text = 'gsDouble' end end object bDefaultGeneral: TBitBtn AnchorSideTop.Control = gbBorderStyle AnchorSideTop.Side = asrBottom AnchorSideRight.Control = pnTop AnchorSideRight.Side = asrBottom AnchorSideBottom.Control = pnTop AnchorSideBottom.Side = asrBottom Left = 453 Height = 23 Top = 139 Width = 61 Anchors = [akTop, akRight] AutoSize = True BorderSpacing.Around = 6 Caption = 'Default' OnClick = bDefaultGeneralClick TabOrder = 3 end object cbCoolBarVisible: TCheckBox AnchorSideLeft.Control = pnTop AnchorSideTop.Control = dbGeneralSettings AnchorSideTop.Side = asrBottom Left = 0 Height = 17 Top = 30 Width = 97 BorderSpacing.Top = 12 Caption = 'Coolbar is visible' OnClick = cbCoolBarVisibleClick TabOrder = 0 end object gbBorderStyle: TGroupBox AnchorSideLeft.Control = gbGrabStyle AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = gbGrabStyle AnchorSideRight.Control = pnTop AnchorSideRight.Side = asrBottom AnchorSideBottom.Control = gbGrabStyle AnchorSideBottom.Side = asrBottom Left = 263 Height = 78 Top = 55 Width = 257 Anchors = [akTop, akLeft, akRight, akBottom] AutoSize = True BorderSpacing.Left = 6 Caption = 'Band Border Style' ClientHeight = 60 ClientWidth = 253 TabOrder = 2 object cbBorderStyle: TComboBox AnchorSideLeft.Control = gbBorderStyle AnchorSideTop.Control = gbBorderStyle AnchorSideRight.Control = gbBorderStyle AnchorSideRight.Side = asrBottom Left = 6 Height = 21 Top = 6 Width = 241 Anchors = [akTop, akLeft, akRight] BorderSpacing.Around = 6 ItemHeight = 13 ItemIndex = 1 Items.Strings = ( 'None' 'Single' ) OnChange = cbBorderStyleChange Style = csDropDownList TabOrder = 0 Text = 'Single' end end object lbCoolBarWidth: TLabel AnchorSideLeft.Control = cbCoolBarVisible AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = cbCoolBarVisible AnchorSideTop.Side = asrCenter Left = 129 Height = 13 Top = 32 Width = 66 Alignment = taRightJustify BorderSpacing.Left = 32 Caption = 'Coolbar width' ParentColor = False end object spCoolBarWidth: TSpinEdit AnchorSideLeft.Control = lbCoolBarWidth AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = lbCoolBarWidth AnchorSideTop.Side = asrCenter Left = 201 Height = 21 Top = 28 Width = 64 BorderSpacing.Left = 6 MaxValue = 5000 OnChange = spCoolBarWidthChange TabOrder = 4 Value = 230 end object pnTopCenterLabel: TLabel AnchorSideLeft.Control = pnTop AnchorSideLeft.Side = asrCenter AnchorSideTop.Control = pnTop Left = 260 Height = 1 Top = 0 Width = 1 ParentColor = False end end object dbAddConfigDelete: TDividerBevel AnchorSideLeft.Control = Owner AnchorSideTop.Control = pnTop AnchorSideTop.Side = asrBottom AnchorSideRight.Control = Owner AnchorSideRight.Side = asrBottom Left = 0 Height = 13 Top = 168 Width = 520 Caption = 'Add/Config/Delete Toolbar(s)' Align = alTop BorderSpacing.Bottom = 6 Font.Style = [fsBold] ParentColor = False ParentFont = False end object imButtons: TImageList left = 472 end object tmWait: TTimer Enabled = False Interval = 100 OnTimer = tmWaitTimer left = 408 end end