/ide/fpdoceditwindow.lfm
http://github.com/graemeg/lazarus · Unknown · 564 lines · 564 code · 0 blank · 0 comment · 0 complexity · 5b2953c7d9e4f442f0a9f8522ab79fc2 MD5 · raw file
- 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 = '1.1'
- object PageControl: TPageControl
- Left = 33
- Height = 156
- Top = 0
- Width = 720
- ActivePage = SeeAlsoTabSheet
- Align = alClient
- TabIndex = 4
- TabOrder = 0
- TabPosition = tpBottom
- OnChange = PageControlChange
- object ShortTabSheet: TTabSheet
- Caption = 'ShortTabSheet'
- ClientHeight = 117
- ClientWidth = 714
- object LinkLabel: TLabel
- AnchorSideTop.Control = LinkEdit
- AnchorSideTop.Side = asrCenter
- Left = 6
- Height = 16
- Top = 27
- Width = 60
- BorderSpacing.Top = 6
- Caption = 'LinkLabel'
- ParentColor = False
- end
- object ShortLabel: TLabel
- AnchorSideLeft.Control = ShortTabSheet
- AnchorSideTop.Control = ShortEdit
- AnchorSideTop.Side = asrCenter
- Left = 6
- Height = 16
- Top = 3
- Width = 67
- BorderSpacing.Left = 6
- Caption = 'ShortLabel'
- ParentColor = False
- end
- object ShortEdit: TEdit
- AnchorSideLeft.Control = ShortLabel
- AnchorSideLeft.Side = asrBottom
- AnchorSideRight.Control = ShortTabSheet
- AnchorSideRight.Side = asrBottom
- Left = 79
- Height = 22
- Top = 0
- Width = 633
- 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 = 20
- Top = 52
- Width = 107
- 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 = 72
- Height = 22
- Top = 24
- Width = 640
- Anchors = [akTop, akLeft, akRight]
- AutoSelect = False
- BorderSpacing.Left = 6
- BorderSpacing.Top = 2
- BorderSpacing.Right = 2
- OnChange = LinkEditChange
- OnEditingDone = LinkEditEditingDone
- TabOrder = 2
- Text = 'LinkEdit'
- end
- object OpenXMLButton: TButton
- AnchorSideTop.Control = CreateButton
- AnchorSideRight.Control = ShortTabSheet
- AnchorSideRight.Side = asrBottom
- Left = 588
- Height = 20
- Top = 52
- Width = 126
- Anchors = [akTop, akRight]
- AutoSize = True
- Caption = 'OpenXMLButton'
- OnClick = OpenXMLButtonClick
- ParentShowHint = False
- ShowHint = True
- TabOrder = 3
- end
- end
- object InheritedTabSheet: TTabSheet
- Caption = 'InheritedTabSheet'
- ClientHeight = 117
- ClientWidth = 714
- object InheritedShortLabel: TLabel
- Left = 0
- Height = 16
- Top = 2
- Width = 714
- 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 = 22
- Top = 20
- Width = 714
- 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 = 20
- Top = 48
- Width = 176
- 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 = 186
- Height = 20
- Top = 48
- Width = 191
- 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 = 387
- Height = 20
- Top = 48
- Width = 194
- AutoSize = True
- BorderSpacing.Left = 10
- Caption = 'AddLinkToInheritedButton'
- OnClick = AddLinkToInheritedButtonClick
- TabOrder = 3
- end
- end
- object DescrTabSheet: TTabSheet
- Caption = 'DescrTabSheet'
- ClientHeight = 117
- ClientWidth = 714
- object DescrMemo: TMemo
- Left = 0
- Height = 89
- Top = 24
- Width = 712
- Align = alClient
- BorderSpacing.Right = 2
- BorderSpacing.Bottom = 4
- Lines.Strings = (
- 'DescrMemo'
- )
- OnChange = DescrMemoChange
- OnEditingDone = DescrMemoEditingDone
- ScrollBars = ssAutoBoth
- TabOrder = 0
- end
- object ShortPanel: TPanel
- Left = 0
- Height = 24
- Top = 0
- Width = 714
- Align = alTop
- Alignment = taLeftJustify
- AutoSize = True
- Caption = 'Short'
- ClientHeight = 24
- ClientWidth = 714
- TabOrder = 1
- object DescrShortEdit: TEdit
- AnchorSideLeft.Control = ShortPanel
- AnchorSideRight.Side = asrBottom
- Left = 61
- Height = 22
- Top = 1
- Width = 650
- 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 = 117
- ClientWidth = 714
- object ErrorsMemo: TMemo
- Left = 0
- Height = 113
- Top = 0
- Width = 712
- Align = alClient
- BorderSpacing.Right = 2
- BorderSpacing.Bottom = 4
- Lines.Strings = (
- 'ErrorsMemo'
- )
- OnChange = ErrorsMemoChange
- OnEditingDone = ErrorsMemoEditingDone
- ScrollBars = ssAutoBoth
- TabOrder = 0
- end
- end
- object SeeAlsoTabSheet: TTabSheet
- Caption = 'SeeAlsoTabSheet'
- ClientHeight = 117
- ClientWidth = 714
- object SeeAlsoMemo: TMemo
- Left = 0
- Height = 117
- Top = 0
- Width = 714
- Align = alClient
- Lines.Strings = (
- 'SeeAlsoMemo'
- )
- OnChange = SeeAlsoMemoChange
- OnEditingDone = SeeAlsoMemoEditingDone
- ScrollBars = ssAutoBoth
- TabOrder = 0
- end
- end
- object ExampleTabSheet: TTabSheet
- Caption = 'ExampleTabSheet'
- ClientHeight = 122
- ClientWidth = 687
- 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 = 122
- ClientWidth = 687
- 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 = 33
- Align = alLeft
- AutoSize = True
- BevelOuter = bvNone
- ChildSizing.Layout = cclLeftToRightThenTopToBottom
- ChildSizing.ControlsPerLine = 3
- ClientHeight = 156
- ClientWidth = 33
- FullRepaint = False
- ParentShowHint = False
- ShowHint = True
- TabOrder = 1
- object BoldFormatButton: TSpeedButton
- Left = 0
- Height = 4
- Top = 0
- Width = 4
- Constraints.MaxHeight = 23
- Constraints.MaxWidth = 20
- OnClick = FormatButtonClick
- end
- object ItalicFormatButton: TSpeedButton
- Tag = 1
- Left = 4
- Height = 4
- Top = 0
- Width = 11
- Constraints.MaxHeight = 23
- Constraints.MaxWidth = 20
- OnClick = FormatButtonClick
- end
- object UnderlineFormatButton: TSpeedButton
- Tag = 2
- Left = 15
- Height = 4
- Top = 0
- Width = 18
- Constraints.MaxHeight = 23
- Constraints.MaxWidth = 20
- OnClick = FormatButtonClick
- end
- object InsertVarTagButton: TSpeedButton
- Tag = 5
- Left = 0
- Height = 20
- Top = 4
- Width = 4
- Constraints.MaxHeight = 23
- Constraints.MaxWidth = 20
- OnClick = FormatButtonClick
- end
- object InsertParagraphSpeedButton: TSpeedButton
- Tag = 6
- Left = 4
- Height = 20
- Top = 4
- Width = 11
- Constraints.MaxHeight = 23
- Constraints.MaxWidth = 20
- Caption = 'P'
- OnClick = FormatButtonClick
- end
- object InsertLinkSpeedButton: TSpeedButton
- Left = 15
- Height = 20
- Top = 4
- Width = 18
- Constraints.MaxHeight = 23
- Constraints.MaxWidth = 20
- Caption = 'Li'
- Enabled = False
- OnClick = InsertLinkSpeedButtonClick
- ShowHint = True
- ParentShowHint = False
- end
- object InsertCodeTagButton: TSpeedButton
- Tag = 3
- Left = 0
- Height = 20
- Top = 24
- Width = 4
- Constraints.MaxHeight = 23
- Constraints.MaxWidth = 20
- OnClick = FormatButtonClick
- ShowHint = True
- ParentShowHint = False
- end
- object InsertRemarkButton: TSpeedButton
- Tag = 4
- Left = 4
- Height = 20
- Top = 24
- Width = 11
- Constraints.MaxHeight = 23
- Constraints.MaxWidth = 20
- OnClick = FormatButtonClick
- ShowHint = True
- ParentShowHint = False
- end
- object InsertPrintShortSpeedButton: TSpeedButton
- Tag = 7
- Left = 15
- Height = 20
- Top = 24
- Width = 18
- Constraints.MaxHeight = 23
- Constraints.MaxWidth = 20
- Caption = 'PS'
- OnClick = FormatButtonClick
- ShowHint = True
- ParentShowHint = False
- end
- object InsertURLTagSpeedButton: TSpeedButton
- Tag = 8
- Left = 0
- Height = 4
- Top = 44
- Width = 4
- Constraints.MaxHeight = 23
- Constraints.MaxWidth = 20
- OnClick = FormatButtonClick
- ShowHint = True
- ParentShowHint = False
- end
- object SaveButton: TSpeedButton
- AnchorSideLeft.Side = asrBottom
- Left = 0
- Height = 29
- Top = 127
- Width = 33
- Align = alBottom
- Caption = 'Save'
- 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