mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-05-04 03:43:52 +02:00
569 lines
14 KiB
Plaintext
569 lines
14 KiB
Plaintext
object FPDocEditor: TFPDocEditor
|
|
Left = 327
|
|
Height = 156
|
|
Top = 397
|
|
Width = 753
|
|
ActiveControl = PageControl
|
|
Caption = 'FPDoc editor'
|
|
ClientHeight = 156
|
|
ClientWidth = 753
|
|
KeyPreview = True
|
|
OnCreate = FormCreate
|
|
OnDestroy = FormDestroy
|
|
OnKeyDown = FormKeyDown
|
|
OnShow = FormShow
|
|
LCLVersion = '0.9.29'
|
|
object PageControl: TPageControl
|
|
Left = 63
|
|
Height = 156
|
|
Top = 0
|
|
Width = 690
|
|
ActivePage = DescrTabSheet
|
|
Align = alClient
|
|
TabIndex = 2
|
|
TabOrder = 0
|
|
TabPosition = tpBottom
|
|
OnChange = PageControlChange
|
|
OnPageChanged = PageControlChange
|
|
object ShortTabSheet: TTabSheet
|
|
Caption = 'ShortTabSheet'
|
|
ClientHeight = 123
|
|
ClientWidth = 686
|
|
object LinkLabel: TLabel
|
|
AnchorSideTop.Control = LinkEdit
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 6
|
|
Height = 18
|
|
Top = 33
|
|
Width = 63
|
|
BorderSpacing.Top = 6
|
|
Caption = 'LinkLabel'
|
|
ParentColor = False
|
|
end
|
|
object ShortLabel: TLabel
|
|
AnchorSideLeft.Control = ShortTabSheet
|
|
AnchorSideTop.Control = ShortEdit
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 6
|
|
Height = 18
|
|
Top = 4
|
|
Width = 70
|
|
BorderSpacing.Left = 6
|
|
Caption = 'ShortLabel'
|
|
ParentColor = False
|
|
end
|
|
object ShortEdit: TEdit
|
|
AnchorSideLeft.Control = ShortLabel
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideRight.Control = ShortTabSheet
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 82
|
|
Height = 27
|
|
Top = 0
|
|
Width = 602
|
|
Anchors = [akTop, akLeft, akRight]
|
|
AutoSelect = False
|
|
BorderSpacing.Left = 6
|
|
BorderSpacing.Right = 2
|
|
OnChange = ShortEditChange
|
|
OnEditingDone = ShortEditEditingDone
|
|
TabOrder = 0
|
|
Text = 'ShortEdit'
|
|
end
|
|
object CreateButton: TButton
|
|
AnchorSideTop.Control = LinkEdit
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 6
|
|
Height = 27
|
|
Top = 62
|
|
Width = 104
|
|
AutoSize = True
|
|
BorderSpacing.Around = 6
|
|
Caption = 'CreateButton'
|
|
OnClick = CreateButtonClick
|
|
TabOrder = 1
|
|
end
|
|
object LinkEdit: TEdit
|
|
AnchorSideLeft.Control = LinkLabel
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = ShortEdit
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = ShortTabSheet
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 75
|
|
Height = 27
|
|
Top = 29
|
|
Width = 609
|
|
Anchors = [akTop, akLeft, akRight]
|
|
AutoSelect = False
|
|
BorderSpacing.Left = 6
|
|
BorderSpacing.Top = 2
|
|
BorderSpacing.Right = 2
|
|
OnChange = LinkEditChange
|
|
OnEditingDone = LinkEditEditingDone
|
|
TabOrder = 2
|
|
Text = 'LinkEdit'
|
|
end
|
|
end
|
|
object InheritedTabSheet: TTabSheet
|
|
Caption = 'InheritedTabSheet'
|
|
ClientHeight = 99
|
|
ClientWidth = 688
|
|
object InheritedShortLabel: TLabel
|
|
Left = 0
|
|
Height = 14
|
|
Top = 2
|
|
Width = 688
|
|
Align = alTop
|
|
BorderSpacing.Top = 2
|
|
Caption = 'InheritedShortLabel'
|
|
ParentColor = False
|
|
end
|
|
object InheritedShortEdit: TEdit
|
|
AnchorSideLeft.Control = InheritedTabSheet
|
|
AnchorSideTop.Control = InheritedShortLabel
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = InheritedTabSheet
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 0
|
|
Height = 21
|
|
Top = 18
|
|
Width = 688
|
|
Anchors = [akTop, akLeft, akRight]
|
|
BorderSpacing.Top = 2
|
|
ReadOnly = True
|
|
TabOrder = 0
|
|
Text = 'InheritedShortEdit'
|
|
end
|
|
object MoveToInheritedButton: TButton
|
|
AnchorSideTop.Control = InheritedShortEdit
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 0
|
|
Height = 23
|
|
Top = 45
|
|
Width = 140
|
|
AutoSize = True
|
|
BorderSpacing.Around = 6
|
|
Caption = 'MoveToInheritedButton'
|
|
OnClick = MoveToInheritedButtonClick
|
|
TabOrder = 1
|
|
end
|
|
object CopyFromInheritedButton: TButton
|
|
AnchorSideLeft.Control = MoveToInheritedButton
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = MoveToInheritedButton
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 150
|
|
Height = 23
|
|
Top = 45
|
|
Width = 151
|
|
AutoSize = True
|
|
BorderSpacing.Left = 10
|
|
Caption = 'CopyFromInheritedButton'
|
|
OnClick = CopyFromInheritedButtonClick
|
|
TabOrder = 2
|
|
end
|
|
object AddLinkToInheritedButton: TButton
|
|
AnchorSideLeft.Control = CopyFromInheritedButton
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = CopyFromInheritedButton
|
|
Left = 311
|
|
Height = 23
|
|
Top = 45
|
|
Width = 151
|
|
AutoSize = True
|
|
BorderSpacing.Left = 10
|
|
Caption = 'AddLinkToInheritedButton'
|
|
OnClick = AddLinkToInheritedButtonClick
|
|
TabOrder = 3
|
|
end
|
|
end
|
|
object DescrTabSheet: TTabSheet
|
|
Caption = 'DescrTabSheet'
|
|
ClientHeight = 123
|
|
ClientWidth = 686
|
|
object DescrMemo: TMemo
|
|
Left = 0
|
|
Height = 90
|
|
Top = 29
|
|
Width = 684
|
|
Align = alClient
|
|
BorderSpacing.Right = 2
|
|
BorderSpacing.Bottom = 4
|
|
Lines.Strings = (
|
|
'DescrMemo'
|
|
)
|
|
OnChange = DescrMemoChange
|
|
OnEditingDone = DescrMemoEditingDone
|
|
TabOrder = 0
|
|
end
|
|
object ShortPanel: TPanel
|
|
Left = 0
|
|
Height = 29
|
|
Top = 0
|
|
Width = 686
|
|
Align = alTop
|
|
Alignment = taLeftJustify
|
|
AutoSize = True
|
|
Caption = 'Short'
|
|
ClientHeight = 29
|
|
ClientWidth = 686
|
|
TabOrder = 1
|
|
object DescrShortEdit: TEdit
|
|
AnchorSideLeft.Control = ShortPanel
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 61
|
|
Height = 27
|
|
Top = 1
|
|
Width = 622
|
|
Align = alRight
|
|
Anchors = [akTop, akLeft, akRight, akBottom]
|
|
AutoSelect = False
|
|
BorderSpacing.Left = 60
|
|
BorderSpacing.Right = 2
|
|
OnChange = ShortEditChange
|
|
OnEditingDone = ShortEditEditingDone
|
|
ReadOnly = True
|
|
TabOrder = 0
|
|
Text = 'DescrShortEdit'
|
|
end
|
|
end
|
|
end
|
|
object ErrorsTabSheet: TTabSheet
|
|
Caption = 'ErrorsTabSheet'
|
|
ClientHeight = 99
|
|
ClientWidth = 688
|
|
object ErrorsMemo: TMemo
|
|
Left = 0
|
|
Height = 95
|
|
Top = 0
|
|
Width = 686
|
|
Align = alClient
|
|
BorderSpacing.Right = 2
|
|
BorderSpacing.Bottom = 4
|
|
Lines.Strings = (
|
|
'ErrorsMemo'
|
|
)
|
|
OnChange = ErrorsMemoChange
|
|
OnEditingDone = ErrorsMemoEditingDone
|
|
TabOrder = 0
|
|
end
|
|
end
|
|
object SeeAlsoTabSheet: TTabSheet
|
|
Caption = 'SeeAlsoTabSheet'
|
|
ClientHeight = 99
|
|
ClientWidth = 688
|
|
object SeeAlsoMemo: TMemo
|
|
Left = 0
|
|
Height = 99
|
|
Top = 0
|
|
Width = 688
|
|
Align = alClient
|
|
Lines.Strings = (
|
|
'SeeAlsoMemo'
|
|
)
|
|
OnChange = SeeAlsoMemoChange
|
|
OnEditingDone = SeeAlsoMemoEditingDone
|
|
TabOrder = 0
|
|
end
|
|
end
|
|
object ExampleTabSheet: TTabSheet
|
|
Caption = 'ExampleTabSheet'
|
|
ClientHeight = 99
|
|
ClientWidth = 688
|
|
object ExampleEdit: TEdit
|
|
Left = 0
|
|
Height = 21
|
|
Top = 0
|
|
Width = 686
|
|
Align = alTop
|
|
AutoSelect = False
|
|
BorderSpacing.Right = 2
|
|
OnChange = ExampleEditChange
|
|
OnEditingDone = ExampleEditEditingDone
|
|
TabOrder = 0
|
|
Text = 'ExampleEdit'
|
|
end
|
|
object BrowseExampleButton: TButton
|
|
AnchorSideTop.Control = ExampleEdit
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = ExampleTabSheet
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 549
|
|
Height = 23
|
|
Top = 27
|
|
Width = 133
|
|
Anchors = [akTop, akRight]
|
|
AutoSize = True
|
|
BorderSpacing.Around = 6
|
|
Caption = 'BrowseExampleButton'
|
|
OnClick = BrowseExampleButtonClick
|
|
TabOrder = 1
|
|
end
|
|
end
|
|
object TopicSheet: TTabSheet
|
|
Caption = 'Topics'
|
|
ClientHeight = 99
|
|
ClientWidth = 688
|
|
object Panel1: TPanel
|
|
Left = 518
|
|
Height = 99
|
|
Top = 0
|
|
Width = 170
|
|
Align = alRight
|
|
BorderSpacing.Left = 5
|
|
BevelOuter = bvNone
|
|
ClientHeight = 99
|
|
ClientWidth = 170
|
|
TabOrder = 0
|
|
object Panel2: TPanel
|
|
Left = 0
|
|
Height = 25
|
|
Top = 0
|
|
Width = 170
|
|
Align = alTop
|
|
AutoSize = True
|
|
BevelOuter = bvNone
|
|
ClientHeight = 25
|
|
ClientWidth = 170
|
|
TabOrder = 0
|
|
object NewTopicButton: TButton
|
|
Left = 100
|
|
Height = 25
|
|
Top = 0
|
|
Width = 70
|
|
Align = alRight
|
|
AutoSize = True
|
|
Caption = 'New'
|
|
OnClick = NewTopicButtonClick
|
|
TabOrder = 0
|
|
end
|
|
object NewTopicNameEdit: TEdit
|
|
Left = 0
|
|
Height = 25
|
|
Top = 0
|
|
Width = 95
|
|
Align = alClient
|
|
BorderSpacing.Right = 5
|
|
OnEnter = TopicControlEnter
|
|
TabOrder = 1
|
|
end
|
|
end
|
|
object TopicListBox: TListBox
|
|
Left = 0
|
|
Height = 69
|
|
Top = 30
|
|
Width = 170
|
|
Align = alClient
|
|
BorderSpacing.Top = 5
|
|
ItemHeight = 0
|
|
OnClick = TopicListBoxClick
|
|
OnEnter = TopicControlEnter
|
|
TabOrder = 1
|
|
end
|
|
end
|
|
object Panel3: TPanel
|
|
Left = 0
|
|
Height = 99
|
|
Top = 0
|
|
Width = 513
|
|
Align = alClient
|
|
BevelOuter = bvNone
|
|
ClientHeight = 99
|
|
ClientWidth = 513
|
|
TabOrder = 1
|
|
object TopicShort: TEdit
|
|
Left = 0
|
|
Height = 22
|
|
Top = 0
|
|
Width = 513
|
|
Align = alTop
|
|
AutoSelect = False
|
|
OnChange = TopicDescrChange
|
|
OnEnter = TopicControlEnter
|
|
TabOrder = 0
|
|
end
|
|
object TopicDescr: TMemo
|
|
Left = 0
|
|
Height = 72
|
|
Top = 27
|
|
Width = 513
|
|
Align = alClient
|
|
BorderSpacing.Top = 5
|
|
OnChange = TopicDescrChange
|
|
OnEnter = TopicControlEnter
|
|
TabOrder = 1
|
|
end
|
|
end
|
|
end
|
|
end
|
|
object LeftBtnPanel: TPanel
|
|
Left = 0
|
|
Height = 156
|
|
Top = 0
|
|
Width = 63
|
|
Align = alLeft
|
|
AutoSize = True
|
|
BevelOuter = bvNone
|
|
ChildSizing.Layout = cclLeftToRightThenTopToBottom
|
|
ChildSizing.ControlsPerLine = 3
|
|
ClientHeight = 156
|
|
ClientWidth = 63
|
|
FullRepaint = False
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
TabOrder = 1
|
|
object BoldFormatButton: TSpeedButton
|
|
Left = 0
|
|
Height = 23
|
|
Top = 0
|
|
Width = 20
|
|
Constraints.MaxHeight = 23
|
|
Constraints.MaxWidth = 20
|
|
Color = clBtnFace
|
|
NumGlyphs = 0
|
|
OnClick = FormatButtonClick
|
|
end
|
|
object ItalicFormatButton: TSpeedButton
|
|
Tag = 1
|
|
Left = 20
|
|
Height = 23
|
|
Top = 0
|
|
Width = 20
|
|
Constraints.MaxHeight = 23
|
|
Constraints.MaxWidth = 20
|
|
Color = clBtnFace
|
|
NumGlyphs = 0
|
|
OnClick = FormatButtonClick
|
|
end
|
|
object UnderlineFormatButton: TSpeedButton
|
|
Tag = 2
|
|
Left = 40
|
|
Height = 23
|
|
Top = 0
|
|
Width = 20
|
|
Constraints.MaxHeight = 23
|
|
Constraints.MaxWidth = 20
|
|
Color = clBtnFace
|
|
NumGlyphs = 0
|
|
OnClick = FormatButtonClick
|
|
end
|
|
object InsertVarTagButton: TSpeedButton
|
|
Tag = 5
|
|
Left = 0
|
|
Height = 23
|
|
Top = 23
|
|
Width = 20
|
|
Constraints.MaxHeight = 23
|
|
Constraints.MaxWidth = 20
|
|
Color = clBtnFace
|
|
NumGlyphs = 0
|
|
OnClick = FormatButtonClick
|
|
end
|
|
object InsertParagraphSpeedButton: TSpeedButton
|
|
Tag = 6
|
|
Left = 20
|
|
Height = 23
|
|
Top = 23
|
|
Width = 20
|
|
Constraints.MaxHeight = 23
|
|
Constraints.MaxWidth = 20
|
|
Caption = 'P'
|
|
Color = clBtnFace
|
|
NumGlyphs = 0
|
|
OnClick = FormatButtonClick
|
|
end
|
|
object InsertLinkSpeedButton: TSpeedButton
|
|
Left = 40
|
|
Height = 23
|
|
Top = 23
|
|
Width = 20
|
|
Constraints.MaxHeight = 23
|
|
Constraints.MaxWidth = 20
|
|
Caption = 'Li'
|
|
Color = clBtnFace
|
|
Enabled = False
|
|
NumGlyphs = 0
|
|
OnClick = InsertLinkSpeedButtonClick
|
|
ShowHint = True
|
|
ParentShowHint = False
|
|
end
|
|
object InsertCodeTagButton: TSpeedButton
|
|
Tag = 3
|
|
Left = 0
|
|
Height = 23
|
|
Top = 46
|
|
Width = 20
|
|
Constraints.MaxHeight = 23
|
|
Constraints.MaxWidth = 20
|
|
Color = clBtnFace
|
|
NumGlyphs = 0
|
|
OnClick = FormatButtonClick
|
|
ShowHint = True
|
|
ParentShowHint = False
|
|
end
|
|
object InsertRemarkButton: TSpeedButton
|
|
Tag = 4
|
|
Left = 20
|
|
Height = 23
|
|
Top = 46
|
|
Width = 20
|
|
Constraints.MaxHeight = 23
|
|
Constraints.MaxWidth = 20
|
|
Color = clBtnFace
|
|
NumGlyphs = 0
|
|
OnClick = FormatButtonClick
|
|
ShowHint = True
|
|
ParentShowHint = False
|
|
end
|
|
object InsertPrintShortSpeedButton: TSpeedButton
|
|
Tag = 7
|
|
Left = 40
|
|
Height = 23
|
|
Top = 46
|
|
Width = 20
|
|
Constraints.MaxHeight = 23
|
|
Constraints.MaxWidth = 20
|
|
Caption = 'PS'
|
|
Color = clBtnFace
|
|
NumGlyphs = 0
|
|
OnClick = FormatButtonClick
|
|
ShowHint = True
|
|
ParentShowHint = False
|
|
end
|
|
object InsertURLTagSpeedButton: TSpeedButton
|
|
Tag = 8
|
|
Left = 0
|
|
Height = 23
|
|
Top = 69
|
|
Width = 20
|
|
Constraints.MaxHeight = 23
|
|
Constraints.MaxWidth = 20
|
|
Color = clBtnFace
|
|
NumGlyphs = 0
|
|
OnClick = FormatButtonClick
|
|
ShowHint = True
|
|
ParentShowHint = False
|
|
end
|
|
object SaveButton: TSpeedButton
|
|
AnchorSideLeft.Side = asrBottom
|
|
Left = 0
|
|
Height = 29
|
|
Top = 127
|
|
Width = 63
|
|
Align = alBottom
|
|
Caption = 'Save'
|
|
Color = clBtnFace
|
|
NumGlyphs = 0
|
|
OnClick = SaveButtonClick
|
|
end
|
|
end
|
|
object OpenDialog: TOpenDialog
|
|
Title = 'Open example file'
|
|
Filter = 'pascal file|*.pas; *.pp; *.p'
|
|
FilterIndex = 0
|
|
left = 240
|
|
top = 16
|
|
end
|
|
end
|