mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-12-24 17:10:44 +01:00
475 lines
13 KiB
Plaintext
475 lines
13 KiB
Plaintext
object SynColorAttrEditor: TSynColorAttrEditor
|
|
Left = 0
|
|
Height = 145
|
|
Top = 0
|
|
Width = 444
|
|
AutoSize = True
|
|
ClientHeight = 145
|
|
ClientWidth = 444
|
|
Constraints.MinHeight = 140
|
|
OnResize = pnlElementAttributesResize
|
|
TabOrder = 0
|
|
DesignLeft = 399
|
|
DesignTop = 181
|
|
object ForeGroundLabel: TLabel
|
|
AnchorSideTop.Control = ForegroundColorBox
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 6
|
|
Height = 15
|
|
Top = 7
|
|
Width = 91
|
|
BorderSpacing.Left = 6
|
|
Caption = 'ForeGroundLabel'
|
|
ParentColor = False
|
|
Visible = False
|
|
end
|
|
object BackGroundLabel: TLabel
|
|
AnchorSideTop.Control = BackGroundColorBox
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 6
|
|
Height = 15
|
|
Top = 32
|
|
Width = 93
|
|
BorderSpacing.Left = 6
|
|
Caption = 'BackGroundLabel'
|
|
ParentColor = False
|
|
Visible = False
|
|
end
|
|
object ForeGroundUseDefaultCheckBox: TCheckBox
|
|
AnchorSideLeft.Control = Owner
|
|
AnchorSideTop.Control = ForegroundColorBox
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 6
|
|
Height = 19
|
|
Top = 5
|
|
Width = 192
|
|
BorderSpacing.Left = 6
|
|
Caption = 'ForeGroundUseDefaultCheckBox'
|
|
OnChange = GeneralCheckBoxOnChange
|
|
TabOrder = 0
|
|
end
|
|
object ForegroundColorBox: TColorBox
|
|
AnchorSideLeft.Control = ColumnPosBevel
|
|
AnchorSideTop.Control = Owner
|
|
AnchorSideRight.Control = Owner
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 204
|
|
Height = 22
|
|
Top = 3
|
|
Width = 200
|
|
DefaultColorColor = clWhite
|
|
Style = [cbStandardColors, cbExtendedColors, cbSystemColors, cbIncludeDefault, cbCustomColor, cbPrettyNames, cbCustomColors]
|
|
OnGetColors = ForegroundColorBoxGetColors
|
|
Anchors = [akTop, akLeft, akRight]
|
|
BorderSpacing.Top = 3
|
|
Constraints.MaxWidth = 200
|
|
ItemHeight = 16
|
|
OnChange = ForegroundColorBoxChange
|
|
TabOrder = 1
|
|
end
|
|
object BackGroundColorBox: TColorBox
|
|
AnchorSideLeft.Control = ColumnPosBevel
|
|
AnchorSideTop.Control = ForegroundColorBox
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = Owner
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 204
|
|
Height = 22
|
|
Top = 28
|
|
Width = 200
|
|
DefaultColorColor = clWhite
|
|
Style = [cbStandardColors, cbExtendedColors, cbSystemColors, cbIncludeDefault, cbCustomColor, cbPrettyNames, cbCustomColors]
|
|
OnGetColors = ForegroundColorBoxGetColors
|
|
Anchors = [akTop, akLeft, akRight]
|
|
BorderSpacing.Top = 3
|
|
Constraints.MaxWidth = 200
|
|
ItemHeight = 16
|
|
OnChange = ForegroundColorBoxChange
|
|
TabOrder = 3
|
|
end
|
|
object BackGroundUseDefaultCheckBox: TCheckBox
|
|
AnchorSideTop.Control = BackGroundColorBox
|
|
AnchorSideTop.Side = asrCenter
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 6
|
|
Height = 19
|
|
Top = 30
|
|
Width = 194
|
|
BorderSpacing.Left = 6
|
|
Caption = 'BackGroundUseDefaultCheckBox'
|
|
OnChange = GeneralCheckBoxOnChange
|
|
TabOrder = 2
|
|
end
|
|
object FrameColorBox: TColorBox
|
|
AnchorSideLeft.Control = ColumnPosBevel
|
|
AnchorSideTop.Control = BackGroundColorBox
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = Owner
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 204
|
|
Height = 22
|
|
Top = 53
|
|
Width = 200
|
|
DefaultColorColor = clWhite
|
|
Style = [cbStandardColors, cbExtendedColors, cbSystemColors, cbIncludeDefault, cbCustomColor, cbPrettyNames, cbCustomColors]
|
|
OnGetColors = ForegroundColorBoxGetColors
|
|
Anchors = [akTop, akLeft, akRight]
|
|
BorderSpacing.Top = 3
|
|
Constraints.MaxWidth = 200
|
|
ItemHeight = 16
|
|
OnChange = ForegroundColorBoxChange
|
|
TabOrder = 5
|
|
end
|
|
object FrameColorUseDefaultCheckBox: TCheckBox
|
|
AnchorSideTop.Control = FrameColorBox
|
|
AnchorSideTop.Side = asrCenter
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 6
|
|
Height = 19
|
|
Top = 55
|
|
Width = 191
|
|
BorderSpacing.Left = 6
|
|
Caption = 'FrameColorUseDefaultCheckBox'
|
|
OnChange = GeneralCheckBoxOnChange
|
|
TabOrder = 4
|
|
end
|
|
object pnlUnderline: TPanel
|
|
AnchorSideTop.Control = FrameEdgesBox
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 6
|
|
Height = 40
|
|
Top = 102
|
|
Width = 145
|
|
AutoSize = True
|
|
BorderSpacing.Left = 6
|
|
BorderSpacing.Top = 3
|
|
BorderSpacing.Bottom = 3
|
|
BevelOuter = bvNone
|
|
ClientHeight = 40
|
|
ClientWidth = 145
|
|
TabOrder = 8
|
|
object TextUnderlineRadioPanel: TPanel
|
|
AnchorSideLeft.Control = TextUnderlineCheckBox
|
|
AnchorSideTop.Control = TextUnderlineCheckBox
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 0
|
|
Height = 21
|
|
Top = 19
|
|
Width = 134
|
|
AutoSize = True
|
|
BevelInner = bvLowered
|
|
BevelOuter = bvNone
|
|
ClientHeight = 21
|
|
ClientWidth = 134
|
|
TabOrder = 0
|
|
object TextUnderlineRadioOn: TRadioButton
|
|
Tag = 3
|
|
AnchorSideLeft.Control = TextUnderlineRadioPanel
|
|
AnchorSideTop.Control = TextUnderlineRadioPanel
|
|
AnchorSideRight.Control = TextUnderlineRadioOff
|
|
Left = 4
|
|
Height = 19
|
|
Top = 1
|
|
Width = 36
|
|
BorderSpacing.Left = 3
|
|
BorderSpacing.Right = 3
|
|
Caption = 'On'
|
|
Checked = True
|
|
OnChange = TextStyleRadioOnChange
|
|
TabOrder = 0
|
|
TabStop = True
|
|
end
|
|
object TextUnderlineRadioOff: TRadioButton
|
|
Tag = 3
|
|
AnchorSideLeft.Control = TextUnderlineRadioOn
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = TextUnderlineRadioOn
|
|
AnchorSideRight.Control = TextUnderlineRadioInvert
|
|
Left = 43
|
|
Height = 19
|
|
Top = 1
|
|
Width = 37
|
|
BorderSpacing.Left = 3
|
|
BorderSpacing.Right = 3
|
|
Caption = 'Off'
|
|
OnChange = TextStyleRadioOnChange
|
|
TabOrder = 1
|
|
end
|
|
object TextUnderlineRadioInvert: TRadioButton
|
|
Tag = 3
|
|
AnchorSideLeft.Control = TextUnderlineRadioOff
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = TextUnderlineRadioPanel
|
|
AnchorSideRight.Control = TextUnderlineRadioPanel
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 83
|
|
Height = 19
|
|
Top = 1
|
|
Width = 50
|
|
BorderSpacing.Left = 3
|
|
Caption = 'Invert'
|
|
OnChange = TextStyleRadioOnChange
|
|
TabOrder = 2
|
|
end
|
|
end
|
|
object TextUnderlineCheckBox: TCheckBox
|
|
AnchorSideLeft.Control = pnlUnderline
|
|
AnchorSideTop.Control = pnlUnderline
|
|
Left = 0
|
|
Height = 19
|
|
Top = 0
|
|
Width = 145
|
|
Caption = 'TextUnderlineCheckBox'
|
|
OnChange = GeneralCheckBoxOnChange
|
|
TabOrder = 1
|
|
end
|
|
end
|
|
object pnlBold: TPanel
|
|
AnchorSideLeft.Control = pnlUnderline
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = pnlUnderline
|
|
Left = 157
|
|
Height = 40
|
|
Top = 102
|
|
Width = 134
|
|
AutoSize = True
|
|
BorderSpacing.Left = 6
|
|
BevelOuter = bvNone
|
|
ClientHeight = 40
|
|
ClientWidth = 134
|
|
TabOrder = 9
|
|
object TextBoldRadioPanel: TPanel
|
|
AnchorSideLeft.Control = TextBoldCheckBox
|
|
AnchorSideTop.Control = TextBoldCheckBox
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 0
|
|
Height = 21
|
|
Top = 19
|
|
Width = 134
|
|
AutoSize = True
|
|
BevelInner = bvLowered
|
|
BevelOuter = bvNone
|
|
ClientHeight = 21
|
|
ClientWidth = 134
|
|
TabOrder = 0
|
|
object TextBoldRadioInvert: TRadioButton
|
|
Tag = 2
|
|
AnchorSideLeft.Control = TextBoldRadioOff
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = TextBoldRadioPanel
|
|
AnchorSideRight.Control = TextBoldRadioPanel
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 83
|
|
Height = 19
|
|
Top = 1
|
|
Width = 50
|
|
BorderSpacing.Left = 3
|
|
Caption = 'Invert'
|
|
OnChange = TextStyleRadioOnChange
|
|
TabOrder = 2
|
|
end
|
|
object TextBoldRadioOn: TRadioButton
|
|
Tag = 2
|
|
AnchorSideLeft.Control = TextBoldRadioPanel
|
|
AnchorSideTop.Control = TextBoldRadioPanel
|
|
AnchorSideRight.Control = TextBoldRadioOff
|
|
Left = 4
|
|
Height = 19
|
|
Top = 1
|
|
Width = 36
|
|
BorderSpacing.Left = 3
|
|
BorderSpacing.Right = 3
|
|
Caption = 'On'
|
|
Checked = True
|
|
OnChange = TextStyleRadioOnChange
|
|
TabOrder = 0
|
|
TabStop = True
|
|
end
|
|
object TextBoldRadioOff: TRadioButton
|
|
Tag = 2
|
|
AnchorSideLeft.Control = TextBoldRadioOn
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = TextBoldRadioPanel
|
|
AnchorSideRight.Control = TextBoldRadioInvert
|
|
Left = 43
|
|
Height = 19
|
|
Top = 1
|
|
Width = 37
|
|
BorderSpacing.Left = 3
|
|
BorderSpacing.Right = 3
|
|
Caption = 'Off'
|
|
OnChange = TextStyleRadioOnChange
|
|
TabOrder = 1
|
|
end
|
|
end
|
|
object TextBoldCheckBox: TCheckBox
|
|
AnchorSideLeft.Control = pnlBold
|
|
AnchorSideTop.Control = pnlBold
|
|
Left = 0
|
|
Height = 19
|
|
Top = 0
|
|
Width = 118
|
|
Caption = 'TextBoldCheckBox'
|
|
OnChange = GeneralCheckBoxOnChange
|
|
TabOrder = 1
|
|
end
|
|
end
|
|
object pnlItalic: TPanel
|
|
AnchorSideLeft.Control = pnlBold
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = pnlUnderline
|
|
Left = 297
|
|
Height = 40
|
|
Top = 102
|
|
Width = 134
|
|
AutoSize = True
|
|
BorderSpacing.Left = 6
|
|
BevelOuter = bvNone
|
|
ClientHeight = 40
|
|
ClientWidth = 134
|
|
TabOrder = 10
|
|
object TextItalicRadioPanel: TPanel
|
|
AnchorSideLeft.Control = TextItalicCheckBox
|
|
AnchorSideTop.Control = TextItalicCheckBox
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 0
|
|
Height = 21
|
|
Top = 19
|
|
Width = 134
|
|
AutoSize = True
|
|
BevelInner = bvLowered
|
|
BevelOuter = bvNone
|
|
ClientHeight = 21
|
|
ClientWidth = 134
|
|
TabOrder = 0
|
|
object TextItalicRadioInvert: TRadioButton
|
|
Tag = 2
|
|
AnchorSideLeft.Control = TextItalicRadioOff
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = TextItalicRadioPanel
|
|
AnchorSideRight.Control = TextItalicRadioPanel
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 83
|
|
Height = 19
|
|
Top = 1
|
|
Width = 50
|
|
BorderSpacing.Left = 3
|
|
Caption = 'Invert'
|
|
OnChange = TextStyleRadioOnChange
|
|
TabOrder = 2
|
|
end
|
|
object TextItalicRadioOn: TRadioButton
|
|
Tag = 2
|
|
AnchorSideLeft.Control = TextItalicRadioPanel
|
|
AnchorSideTop.Control = TextItalicRadioPanel
|
|
AnchorSideRight.Control = TextItalicRadioOff
|
|
Left = 4
|
|
Height = 19
|
|
Top = 1
|
|
Width = 36
|
|
BorderSpacing.Left = 3
|
|
BorderSpacing.Right = 3
|
|
Caption = 'On'
|
|
Checked = True
|
|
OnChange = TextStyleRadioOnChange
|
|
TabOrder = 0
|
|
TabStop = True
|
|
end
|
|
object TextItalicRadioOff: TRadioButton
|
|
Tag = 2
|
|
AnchorSideLeft.Control = TextItalicRadioOn
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = TextItalicRadioPanel
|
|
AnchorSideRight.Control = TextItalicRadioInvert
|
|
Left = 43
|
|
Height = 19
|
|
Top = 1
|
|
Width = 37
|
|
BorderSpacing.Left = 3
|
|
BorderSpacing.Right = 3
|
|
Caption = 'Off'
|
|
OnChange = TextStyleRadioOnChange
|
|
TabOrder = 1
|
|
end
|
|
end
|
|
object TextItalicCheckBox: TCheckBox
|
|
AnchorSideLeft.Control = pnlItalic
|
|
AnchorSideTop.Control = pnlItalic
|
|
Left = 0
|
|
Height = 19
|
|
Top = 0
|
|
Width = 119
|
|
Caption = 'TextItalicCheckBox'
|
|
OnChange = GeneralCheckBoxOnChange
|
|
TabOrder = 1
|
|
end
|
|
end
|
|
object FrameStyleBox: TComboBox
|
|
AnchorSideLeft.Control = FrameEdgesBox
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = FrameEdgesBox
|
|
Left = 307
|
|
Height = 21
|
|
Top = 78
|
|
Width = 97
|
|
BorderSpacing.Left = 6
|
|
ItemHeight = 15
|
|
ItemIndex = 0
|
|
Items.Strings = (
|
|
'slsSolid'
|
|
'slsDashed'
|
|
'slsDotted'
|
|
'slsWaved'
|
|
)
|
|
OnChange = ForegroundColorBoxChange
|
|
OnDrawItem = FrameStyleBoxDrawItem
|
|
ReadOnly = True
|
|
Style = csOwnerDrawFixed
|
|
TabOrder = 7
|
|
Text = 'slsSolid'
|
|
end
|
|
object FrameEdgesBox: TComboBox
|
|
AnchorSideLeft.Control = FrameColorBox
|
|
AnchorSideTop.Control = FrameColorBox
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 204
|
|
Height = 21
|
|
Top = 78
|
|
Width = 97
|
|
BorderSpacing.Top = 3
|
|
ItemHeight = 15
|
|
ItemIndex = 0
|
|
Items.Strings = (
|
|
'Around'
|
|
'Bottom'
|
|
'Left'
|
|
)
|
|
OnChange = ForegroundColorBoxChange
|
|
OnDrawItem = FrameEdgesBoxDrawItem
|
|
ReadOnly = True
|
|
Style = csOwnerDrawFixed
|
|
TabOrder = 6
|
|
Text = 'Around'
|
|
end
|
|
object ColumnPosBevel: TPanel
|
|
AnchorSideLeft.Control = ForeGroundUseDefaultCheckBox
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = pnlUnderline
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideBottom.Side = asrBottom
|
|
Left = 204
|
|
Height = 1
|
|
Top = 145
|
|
Width = 50
|
|
AutoSize = True
|
|
BorderSpacing.Left = 6
|
|
BevelOuter = bvNone
|
|
Constraints.MinHeight = 1
|
|
Constraints.MinWidth = 50
|
|
TabOrder = 11
|
|
end
|
|
end
|