You've already forked lazarus-ccr
333 lines
9.2 KiB
Plaintext
333 lines
9.2 KiB
Plaintext
|
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
|
||
|
|
OnDestroy = FormDestroy
|
||
|
|
OnResize = FormResize
|
||
|
|
Position = poScreenCenter
|
||
|
|
LCLVersion = '1.1'
|
||
|
|
object PageControl1: TPageControl
|
||
|
|
Left = 0
|
||
|
|
Height = 433
|
||
|
|
Top = 0
|
||
|
|
Width = 657
|
||
|
|
ActivePage = TabSheet1
|
||
|
|
Align = alClient
|
||
|
|
TabIndex = 0
|
||
|
|
TabOrder = 0
|
||
|
|
object TabSheet1: TTabSheet
|
||
|
|
Caption = 'Visible buttons'
|
||
|
|
ClientHeight = 400
|
||
|
|
ClientWidth = 651
|
||
|
|
object Label1: TLabel
|
||
|
|
AnchorSideLeft.Control = BitBtn3
|
||
|
|
AnchorSideLeft.Side = asrBottom
|
||
|
|
AnchorSideTop.Control = TabSheet1
|
||
|
|
Left = 349
|
||
|
|
Height = 15
|
||
|
|
Top = 6
|
||
|
|
Width = 102
|
||
|
|
BorderSpacing.Around = 6
|
||
|
|
Caption = 'Avaliable buttons'
|
||
|
|
FocusControl = ListBtnAvaliable
|
||
|
|
ParentColor = False
|
||
|
|
end
|
||
|
|
object Label2: TLabel
|
||
|
|
AnchorSideTop.Control = TabSheet1
|
||
|
|
Left = 8
|
||
|
|
Height = 15
|
||
|
|
Top = 6
|
||
|
|
Width = 89
|
||
|
|
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 = 307
|
||
|
|
Height = 30
|
||
|
|
Top = 145
|
||
|
|
Width = 36
|
||
|
|
Anchors = [akTop, akLeft, akRight]
|
||
|
|
BorderSpacing.Top = 6
|
||
|
|
BorderSpacing.InnerBorder = 2
|
||
|
|
Caption = '<<'
|
||
|
|
OnClick = BitBtn3Click
|
||
|
|
TabOrder = 0
|
||
|
|
end
|
||
|
|
object BitBtn4: TBitBtn
|
||
|
|
AnchorSideLeft.Control = BitBtn6
|
||
|
|
AnchorSideTop.Control = BitBtn5
|
||
|
|
AnchorSideTop.Side = asrBottom
|
||
|
|
AnchorSideRight.Control = BitBtn6
|
||
|
|
AnchorSideRight.Side = asrBottom
|
||
|
|
Left = 307
|
||
|
|
Height = 31
|
||
|
|
Top = 108
|
||
|
|
Width = 36
|
||
|
|
Anchors = [akTop, akLeft, akRight]
|
||
|
|
AutoSize = True
|
||
|
|
BorderSpacing.Top = 6
|
||
|
|
BorderSpacing.InnerBorder = 2
|
||
|
|
Caption = '<'
|
||
|
|
OnClick = BitBtn4Click
|
||
|
|
TabOrder = 1
|
||
|
|
end
|
||
|
|
object BitBtn5: TBitBtn
|
||
|
|
AnchorSideLeft.Control = BitBtn6
|
||
|
|
AnchorSideTop.Control = BitBtn6
|
||
|
|
AnchorSideTop.Side = asrBottom
|
||
|
|
AnchorSideRight.Control = BitBtn6
|
||
|
|
AnchorSideRight.Side = asrBottom
|
||
|
|
Left = 307
|
||
|
|
Height = 38
|
||
|
|
Top = 64
|
||
|
|
Width = 36
|
||
|
|
Anchors = [akTop, akLeft, akRight]
|
||
|
|
BorderSpacing.Top = 6
|
||
|
|
BorderSpacing.InnerBorder = 2
|
||
|
|
Caption = '>'
|
||
|
|
OnClick = BitBtn5Click
|
||
|
|
TabOrder = 2
|
||
|
|
end
|
||
|
|
object BitBtn6: TBitBtn
|
||
|
|
AnchorSideLeft.Control = TabSheet1
|
||
|
|
AnchorSideLeft.Side = asrCenter
|
||
|
|
AnchorSideTop.Control = ListBtnAvaliable
|
||
|
|
Left = 307
|
||
|
|
Height = 31
|
||
|
|
Top = 27
|
||
|
|
Width = 36
|
||
|
|
AutoSize = True
|
||
|
|
BorderSpacing.InnerBorder = 2
|
||
|
|
Caption = '>>'
|
||
|
|
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 = 349
|
||
|
|
Height = 271
|
||
|
|
Top = 27
|
||
|
|
Width = 296
|
||
|
|
Anchors = [akTop, akLeft, akRight, akBottom]
|
||
|
|
BorderSpacing.Around = 6
|
||
|
|
IntegralHeight = True
|
||
|
|
Items.Strings = (
|
||
|
|
'111'
|
||
|
|
'222'
|
||
|
|
'333'
|
||
|
|
'44'
|
||
|
|
'555'
|
||
|
|
'666'
|
||
|
|
'777'
|
||
|
|
)
|
||
|
|
ItemHeight = 0
|
||
|
|
OnClick = ListBtnAvaliableClick
|
||
|
|
OnDrawItem = ListBox1DrawItem
|
||
|
|
ScrollWidth = 294
|
||
|
|
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 = 271
|
||
|
|
Top = 27
|
||
|
|
Width = 287
|
||
|
|
Anchors = [akTop, akLeft, akRight, akBottom]
|
||
|
|
BorderSpacing.Around = 6
|
||
|
|
ItemHeight = 0
|
||
|
|
OnClick = ListBtnAvaliableClick
|
||
|
|
OnDrawItem = ListBox1DrawItem
|
||
|
|
ScrollWidth = 285
|
||
|
|
Style = lbOwnerDrawFixed
|
||
|
|
TabOrder = 5
|
||
|
|
TopIndex = -1
|
||
|
|
end
|
||
|
|
object Panel1: TPanel
|
||
|
|
AnchorSideBottom.Control = TabSheet1
|
||
|
|
AnchorSideBottom.Side = asrBottom
|
||
|
|
Left = 3
|
||
|
|
Height = 62
|
||
|
|
Top = 332
|
||
|
|
Width = 639
|
||
|
|
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 = 22
|
||
|
|
Top = 304
|
||
|
|
Width = 105
|
||
|
|
Anchors = [akLeft, akBottom]
|
||
|
|
BorderSpacing.Around = 6
|
||
|
|
Caption = 'Show caption'
|
||
|
|
OnChange = cbShowCaptionChange
|
||
|
|
TabOrder = 7
|
||
|
|
end
|
||
|
|
end
|
||
|
|
object TabSheet2: TTabSheet
|
||
|
|
Caption = 'Options'
|
||
|
|
ClientHeight = 400
|
||
|
|
ClientWidth = 651
|
||
|
|
object cbShowHint: TCheckBox
|
||
|
|
AnchorSideLeft.Control = TabSheet2
|
||
|
|
AnchorSideTop.Control = cbTransp
|
||
|
|
AnchorSideTop.Side = asrBottom
|
||
|
|
Left = 6
|
||
|
|
Height = 22
|
||
|
|
Top = 163
|
||
|
|
Width = 82
|
||
|
|
BorderSpacing.Around = 6
|
||
|
|
Caption = 'Show hint'
|
||
|
|
TabOrder = 0
|
||
|
|
end
|
||
|
|
object cbTransp: TCheckBox
|
||
|
|
AnchorSideLeft.Control = TabSheet2
|
||
|
|
AnchorSideTop.Control = cbFlatBtn
|
||
|
|
AnchorSideTop.Side = asrBottom
|
||
|
|
Left = 6
|
||
|
|
Height = 22
|
||
|
|
Top = 135
|
||
|
|
Width = 94
|
||
|
|
BorderSpacing.Around = 6
|
||
|
|
Caption = 'Transparent'
|
||
|
|
TabOrder = 1
|
||
|
|
end
|
||
|
|
object cbFlatBtn: TCheckBox
|
||
|
|
AnchorSideLeft.Control = TabSheet2
|
||
|
|
AnchorSideTop.Control = RadioGroup1
|
||
|
|
AnchorSideTop.Side = asrBottom
|
||
|
|
Left = 6
|
||
|
|
Height = 22
|
||
|
|
Top = 107
|
||
|
|
Width = 93
|
||
|
|
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 = 333
|
||
|
|
Height = 95
|
||
|
|
Top = 6
|
||
|
|
Width = 312
|
||
|
|
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 = 78
|
||
|
|
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 = 95
|
||
|
|
Top = 6
|
||
|
|
Width = 312
|
||
|
|
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 = 78
|
||
|
|
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 = 324
|
||
|
|
Height = 388
|
||
|
|
Top = 6
|
||
|
|
Width = 3
|
||
|
|
Anchors = [akTop, akLeft, akBottom]
|
||
|
|
BorderSpacing.Around = 6
|
||
|
|
TabOrder = 5
|
||
|
|
end
|
||
|
|
end
|
||
|
|
end
|
||
|
|
object ButtonPanel1: TButtonPanel
|
||
|
|
Left = 6
|
||
|
|
Height = 42
|
||
|
|
Top = 439
|
||
|
|
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
|