paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-05-14 13:52:39 +02:00
Code Issues Packages Projects Releases Wiki Activity
add83f5ee3
lazarus/components/tachart/demo/charteditor/celegendframe.lfm
wp_xyz add83f5ee3 TAChart: Improved layout in Marks form.
2021-08-05 11:54:59 +02:00

495 lines
13 KiB
Plaintext
Raw Blame History

object ChartLegendFrame: TChartLegendFrame
Left = 0
Height = 400
Top = 0
Width = 671
ClientHeight = 400
ClientWidth = 671
TabOrder = 0
DesignLeft = 1101
DesignTop = 368
object PanelTop: TPanel
Left = 0
Height = 23
Top = 0
Width = 671
Align = alTop
AutoSize = True
BorderSpacing.Bottom = 8
BevelOuter = bvNone
ClientHeight = 23
ClientWidth = 671
TabOrder = 0
object cbShow: TCheckBox
Left = 0
Height = 19
Top = 0
Width = 49
BorderSpacing.Bottom = 4
Caption = 'Show'
Checked = True
OnChange = cbShowChange
State = cbChecked
TabOrder = 0
end
object cbUseSideBar: TCheckBox
AnchorSideLeft.Control = cbShow
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = cbShow
AnchorSideRight.Side = asrBottom
Left = 81
Height = 19
Top = 0
Width = 87
BorderSpacing.Left = 32
Caption = 'Outside axes'
Checked = True
OnChange = cbUseSideBarChange
State = cbChecked
TabOrder = 1
end
object cbHTML: TCheckBox
AnchorSideLeft.Control = cbUseSideBar
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = PanelTop
Left = 200
Height = 19
Top = 0
Width = 181
BorderSpacing.Left = 32
Caption = 'Support HTML in legend items'
OnChange = cbHTMLChange
TabOrder = 2
end
end
object ParamsPanel: TPanel
Left = 0
Height = 369
Top = 31
Width = 671
Align = alClient
BevelOuter = bvNone
ClientHeight = 369
ClientWidth = 671
TabOrder = 1
object gbBackground: TGroupBox
AnchorSideLeft.Control = gbAlignment
AnchorSideTop.Control = gbAlignment
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Background_Border_Spacer
AnchorSideBottom.Side = asrBottom
Left = 0
Height = 72
Top = 136
Width = 130
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 16
BorderSpacing.Right = 16
Caption = 'gbBackground'
TabOrder = 2
end
object gbBorder: TGroupBox
AnchorSideLeft.Control = Background_Border_Spacer
AnchorSideTop.Control = gbAlignment
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = gbAlignment
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Side = asrBottom
Left = 146
Height = 88
Top = 136
Width = 156
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 16
Caption = 'gbBorder'
TabOrder = 3
end
object gbFont: TGroupBox
AnchorSideLeft.Control = gbAlignment
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = gbAlignment
AnchorSideBottom.Control = gbAlignment
AnchorSideBottom.Side = asrBottom
Left = 322
Height = 120
Top = 0
Width = 216
Anchors = [akTop, akLeft, akBottom]
BorderSpacing.Left = 20
Caption = 'gbFont'
TabOrder = 1
end
object gbAlignment: TGroupBox
AnchorSideLeft.Control = ParamsPanel
AnchorSideTop.Control = ParamsPanel
AnchorSideBottom.Control = gbFont
AnchorSideBottom.Side = asrBottom
Left = 0
Height = 120
Top = 0
Width = 302
AutoSize = True
Caption = 'Position'
ChildSizing.LeftRightSpacing = 6
ChildSizing.TopBottomSpacing = 6
ChildSizing.HorizontalSpacing = 8
ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
ChildSizing.EnlargeVertical = crsHomogenousChildResize
ChildSizing.ShrinkHorizontal = crsScaleChilds
ChildSizing.ShrinkVertical = crsScaleChilds
ChildSizing.Layout = cclLeftToRightThenTopToBottom
ChildSizing.ControlsPerLine = 3
ClientHeight = 100
ClientWidth = 298
TabOrder = 0
object rbTopLeft: TRadioButton
Left = 6
Height = 19
Top = 6
Width = 82
Caption = 'top/left'
OnClick = gbAlignmentClick
TabOrder = 0
end
object rbTopCenter: TRadioButton
Tag = 3
Left = 96
Height = 19
Top = 6
Width = 98
Caption = 'top/center'
OnClick = gbAlignmentClick
TabOrder = 1
end
object rbTopRight: TRadioButton
Tag = 5
Left = 202
Height = 19
Top = 6
Width = 90
Caption = 'top/right'
Checked = True
OnClick = gbAlignmentClick
TabOrder = 2
TabStop = True
end
object rbCenterLeft: TRadioButton
Tag = 1
Left = 6
Height = 50
Top = 25
Width = 82
Caption = 'center/left'
OnClick = gbAlignmentClick
TabOrder = 3
end
object Bevel1: TBevel
Tag = 999
Left = 96
Height = 50
Top = 25
Width = 98
Shape = bsSpacer
end
object rbCenterRight: TRadioButton
Tag = 6
Left = 202
Height = 50
Top = 25
Width = 90
Caption = 'center/right'
OnClick = gbAlignmentClick
TabOrder = 4
end
object rbBottomLeft: TRadioButton
Tag = 2
Left = 6
Height = 19
Top = 75
Width = 82
Caption = 'bottom/left'
OnClick = gbAlignmentClick
TabOrder = 5
end
object rbBottomCenter: TRadioButton
Tag = 4
Left = 96
Height = 19
Top = 75
Width = 98
Caption = 'bottom/center'
OnClick = gbAlignmentClick
TabOrder = 6
end
object rbBottomRight: TRadioButton
Tag = 7
Left = 202
Height = 19
Top = 75
Width = 90
Caption = 'bottom/right'
OnClick = gbAlignmentClick
TabOrder = 7
end
end
object gbMargins: TGroupBox
AnchorSideLeft.Control = ParamsPanel
AnchorSideTop.Control = gbBackground
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = gbBackground
AnchorSideRight.Side = asrBottom
Left = 0
Height = 84
Top = 224
Width = 130
Anchors = [akTop, akLeft, akRight]
AutoSize = True
BorderSpacing.Top = 16
Caption = 'Margins'
ClientHeight = 64
ClientWidth = 126
TabOrder = 4
object lblMarginX: TLabel
AnchorSideLeft.Control = gbMargins
AnchorSideTop.Control = seMarginX
AnchorSideTop.Side = asrCenter
AnchorSideRight.Control = seMarginX
Left = 16
Height = 15
Top = 8
Width = 7
BorderSpacing.Left = 16
BorderSpacing.Right = 8
Caption = 'X'
FocusControl = seMarginX
end
object seMarginX: TSpinEdit
AnchorSideLeft.Control = lblMarginX
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = gbMargins
AnchorSideRight.Side = asrBottom
Left = 31
Height = 23
Top = 4
Width = 79
Alignment = taRightJustify
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 4
BorderSpacing.Right = 10
MaxValue = 1000
OnChange = seMarginXChange
TabOrder = 0
Value = 1
end
object lblMarginY: TLabel
AnchorSideLeft.Control = lblMarginX
AnchorSideTop.Control = seMarginY
AnchorSideTop.Side = asrCenter
AnchorSideRight.Control = seMarginY
Left = 16
Height = 15
Top = 37
Width = 7
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Right = 8
Caption = 'Y'
FocusControl = seMarginY
end
object seMarginY: TSpinEdit
AnchorSideLeft.Control = seMarginX
AnchorSideTop.Control = seMarginX
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = seMarginX
AnchorSideRight.Side = asrBottom
Left = 31
Height = 23
Top = 33
Width = 79
Alignment = taRightJustify
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 6
BorderSpacing.Bottom = 8
MaxValue = 1000
OnChange = seMarginYChange
TabOrder = 1
Value = 1
end
end
object gbItems: TGroupBox
AnchorSideLeft.Control = gbFont
AnchorSideTop.Control = gbFont
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = gbFont
AnchorSideRight.Side = asrBottom
Left = 322
Height = 167
Top = 136
Width = 216
Anchors = [akTop, akLeft, akRight]
AutoSize = True
BorderSpacing.Top = 16
Caption = 'Items'
ClientHeight = 147
ClientWidth = 212
TabOrder = 5
object cbInverted: TCheckBox
AnchorSideLeft.Control = gbItems
AnchorSideTop.Control = seSymbolWidth
AnchorSideTop.Side = asrBottom
Left = 8
Height = 19
Top = 120
Width = 63
BorderSpacing.Left = 8
BorderSpacing.Bottom = 8
Caption = 'Inverted'
OnChange = cbInvertedChange
TabOrder = 4
end
object seColumns: TSpinEdit
AnchorSideTop.Control = gbItems
AnchorSideRight.Control = gbItems
AnchorSideRight.Side = asrBottom
Left = 108
Height = 23
Top = 8
Width = 96
Alignment = taRightJustify
Anchors = [akTop, akRight]
BorderSpacing.Top = 8
BorderSpacing.Right = 8
MaxValue = 1000
MinValue = 1
OnChange = seColumnsChange
TabOrder = 0
Value = 1
end
object lblColumns: TLabel
AnchorSideLeft.Control = gbItems
AnchorSideTop.Control = seColumns
AnchorSideTop.Side = asrCenter
AnchorSideRight.Control = seColumns
Left = 8
Height = 15
Top = 12
Width = 92
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 8
BorderSpacing.Right = 8
Caption = 'Columns'
FocusControl = seColumns
end
object lblItemFillOrder: TLabel
AnchorSideLeft.Control = cbInverted
AnchorSideTop.Control = cbItemFillOrder
AnchorSideTop.Side = asrCenter
AnchorSideRight.Control = cbItemFillOrder
Left = 8
Height = 15
Top = 39
Width = 92
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Right = 8
Caption = 'Item fill order'
end
object cbItemFillOrder: TComboBox
AnchorSideTop.Control = seColumns
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = gbItems
AnchorSideRight.Side = asrBottom
Left = 108
Height = 23
Top = 35
Width = 96
Anchors = [akTop, akRight]
BorderSpacing.Top = 4
BorderSpacing.Right = 8
ItemHeight = 15
ItemIndex = 0
Items.Strings = (
'by columns'
'by rows'
)
OnChange = cbItemFillOrderChange
TabOrder = 1
Text = 'by columns'
end
object seSpacing: TSpinEdit
AnchorSideTop.Control = cbItemFillOrder
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = gbItems
AnchorSideRight.Side = asrBottom
Left = 108
Height = 23
Top = 62
Width = 96
Alignment = taRightJustify
Anchors = [akTop, akRight]
BorderSpacing.Top = 4
BorderSpacing.Right = 8
MaxValue = 1000
OnChange = seSpacingChange
TabOrder = 2
Value = 20
end
object lblSpacing: TLabel
AnchorSideLeft.Control = cbInverted
AnchorSideTop.Control = seSpacing
AnchorSideTop.Side = asrCenter
AnchorSideRight.Control = seSpacing
Left = 8
Height = 15
Top = 66
Width = 92
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Right = 8
Caption = 'Spacing'
FocusControl = seSpacing
end
object seSymbolWidth: TSpinEdit
AnchorSideTop.Control = seSpacing
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = gbItems
AnchorSideRight.Side = asrBottom
Left = 108
Height = 23
Top = 89
Width = 96
Alignment = taRightJustify
Anchors = [akTop, akRight]
BorderSpacing.Top = 4
BorderSpacing.Right = 8
BorderSpacing.Bottom = 8
MaxValue = 1000
OnChange = seSymbolWidthChange
TabOrder = 3
Value = 20
end
object lblSymbolWidth: TLabel
AnchorSideLeft.Control = cbInverted
AnchorSideTop.Control = seSymbolWidth
AnchorSideTop.Side = asrCenter
AnchorSideRight.Control = seSymbolWidth
Left = 8
Height = 15
Top = 93
Width = 92
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Right = 8
Caption = 'Symbol width'
FocusControl = seSymbolWidth
end
end
object Background_Border_Spacer: TBevel
AnchorSideLeft.Control = gbAlignment
AnchorSideLeft.Side = asrCenter
AnchorSideTop.Control = gbBorder
Left = 146
Height = 42
Top = 136
Width = 10
Shape = bsSpacer
end
end
end
Reference in New Issue View Git Blame Copy Permalink