mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-05-20 20:42:50 +02:00
440 lines
11 KiB
Plaintext
440 lines
11 KiB
Plaintext
object FPDocEditor: TFPDocEditor
|
|
Left = 303
|
|
Height = 126
|
|
Top = 548
|
|
Width = 753
|
|
ActiveControl = ShortEdit
|
|
Caption = 'FPDoc editor'
|
|
ClientHeight = 126
|
|
ClientWidth = 753
|
|
OnCreate = FormCreate
|
|
OnDestroy = FormDestroy
|
|
OnResize = FormResize
|
|
ParentFont = False
|
|
LCLVersion = '0.9.25'
|
|
object PageControl: TPageControl
|
|
Left = 40
|
|
Height = 126
|
|
Width = 713
|
|
ActivePage = ShortTabSheet
|
|
Align = alClient
|
|
TabIndex = 0
|
|
TabOrder = 0
|
|
TabPosition = tpBottom
|
|
OnChange = PageControlChange
|
|
OnPageChanged = PageControlChange
|
|
object ShortTabSheet: TTabSheet
|
|
Caption = 'ShortTabSheet'
|
|
ClientHeight = 100
|
|
ClientWidth = 705
|
|
object LinkLabel: TLabel
|
|
AnchorSideTop.Control = LinkEdit
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 6
|
|
Height = 14
|
|
Top = 35
|
|
Width = 44
|
|
BorderSpacing.Top = 6
|
|
Caption = 'LinkLabel'
|
|
ParentColor = False
|
|
end
|
|
object ShortLabel: TLabel
|
|
AnchorSideLeft.Control = ShortTabSheet
|
|
AnchorSideTop.Control = ShortEdit
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 6
|
|
Height = 14
|
|
Top = 6
|
|
Width = 52
|
|
BorderSpacing.Left = 6
|
|
Caption = 'ShortLabel'
|
|
ParentColor = False
|
|
end
|
|
object ShortEdit: TEdit
|
|
AnchorSideLeft.Control = ShortLabel
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideRight.Control = ShortTabSheet
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 64
|
|
Height = 27
|
|
Width = 639
|
|
Anchors = [akTop, akLeft, akRight]
|
|
AutoSize = True
|
|
BorderSpacing.Left = 6
|
|
BorderSpacing.Right = 2
|
|
OnChange = ShortEditEditingDone
|
|
OnEditingDone = ShortEditEditingDone
|
|
TabOrder = 0
|
|
Text = 'ShortEdit'
|
|
end
|
|
object CreateButton: TButton
|
|
AnchorSideTop.Control = LinkEdit
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 6
|
|
Height = 23
|
|
Top = 62
|
|
Width = 91
|
|
AutoSize = True
|
|
BorderSpacing.Around = 6
|
|
Caption = 'CreateButton'
|
|
OnClick = CreateButtonClick
|
|
TabOrder = 1
|
|
end
|
|
object SaveButton: TButton
|
|
AnchorSideLeft.Control = CreateButton
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = CreateButton
|
|
Left = 103
|
|
Height = 23
|
|
Top = 62
|
|
Width = 82
|
|
AutoSize = True
|
|
BorderSpacing.Left = 6
|
|
Caption = 'SaveButton'
|
|
OnClick = SaveButtonClick
|
|
TabOrder = 2
|
|
end
|
|
object LinkEdit: TEdit
|
|
AnchorSideLeft.Control = LinkLabel
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = ShortEdit
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = ShortTabSheet
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 56
|
|
Height = 27
|
|
Top = 29
|
|
Width = 647
|
|
Anchors = [akTop, akLeft, akRight]
|
|
AutoSize = True
|
|
BorderSpacing.Left = 6
|
|
BorderSpacing.Top = 2
|
|
BorderSpacing.Right = 2
|
|
OnChange = LinkEditEditingDone
|
|
OnEditingDone = LinkEditEditingDone
|
|
TabOrder = 3
|
|
Text = 'LinkEdit'
|
|
end
|
|
end
|
|
object InheritedTabSheet: TTabSheet
|
|
Caption = 'InheritedTabSheet'
|
|
ClientHeight = 100
|
|
ClientWidth = 705
|
|
object InheritedShortLabel: TLabel
|
|
Height = 14
|
|
Top = 2
|
|
Width = 705
|
|
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
|
|
Height = 27
|
|
Top = 18
|
|
Width = 705
|
|
Anchors = [akTop, akLeft, akRight]
|
|
AutoSize = True
|
|
BorderSpacing.Top = 2
|
|
ReadOnly = True
|
|
TabOrder = 0
|
|
Text = 'InheritedShortEdit'
|
|
end
|
|
object MoveToInheritedButton: TButton
|
|
AnchorSideTop.Control = InheritedShortEdit
|
|
AnchorSideTop.Side = asrBottom
|
|
Height = 23
|
|
Top = 51
|
|
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 = 51
|
|
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 = 51
|
|
Width = 151
|
|
AutoSize = True
|
|
BorderSpacing.Left = 10
|
|
Caption = 'AddLinkToInheritedButton'
|
|
OnClick = AddLinkToInheritedButtonClick
|
|
TabOrder = 3
|
|
end
|
|
end
|
|
object DescrTabSheet: TTabSheet
|
|
Caption = 'DescrTabSheet'
|
|
ClientHeight = 100
|
|
ClientWidth = 705
|
|
object DescrMemo: TMemo
|
|
Height = 96
|
|
Width = 703
|
|
Align = alClient
|
|
BorderSpacing.Right = 2
|
|
BorderSpacing.Bottom = 4
|
|
Lines.Strings = (
|
|
'DescrMemo'
|
|
)
|
|
OnChange = DescrMemoChange
|
|
TabOrder = 0
|
|
end
|
|
end
|
|
object ErrorsTabSheet: TTabSheet
|
|
Caption = 'ErrorsTabSheet'
|
|
ClientHeight = 100
|
|
ClientWidth = 705
|
|
object ErrorsMemo: TMemo
|
|
Height = 96
|
|
Width = 703
|
|
Align = alClient
|
|
BorderSpacing.Right = 2
|
|
BorderSpacing.Bottom = 4
|
|
Lines.Strings = (
|
|
'ErrorsMemo'
|
|
)
|
|
OnChange = ErrorsMemoChange
|
|
TabOrder = 0
|
|
end
|
|
end
|
|
object SeeAlsoTabSheet: TTabSheet
|
|
Caption = 'SeeAlsoTabSheet'
|
|
ClientHeight = 100
|
|
ClientWidth = 705
|
|
object LinkListBox: TListBox
|
|
AnchorSideTop.Control = AddLinkButton
|
|
AnchorSideTop.Side = asrBottom
|
|
Height = 69
|
|
Top = 27
|
|
Width = 703
|
|
Align = alBottom
|
|
Anchors = [akTop, akLeft, akRight, akBottom]
|
|
BorderSpacing.Top = 4
|
|
BorderSpacing.Right = 2
|
|
BorderSpacing.Bottom = 4
|
|
OnClick = LinkListBoxClick
|
|
TabOrder = 0
|
|
end
|
|
object AddLinkButton: TButton
|
|
AnchorSideRight.Control = DeleteLinkButton
|
|
Left = 495
|
|
Height = 23
|
|
Width = 95
|
|
Anchors = [akTop, akRight]
|
|
AutoSize = True
|
|
BorderSpacing.Right = 6
|
|
Caption = 'AddLinkButton'
|
|
OnClick = AddLinkButtonClick
|
|
TabOrder = 1
|
|
end
|
|
object DeleteLinkButton: TButton
|
|
AnchorSideRight.Control = SeeAlsoTabSheet
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 596
|
|
Height = 23
|
|
Width = 107
|
|
Anchors = [akTop, akRight]
|
|
AutoSize = True
|
|
BorderSpacing.Right = 2
|
|
Caption = 'DeleteLinkButton'
|
|
OnClick = DeleteLinkButtonClick
|
|
TabOrder = 2
|
|
end
|
|
object LinkTextEdit: TEdit
|
|
AnchorSideLeft.Control = LinkIdComboBox
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideRight.Control = AddLinkButton
|
|
Left = 229
|
|
Height = 27
|
|
Top = 1
|
|
Width = 262
|
|
Anchors = [akTop, akLeft, akRight]
|
|
AutoSize = True
|
|
BorderSpacing.Left = 4
|
|
BorderSpacing.Right = 4
|
|
OnChange = LinkChange
|
|
TabOrder = 3
|
|
Text = 'LinkTextEdit'
|
|
end
|
|
object LinkIdComboBox: TComboBox
|
|
Height = 21
|
|
Top = 1
|
|
Width = 225
|
|
ItemHeight = 13
|
|
OnChange = LinkChange
|
|
TabOrder = 4
|
|
Text = 'LinkIdComboBox'
|
|
end
|
|
end
|
|
object ExampleTabSheet: TTabSheet
|
|
Caption = 'ExampleTabSheet'
|
|
ClientHeight = 100
|
|
ClientWidth = 705
|
|
object ExampleEdit: TEdit
|
|
Height = 27
|
|
Width = 703
|
|
Align = alTop
|
|
AutoSize = True
|
|
BorderSpacing.Right = 2
|
|
OnChange = ExampleEditChange
|
|
TabOrder = 0
|
|
Text = 'ExampleEdit'
|
|
end
|
|
object BrowseExampleButton: TButton
|
|
AnchorSideTop.Control = ExampleEdit
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = ExampleTabSheet
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 566
|
|
Height = 23
|
|
Top = 33
|
|
Width = 133
|
|
Anchors = [akTop, akRight]
|
|
AutoSize = True
|
|
BorderSpacing.Around = 6
|
|
Caption = 'BrowseExampleButton'
|
|
OnClick = BrowseExampleButtonClick
|
|
TabOrder = 1
|
|
end
|
|
end
|
|
end
|
|
object LeftBtnPanel: TPanel
|
|
Height = 126
|
|
Width = 20
|
|
Align = alLeft
|
|
BevelOuter = bvNone
|
|
ClientHeight = 126
|
|
ClientWidth = 20
|
|
FullRepaint = False
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
TabOrder = 1
|
|
object BoldFormatButton: TSpeedButton
|
|
Height = 23
|
|
Width = 20
|
|
Align = alTop
|
|
Color = clBtnFace
|
|
NumGlyphs = 0
|
|
OnClick = FormatButtonClick
|
|
end
|
|
object ItalicFormatButton: TSpeedButton
|
|
Tag = 1
|
|
Height = 23
|
|
Top = 46
|
|
Width = 20
|
|
Align = alTop
|
|
Color = clBtnFace
|
|
NumGlyphs = 0
|
|
OnClick = FormatButtonClick
|
|
end
|
|
object UnderlineFormatButton: TSpeedButton
|
|
Tag = 2
|
|
Height = 23
|
|
Top = 23
|
|
Width = 20
|
|
Align = alTop
|
|
Color = clBtnFace
|
|
NumGlyphs = 0
|
|
OnClick = FormatButtonClick
|
|
end
|
|
object InsertVarTagButton: TSpeedButton
|
|
Tag = 5
|
|
Height = 23
|
|
Top = 92
|
|
Width = 20
|
|
Align = alTop
|
|
Color = clBtnFace
|
|
NumGlyphs = 0
|
|
OnClick = FormatButtonClick
|
|
end
|
|
object InsertParagraphSpeedButton: TSpeedButton
|
|
Tag = 6
|
|
Height = 23
|
|
Top = 69
|
|
Width = 20
|
|
Align = alTop
|
|
Caption = 'P'
|
|
Color = clBtnFace
|
|
NumGlyphs = 0
|
|
OnClick = FormatButtonClick
|
|
end
|
|
end
|
|
object RightBtnPanel: TPanel
|
|
Left = 20
|
|
Height = 126
|
|
Width = 20
|
|
Align = alLeft
|
|
BevelOuter = bvNone
|
|
ClientHeight = 126
|
|
ClientWidth = 20
|
|
TabOrder = 2
|
|
object InsertLinkSpeedButton: TSpeedButton
|
|
Height = 23
|
|
Width = 20
|
|
Align = alTop
|
|
Caption = 'Li'
|
|
Color = clBtnFace
|
|
Enabled = False
|
|
NumGlyphs = 0
|
|
OnClick = InsertLinkSpeedButtonClick
|
|
ShowHint = True
|
|
ParentShowHint = False
|
|
end
|
|
object InsertCodeTagButton: TSpeedButton
|
|
Tag = 3
|
|
Height = 23
|
|
Top = 23
|
|
Width = 20
|
|
Align = alTop
|
|
Color = clBtnFace
|
|
NumGlyphs = 0
|
|
OnClick = FormatButtonClick
|
|
ShowHint = True
|
|
ParentShowHint = False
|
|
end
|
|
object InsertRemarkButton: TSpeedButton
|
|
Tag = 4
|
|
Height = 23
|
|
Top = 46
|
|
Width = 20
|
|
Align = alTop
|
|
Color = clBtnFace
|
|
NumGlyphs = 0
|
|
OnClick = FormatButtonClick
|
|
ShowHint = True
|
|
ParentShowHint = False
|
|
end
|
|
end
|
|
object OpenDialog: TOpenDialog
|
|
Title = 'Open example file'
|
|
Filter = 'pascal file|*.pas; *.pp; *.p'
|
|
FilterIndex = 0
|
|
left = 240
|
|
top = 16
|
|
end
|
|
end
|