IDE: fpdoc editor: added insert url tag

git-svn-id: trunk@22578 -

ide/fpdoceditwindow.lfm

@@ -14,10 +14,10 @@ object FPDocEditor: TFPDocEditor
   OnResize = FormResize
   LCLVersion = '0.9.29'
   object PageControl: TPageControl
-    Left = 60
+    Left = 63
     Height = 126
     Top = 0
-    Width = 693
+    Width = 690
     ActivePage = ShortTabSheet
     Align = alClient
     TabIndex = 0
@@ -27,8 +27,8 @@ object FPDocEditor: TFPDocEditor
     OnPageChanged = PageControlChange
     object ShortTabSheet: TTabSheet
       Caption = 'ShortTabSheet'
-      ClientHeight = 95
+      ClientHeight = 99
-      ClientWidth = 689
+      ClientWidth = 688
       object LinkLabel: TLabel
         AnchorSideTop.Control = LinkEdit
         AnchorSideTop.Side = asrCenter
@@ -60,7 +60,7 @@ object FPDocEditor: TFPDocEditor
         Left = 82
         Height = 27
         Top = 0
-        Width = 605
+        Width = 604
         Anchors = [akTop, akLeft, akRight]
         BorderSpacing.Left = 6
         BorderSpacing.Right = 2
@@ -92,7 +92,7 @@ object FPDocEditor: TFPDocEditor
         Left = 72
         Height = 27
         Top = 29
-        Width = 615
+        Width = 614
         Anchors = [akTop, akLeft, akRight]
         BorderSpacing.Left = 6
         BorderSpacing.Top = 2
@@ -105,13 +105,13 @@ object FPDocEditor: TFPDocEditor
     end
     object InheritedTabSheet: TTabSheet
       Caption = 'InheritedTabSheet'
-      ClientHeight = 181
+      ClientHeight = 99
-      ClientWidth = 656
+      ClientWidth = 688
       object InheritedShortLabel: TLabel
         Left = 0
         Height = 14
         Top = 2
-        Width = 656
+        Width = 688
         Align = alTop
         BorderSpacing.Top = 2
         Caption = 'InheritedShortLabel'
@@ -126,7 +126,7 @@ object FPDocEditor: TFPDocEditor
         Left = 0
         Height = 27
         Top = 18
-        Width = 656
+        Width = 688
         Anchors = [akTop, akLeft, akRight]
         BorderSpacing.Top = 2
         ReadOnly = True
@@ -178,13 +178,13 @@ object FPDocEditor: TFPDocEditor
     end
     object DescrTabSheet: TTabSheet
       Caption = 'DescrTabSheet'
-      ClientHeight = 181
+      ClientHeight = 99
-      ClientWidth = 656
+      ClientWidth = 688
       object DescrMemo: TMemo
         Left = 0
-        Height = 177
+        Height = 95
         Top = 0
-        Width = 654
+        Width = 686
         Align = alClient
         BorderSpacing.Right = 2
         BorderSpacing.Bottom = 4
@@ -197,13 +197,13 @@ object FPDocEditor: TFPDocEditor
     end
     object ErrorsTabSheet: TTabSheet
       Caption = 'ErrorsTabSheet'
-      ClientHeight = 181
+      ClientHeight = 99
-      ClientWidth = 656
+      ClientWidth = 688
       object ErrorsMemo: TMemo
         Left = 0
-        Height = 177
+        Height = 95
         Top = 0
-        Width = 654
+        Width = 686
         Align = alClient
         BorderSpacing.Right = 2
         BorderSpacing.Bottom = 4
@@ -216,13 +216,13 @@ object FPDocEditor: TFPDocEditor
     end
     object SeeAlsoTabSheet: TTabSheet
       Caption = 'SeeAlsoTabSheet'
-      ClientHeight = 181
+      ClientHeight = 99
-      ClientWidth = 656
+      ClientWidth = 688
       object SeeAlsoMemo: TMemo
         Left = 0
-        Height = 181
+        Height = 99
         Top = 0
-        Width = 656
+        Width = 688
         Align = alClient
         Lines.Strings = (
           'SeeAlsoMemo'
@@ -233,13 +233,13 @@ object FPDocEditor: TFPDocEditor
     end
     object ExampleTabSheet: TTabSheet
       Caption = 'ExampleTabSheet'
-      ClientHeight = 181
+      ClientHeight = 99
-      ClientWidth = 656
+      ClientWidth = 688
       object ExampleEdit: TEdit
         Left = 0
         Height = 27
         Top = 0
-        Width = 654
+        Width = 686
         Align = alTop
         BorderSpacing.Right = 2
         OnChange = ExampleEditChange
@@ -251,7 +251,7 @@ object FPDocEditor: TFPDocEditor
         AnchorSideTop.Side = asrBottom
         AnchorSideRight.Control = ExampleTabSheet
         AnchorSideRight.Side = asrBottom
-        Left = 517
+        Left = 549
         Height = 23
         Top = 33
         Width = 133
@@ -268,14 +268,14 @@ object FPDocEditor: TFPDocEditor
     Left = 0
     Height = 126
     Top = 0
-    Width = 60
+    Width = 63
     Align = alLeft
     AutoSize = True
     BevelOuter = bvNone
     ChildSizing.Layout = cclLeftToRightThenTopToBottom
     ChildSizing.ControlsPerLine = 3
     ClientHeight = 126
-    ClientWidth = 60
+    ClientWidth = 63
     FullRepaint = False
     ParentShowHint = False
     ShowHint = True
@@ -398,12 +398,26 @@ object FPDocEditor: TFPDocEditor
       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 = 97
-      Width = 60
+      Width = 63
       Align = alBottom
       Caption = 'Save'
       Color = clBtnFace

ide/fpdoceditwindow.lrs

@@ -6,12 +6,12 @@ LazarusResources.Add('TFPDocEditor','FORMDATA',[
   +'FPDoc editor'#12'ClientHeight'#2'~'#11'ClientWidth'#3#241#2#10'KeyPreview'#9
   +#8'OnCreate'#7#10'FormCreate'#9'OnDestroy'#7#11'FormDestroy'#9'OnKeyDown'#7
   +#11'FormKeyDown'#8'OnResize'#7#10'FormResize'#10'LCLVersion'#6#6'0.9.29'#0#12
-  +'TPageControl'#11'PageControl'#4'Left'#2'<'#6'Height'#2'~'#3'Top'#2#0#5'Widt'
+  +'TPageControl'#11'PageControl'#4'Left'#2'?'#6'Height'#2'~'#3'Top'#2#0#5'Widt'
-  +'h'#3#181#2#10'ActivePage'#7#13'ShortTabSheet'#5'Align'#7#8'alClient'#8'TabI'
+  +'h'#3#178#2#10'ActivePage'#7#13'ShortTabSheet'#5'Align'#7#8'alClient'#8'TabI'
   +'ndex'#2#0#8'TabOrder'#2#0#11'TabPosition'#7#8'tpBottom'#8'OnChange'#7#17'Pa'
   +'geControlChange'#13'OnPageChanged'#7#17'PageControlChange'#0#9'TTabSheet'#13
-  +'ShortTabSheet'#7'Caption'#6#13'ShortTabSheet'#12'ClientHeight'#2'_'#11'Clie'
+  +'ShortTabSheet'#7'Caption'#6#13'ShortTabSheet'#12'ClientHeight'#2'c'#11'Clie'
-  +'ntWidth'#3#177#2#0#6'TLabel'#9'LinkLabel'#21'AnchorSideTop.Control'#7#8'Lin'
+  +'ntWidth'#3#176#2#0#6'TLabel'#9'LinkLabel'#21'AnchorSideTop.Control'#7#8'Lin'
   +'kEdit'#18'AnchorSideTop.Side'#7#9'asrCenter'#4'Left'#2#6#6'Height'#2#18#3'T'
   +'op'#2'!'#5'Width'#2'<'#17'BorderSpacing.Top'#2#6#7'Caption'#6#9'LinkLabel'
   +#11'ParentColor'#8#0#0#6'TLabel'#10'ShortLabel'#22'AnchorSideLeft.Control'#7
@@ -21,7 +21,7 @@ LazarusResources.Add('TFPDocEditor','FORMDATA',[
   +'TEdit'#9'ShortEdit'#22'AnchorSideLeft.Control'#7#10'ShortLabel'#19'AnchorSi'
   +'deLeft.Side'#7#9'asrBottom'#23'AnchorSideRight.Control'#7#13'ShortTabSheet'
   +#20'AnchorSideRight.Side'#7#9'asrBottom'#4'Left'#2'R'#6'Height'#2#27#3'Top'#2
-  +#0#5'Width'#3']'#2#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#18'BorderSp'
+  +#0#5'Width'#3'\'#2#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#18'BorderSp'
   +'acing.Left'#2#6#19'BorderSpacing.Right'#2#2#8'OnChange'#7#20'ShortEditEditi'
   +'ngDone'#13'OnEditingDone'#7#20'ShortEditEditingDone'#8'TabOrder'#2#0#4'Text'
   +#6#9'ShortEdit'#0#0#7'TButton'#12'CreateButton'#21'AnchorSideTop.Control'#7#8
@@ -32,28 +32,28 @@ LazarusResources.Add('TFPDocEditor','FORMDATA',[
   +'eLeft.Side'#7#9'asrBottom'#21'AnchorSideTop.Control'#7#9'ShortEdit'#18'Anch'
   +'orSideTop.Side'#7#9'asrBottom'#23'AnchorSideRight.Control'#7#13'ShortTabShe'
   +'et'#20'AnchorSideRight.Side'#7#9'asrBottom'#4'Left'#2'H'#6'Height'#2#27#3'T'
-  +'op'#2#29#5'Width'#3'g'#2#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#18'B'
+  +'op'#2#29#5'Width'#3'f'#2#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#18'B'
   +'orderSpacing.Left'#2#6#17'BorderSpacing.Top'#2#2#19'BorderSpacing.Right'#2#2
   +#8'OnChange'#7#19'LinkEditEditingDone'#13'OnEditingDone'#7#19'LinkEditEditin'
   +'gDone'#8'TabOrder'#2#2#4'Text'#6#8'LinkEdit'#0#0#0#9'TTabSheet'#17'Inherite'
-  +'dTabSheet'#7'Caption'#6#17'InheritedTabSheet'#12'ClientHeight'#3#181#0#11'C'
+  +'dTabSheet'#7'Caption'#6#17'InheritedTabSheet'#12'ClientHeight'#2'c'#11'Clie'
-  +'lientWidth'#3#144#2#0#6'TLabel'#19'InheritedShortLabel'#4'Left'#2#0#6'Heigh'
+  +'ntWidth'#3#176#2#0#6'TLabel'#19'InheritedShortLabel'#4'Left'#2#0#6'Height'#2
-  +'t'#2#14#3'Top'#2#2#5'Width'#3#144#2#5'Align'#7#5'alTop'#17'BorderSpacing.To'
+  +#14#3'Top'#2#2#5'Width'#3#176#2#5'Align'#7#5'alTop'#17'BorderSpacing.Top'#2#2
-  +'p'#2#2#7'Caption'#6#19'InheritedShortLabel'#11'ParentColor'#8#0#0#5'TEdit'
+  +#7'Caption'#6#19'InheritedShortLabel'#11'ParentColor'#8#0#0#5'TEdit'#18'Inhe'
-  +#18'InheritedShortEdit'#22'AnchorSideLeft.Control'#7#17'InheritedTabSheet'#21
+  +'ritedShortEdit'#22'AnchorSideLeft.Control'#7#17'InheritedTabSheet'#21'Ancho'
-  +'AnchorSideTop.Control'#7#19'InheritedShortLabel'#18'AnchorSideTop.Side'#7#9
+  +'rSideTop.Control'#7#19'InheritedShortLabel'#18'AnchorSideTop.Side'#7#9'asrB'
-  +'asrBottom'#23'AnchorSideRight.Control'#7#17'InheritedTabSheet'#20'AnchorSid'
+  +'ottom'#23'AnchorSideRight.Control'#7#17'InheritedTabSheet'#20'AnchorSideRig'
-  +'eRight.Side'#7#9'asrBottom'#4'Left'#2#0#6'Height'#2#27#3'Top'#2#18#5'Width'
+  +'ht.Side'#7#9'asrBottom'#4'Left'#2#0#6'Height'#2#27#3'Top'#2#18#5'Width'#3
-  +#3#144#2#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#17'BorderSpacing.Top'
+  +#176#2#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#17'BorderSpacing.Top'#2
-  +#2#2#8'ReadOnly'#9#8'TabOrder'#2#0#4'Text'#6#18'InheritedShortEdit'#0#0#7'TB'
+  +#2#8'ReadOnly'#9#8'TabOrder'#2#0#4'Text'#6#18'InheritedShortEdit'#0#0#7'TBut'
-  +'utton'#21'MoveToInheritedButton'#21'AnchorSideTop.Control'#7#18'InheritedSh'
+  +'ton'#21'MoveToInheritedButton'#21'AnchorSideTop.Control'#7#18'InheritedShor'
-  +'ortEdit'#18'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'#2#0#6'Height'#2#23#3
+  +'tEdit'#18'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'#2#0#6'Height'#2#23#3'T'
-  +'Top'#2'3'#5'Width'#3#140#0#8'AutoSize'#9#20'BorderSpacing.Around'#2#6#7'Cap'
+  +'op'#2'3'#5'Width'#3#140#0#8'AutoSize'#9#20'BorderSpacing.Around'#2#6#7'Capt'
-  +'tion'#6#21'MoveToInheritedButton'#7'OnClick'#7#26'MoveToInheritedButtonClic'
+  +'ion'#6#21'MoveToInheritedButton'#7'OnClick'#7#26'MoveToInheritedButtonClick'
-  +'k'#8'TabOrder'#2#1#0#0#7'TButton'#23'CopyFromInheritedButton'#22'AnchorSide'
+  +#8'TabOrder'#2#1#0#0#7'TButton'#23'CopyFromInheritedButton'#22'AnchorSideLef'
-  +'Left.Control'#7#21'MoveToInheritedButton'#19'AnchorSideLeft.Side'#7#9'asrBo'
+  +'t.Control'#7#21'MoveToInheritedButton'#19'AnchorSideLeft.Side'#7#9'asrBotto'
-  +'ttom'#21'AnchorSideTop.Control'#7#21'MoveToInheritedButton'#18'AnchorSideTo'
+  +'m'#21'AnchorSideTop.Control'#7#21'MoveToInheritedButton'#18'AnchorSideTop.S'
-  +'p.Side'#7#9'asrCenter'#4'Left'#3#150#0#6'Height'#2#23#3'Top'#2'3'#5'Width'#3
+  +'ide'#7#9'asrCenter'#4'Left'#3#150#0#6'Height'#2#23#3'Top'#2'3'#5'Width'#3
   +#151#0#8'AutoSize'#9#18'BorderSpacing.Left'#2#10#7'Caption'#6#23'CopyFromInh'
   +'eritedButton'#7'OnClick'#7#28'CopyFromInheritedButtonClick'#8'TabOrder'#2#2
   +#0#0#7'TButton'#24'AddLinkToInheritedButton'#22'AnchorSideLeft.Control'#7#23
@@ -62,71 +62,74 @@ LazarusResources.Add('TFPDocEditor','FORMDATA',[
   +'Top'#2'3'#5'Width'#3#151#0#8'AutoSize'#9#18'BorderSpacing.Left'#2#10#7'Capt'
   +'ion'#6#24'AddLinkToInheritedButton'#7'OnClick'#7#29'AddLinkToInheritedButto'
   +'nClick'#8'TabOrder'#2#3#0#0#0#9'TTabSheet'#13'DescrTabSheet'#7'Caption'#6#13
-  +'DescrTabSheet'#12'ClientHeight'#3#181#0#11'ClientWidth'#3#144#2#0#5'TMemo'#9
+  +'DescrTabSheet'#12'ClientHeight'#2'c'#11'ClientWidth'#3#176#2#0#5'TMemo'#9'D'
-  +'DescrMemo'#4'Left'#2#0#6'Height'#3#177#0#3'Top'#2#0#5'Width'#3#142#2#5'Alig'
+  +'escrMemo'#4'Left'#2#0#6'Height'#2'_'#3'Top'#2#0#5'Width'#3#174#2#5'Align'#7
-  +'n'#7#8'alClient'#19'BorderSpacing.Right'#2#2#20'BorderSpacing.Bottom'#2#4#13
+  +#8'alClient'#19'BorderSpacing.Right'#2#2#20'BorderSpacing.Bottom'#2#4#13'Lin'
-  ,'Lines.Strings'#1#6#9'DescrMemo'#0#8'OnChange'#7#15'DescrMemoChange'#8'TabOr'
+  ,'es.Strings'#1#6#9'DescrMemo'#0#8'OnChange'#7#15'DescrMemoChange'#8'TabOrder'
-  +'der'#2#0#0#0#0#9'TTabSheet'#14'ErrorsTabSheet'#7'Caption'#6#14'ErrorsTabShe'
+  +#2#0#0#0#0#9'TTabSheet'#14'ErrorsTabSheet'#7'Caption'#6#14'ErrorsTabSheet'#12
-  +'et'#12'ClientHeight'#3#181#0#11'ClientWidth'#3#144#2#0#5'TMemo'#10'ErrorsMe'
+  +'ClientHeight'#2'c'#11'ClientWidth'#3#176#2#0#5'TMemo'#10'ErrorsMemo'#4'Left'
-  +'mo'#4'Left'#2#0#6'Height'#3#177#0#3'Top'#2#0#5'Width'#3#142#2#5'Align'#7#8
+  +#2#0#6'Height'#2'_'#3'Top'#2#0#5'Width'#3#174#2#5'Align'#7#8'alClient'#19'Bo'
-  +'alClient'#19'BorderSpacing.Right'#2#2#20'BorderSpacing.Bottom'#2#4#13'Lines'
+  +'rderSpacing.Right'#2#2#20'BorderSpacing.Bottom'#2#4#13'Lines.Strings'#1#6#10
-  +'.Strings'#1#6#10'ErrorsMemo'#0#8'OnChange'#7#16'ErrorsMemoChange'#8'TabOrde'
+  +'ErrorsMemo'#0#8'OnChange'#7#16'ErrorsMemoChange'#8'TabOrder'#2#0#0#0#0#9'TT'
-  +'r'#2#0#0#0#0#9'TTabSheet'#15'SeeAlsoTabSheet'#7'Caption'#6#15'SeeAlsoTabShe'
+  +'abSheet'#15'SeeAlsoTabSheet'#7'Caption'#6#15'SeeAlsoTabSheet'#12'ClientHeig'
-  +'et'#12'ClientHeight'#3#181#0#11'ClientWidth'#3#144#2#0#5'TMemo'#11'SeeAlsoM'
+  +'ht'#2'c'#11'ClientWidth'#3#176#2#0#5'TMemo'#11'SeeAlsoMemo'#4'Left'#2#0#6'H'
-  +'emo'#4'Left'#2#0#6'Height'#3#181#0#3'Top'#2#0#5'Width'#3#144#2#5'Align'#7#8
+  +'eight'#2'c'#3'Top'#2#0#5'Width'#3#176#2#5'Align'#7#8'alClient'#13'Lines.Str'
-  +'alClient'#13'Lines.Strings'#1#6#11'SeeAlsoMemo'#0#13'OnEditingDone'#7#22'Se'
+  +'ings'#1#6#11'SeeAlsoMemo'#0#13'OnEditingDone'#7#22'SeeAlsoMemoEditingDone'#8
-  +'eAlsoMemoEditingDone'#8'TabOrder'#2#0#0#0#0#9'TTabSheet'#15'ExampleTabSheet'
+  +'TabOrder'#2#0#0#0#0#9'TTabSheet'#15'ExampleTabSheet'#7'Caption'#6#15'Exampl'
-  +#7'Caption'#6#15'ExampleTabSheet'#12'ClientHeight'#3#181#0#11'ClientWidth'#3
+  +'eTabSheet'#12'ClientHeight'#2'c'#11'ClientWidth'#3#176#2#0#5'TEdit'#11'Exam'
-  +#144#2#0#5'TEdit'#11'ExampleEdit'#4'Left'#2#0#6'Height'#2#27#3'Top'#2#0#5'Wi'
+  +'pleEdit'#4'Left'#2#0#6'Height'#2#27#3'Top'#2#0#5'Width'#3#174#2#5'Align'#7#5
-  +'dth'#3#142#2#5'Align'#7#5'alTop'#19'BorderSpacing.Right'#2#2#8'OnChange'#7
+  +'alTop'#19'BorderSpacing.Right'#2#2#8'OnChange'#7#17'ExampleEditChange'#8'Ta'
-  +#17'ExampleEditChange'#8'TabOrder'#2#0#4'Text'#6#11'ExampleEdit'#0#0#7'TButt'
+  +'bOrder'#2#0#4'Text'#6#11'ExampleEdit'#0#0#7'TButton'#19'BrowseExampleButton'
-  +'on'#19'BrowseExampleButton'#21'AnchorSideTop.Control'#7#11'ExampleEdit'#18
+  +#21'AnchorSideTop.Control'#7#11'ExampleEdit'#18'AnchorSideTop.Side'#7#9'asrB'
-  +'AnchorSideTop.Side'#7#9'asrBottom'#23'AnchorSideRight.Control'#7#15'Example'
+  +'ottom'#23'AnchorSideRight.Control'#7#15'ExampleTabSheet'#20'AnchorSideRight'
-  +'TabSheet'#20'AnchorSideRight.Side'#7#9'asrBottom'#4'Left'#3#5#2#6'Height'#2
+  +'.Side'#7#9'asrBottom'#4'Left'#3'%'#2#6'Height'#2#23#3'Top'#2'!'#5'Width'#3
-  +#23#3'Top'#2'!'#5'Width'#3#133#0#7'Anchors'#11#5'akTop'#7'akRight'#0#8'AutoS'
+  +#133#0#7'Anchors'#11#5'akTop'#7'akRight'#0#8'AutoSize'#9#20'BorderSpacing.Ar'
-  +'ize'#9#20'BorderSpacing.Around'#2#6#7'Caption'#6#19'BrowseExampleButton'#7
+  +'ound'#2#6#7'Caption'#6#19'BrowseExampleButton'#7'OnClick'#7#24'BrowseExampl'
-  +'OnClick'#7#24'BrowseExampleButtonClick'#8'TabOrder'#2#1#0#0#0#0#6'TPanel'#12
+  +'eButtonClick'#8'TabOrder'#2#1#0#0#0#0#6'TPanel'#12'LeftBtnPanel'#4'Left'#2#0
-  +'LeftBtnPanel'#4'Left'#2#0#6'Height'#2'~'#3'Top'#2#0#5'Width'#2'<'#5'Align'#7
+  +#6'Height'#2'~'#3'Top'#2#0#5'Width'#2'?'#5'Align'#7#6'alLeft'#8'AutoSize'#9
-  +#6'alLeft'#8'AutoSize'#9#10'BevelOuter'#7#6'bvNone'#18'ChildSizing.Layout'#7
+  +#10'BevelOuter'#7#6'bvNone'#18'ChildSizing.Layout'#7#29'cclLeftToRightThenTo'
-  +#29'cclLeftToRightThenTopToBottom'#27'ChildSizing.ControlsPerLine'#2#3#12'Cl'
+  +'pToBottom'#27'ChildSizing.ControlsPerLine'#2#3#12'ClientHeight'#2'~'#11'Cli'
-  +'ientHeight'#2'~'#11'ClientWidth'#2'<'#11'FullRepaint'#8#14'ParentShowHint'#8
+  +'entWidth'#2'?'#11'FullRepaint'#8#14'ParentShowHint'#8#8'ShowHint'#9#8'TabOr'
-  +#8'ShowHint'#9#8'TabOrder'#2#1#0#12'TSpeedButton'#16'BoldFormatButton'#4'Lef'
+  +'der'#2#1#0#12'TSpeedButton'#16'BoldFormatButton'#4'Left'#2#0#6'Height'#2#23
-  +'t'#2#0#6'Height'#2#23#3'Top'#2#0#5'Width'#2#20#21'Constraints.MaxHeight'#2
+  +#3'Top'#2#0#5'Width'#2#20#21'Constraints.MaxHeight'#2#23#20'Constraints.MaxW'
+  +'idth'#2#20#5'Color'#7#9'clBtnFace'#9'NumGlyphs'#2#0#7'OnClick'#7#17'FormatB'
+  +'uttonClick'#0#0#12'TSpeedButton'#18'ItalicFormatButton'#3'Tag'#2#1#4'Left'#2
+  +#20#6'Height'#2#23#3'Top'#2#0#5'Width'#2#20#21'Constraints.MaxHeight'#2#23#20
+  +'Constraints.MaxWidth'#2#20#5'Color'#7#9'clBtnFace'#9'NumGlyphs'#2#0#7'OnCli'
+  +'ck'#7#17'FormatButtonClick'#0#0#12'TSpeedButton'#21'UnderlineFormatButton'#3
+  +'Tag'#2#2#4'Left'#2'('#6'Height'#2#23#3'Top'#2#0#5'Width'#2#20#21'Constraint'
+  +'s.MaxHeight'#2#23#20'Constraints.MaxWidth'#2#20#5'Color'#7#9'clBtnFace'#9'N'
+  +'umGlyphs'#2#0#7'OnClick'#7#17'FormatButtonClick'#0#0#12'TSpeedButton'#18'In'
+  +'sertVarTagButton'#3'Tag'#2#5#4'Left'#2#0#6'Height'#2#23#3'Top'#2#23#5'Width'
+  +#2#20#21'Constraints.MaxHeight'#2#23#20'Constraints.MaxWidth'#2#20#5'Color'#7
+  +#9'clBtnFace'#9'NumGlyphs'#2#0#7'OnClick'#7#17'FormatButtonClick'#0#0#12'TSp'
+  +'eedButton'#26'InsertParagraphSpeedButton'#3'Tag'#2#6#4'Left'#2#20#6'Height'
+  +#2#23#3'Top'#2#23#5'Width'#2#20#21'Constraints.MaxHeight'#2#23#20'Constraint'
+  +'s.MaxWidth'#2#20#7'Caption'#6#1'P'#5'Color'#7#9'clBtnFace'#9'NumGlyphs'#2#0
+  +#7'OnClick'#7#17'FormatButtonClick'#0#0#12'TSpeedButton'#21'InsertLinkSpeedB'
+  +'utton'#4'Left'#2'('#6'Height'#2#23#3'Top'#2#23#5'Width'#2#20#21'Constraints'
+  +'.MaxHeight'#2#23#20'Constraints.MaxWidth'#2#20#7'Caption'#6#2'Li'#5'Color'#7
+  +#9'clBtnFace'#7'Enabled'#8#9'NumGlyphs'#2#0#7'OnClick'#7#26'InsertLinkSpeedB'
+  +'uttonClick'#8'ShowHint'#9#14'ParentShowHint'#8#0#0#12'TSpeedButton'#19'Inse'
+  +'rtCodeTagButton'#3'Tag'#2#3#4'Left'#2#0#6'Height'#2#23#3'Top'#2'.'#5'Width'
+  +#2#20#21'Constraints.MaxHeight'#2#23#20'Constraints.MaxWidth'#2#20#5'Color'#7
+  +#9'clBtnFace'#9'NumGlyphs'#2#0#7'OnClick'#7#17'FormatButtonClick'#8'ShowHint'
+  +#9#14'ParentShowHint'#8#0#0#12'TSpeedButton'#18'InsertRemarkButton'#3'Tag'#2
+  +#4#4'Left'#2#20#6'Height'#2#23#3'Top'#2'.'#5'Width'#2#20#21'Constraints.MaxH'
+  +'eight'#2#23#20'Constraints.MaxWidth'#2#20#5'Color'#7#9'clBtnFace'#9'NumGlyp'
+  +'hs'#2#0#7'OnClick'#7#17'FormatButtonClick'#8'ShowHint'#9#14'ParentShowHint'
+  +#8#0#0#12'TSpeedButton'#27'InsertPrintShortSpeedButton'#3'Tag'#2#7#4'Left'#2
+  +'('#6'Height'#2#23#3'Top'#2'.'#5'Width'#2#20#21'Constraints.MaxHeight'#2#23
+  +#20'Constraints.MaxWidth'#2#20#7'Caption'#6#2'PS'#5'Color'#7#9'clBtnFace'#9
+  +'NumGlyphs'#2#0#7'OnClick'#7#17'FormatButtonClick'#8'ShowHint'#9#14'ParentSh'
+  +'owHint'#8#0#0#12'TSpeedButton'#23'InsertURLTagSpeedButton'#3'Tag'#2#8#4'Lef'
+  +'t'#2#0#6'Height'#2#23#3'Top'#2'E'#5'Width'#2#20#21'Constraints.MaxHeight'#2
   +#23#20'Constraints.MaxWidth'#2#20#5'Color'#7#9'clBtnFace'#9'NumGlyphs'#2#0#7
-  +'OnClick'#7#17'FormatButtonClick'#0#0#12'TSpeedButton'#18'ItalicFormatButton'
+  +'OnClick'#7#17'FormatButtonClick'#8'ShowHint'#9#14'ParentShowHint'#8#0#0#12
-  +#3'Tag'#2#1#4'Left'#2#20#6'Height'#2#23#3'Top'#2#0#5'Width'#2#20#21'Constrai'
+  +'TSpeedButton'#10'SaveButton'#19'AnchorSideLeft.Side'#7#9'asrBottom'#4'Left'
-  +'nts.MaxHeight'#2#23#20'Constraints.MaxWidth'#2#20#5'Color'#7#9'clBtnFace'#9
+  +#2#0#6'Height'#2#29#3'Top'#2'a'#5'Width'#2'?'#5'Align'#7#8'alBottom'#7'Capti'
-  +'NumGlyphs'#2#0#7'OnClick'#7#17'FormatButtonClick'#0#0#12'TSpeedButton'#21'U'
+  +'on'#6#4'Save'#5'Color'#7#9'clBtnFace'#9'NumGlyphs'#2#0#7'OnClick'#7#15'Save'
-  +'nderlineFormatButton'#3'Tag'#2#2#4'Left'#2'('#6'Height'#2#23#3'Top'#2#0#5'W'
+  ,'ButtonClick'#0#0#0#11'TOpenDialog'#10'OpenDialog'#5'Title'#6#17'Open exampl'
-  +'idth'#2#20#21'Constraints.MaxHeight'#2#23#20'Constraints.MaxWidth'#2#20#5'C'
+  +'e file'#6'Filter'#6#28'pascal file|*.pas; *.pp; *.p'#11'FilterIndex'#2#0#4
-  +'olor'#7#9'clBtnFace'#9'NumGlyphs'#2#0#7'OnClick'#7#17'FormatButtonClick'#0#0
+  +'left'#3#240#0#3'top'#2#16#0#0#0
-  +#12'TSpeedButton'#18'InsertVarTagButton'#3'Tag'#2#5#4'Left'#2#0#6'Height'#2
-  +#23#3'Top'#2#23#5'Width'#2#20#21'Constraints.MaxHeight'#2#23#20'Constraints.'
-  +'MaxWidth'#2#20#5'Color'#7#9'clBtnFace'#9'NumGlyphs'#2#0#7'OnClick'#7#17'For'
-  +'matButtonClick'#0#0#12'TSpeedButton'#26'InsertParagraphSpeedButton'#3'Tag'#2
-  +#6#4'Left'#2#20#6'Height'#2#23#3'Top'#2#23#5'Width'#2#20#21'Constraints.MaxH'
-  +'eight'#2#23#20'Constraints.MaxWidth'#2#20#7'Caption'#6#1'P'#5'Color'#7#9'cl'
-  +'BtnFace'#9'NumGlyphs'#2#0#7'OnClick'#7#17'FormatButtonClick'#0#0#12'TSpeedB'
-  +'utton'#21'InsertLinkSpeedButton'#4'Left'#2'('#6'Height'#2#23#3'Top'#2#23#5
-  +'Width'#2#20#21'Constraints.MaxHeight'#2#23#20'Constraints.MaxWidth'#2#20#7
-  +'Caption'#6#2'Li'#5'Color'#7#9'clBtnFace'#7'Enabled'#8#9'NumGlyphs'#2#0#7'On'
-  +'Click'#7#26'InsertLinkSpeedButtonClick'#8'ShowHint'#9#14'ParentShowHint'#8#0
-  +#0#12'TSpeedButton'#19'InsertCodeTagButton'#3'Tag'#2#3#4'Left'#2#0#6'Height'
-  +#2#23#3'Top'#2'.'#5'Width'#2#20#21'Constraints.MaxHeight'#2#23#20'Constraint'
-  +'s.MaxWidth'#2#20#5'Color'#7#9'clBtnFace'#9'NumGlyphs'#2#0#7'OnClick'#7#17'F'
-  +'ormatButtonClick'#8'ShowHint'#9#14'ParentShowHint'#8#0#0#12'TSpeedButton'#18
-  +'InsertRemarkButton'#3'Tag'#2#4#4'Left'#2#20#6'Height'#2#23#3'Top'#2'.'#5'Wi'
-  +'dth'#2#20#21'Constraints.MaxHeight'#2#23#20'Constraints.MaxWidth'#2#20#5'Co'
-  +'lor'#7#9'clBtnFace'#9'NumGlyphs'#2#0#7'OnClick'#7#17'FormatButtonClick'#8'S'
-  +'howHint'#9#14'ParentShowHint'#8#0#0#12'TSpeedButton'#27'InsertPrintShortSpe'
-  +'edButton'#3'Tag'#2#7#4'Left'#2'('#6'Height'#2#23#3'Top'#2'.'#5'Width'#2#20
-  +#21'Constraints.MaxHeight'#2#23#20'Constraints.MaxWidth'#2#20#7'Caption'#6#2
-  +'PS'#5'Color'#7#9'clBtnFace'#9'NumGlyphs'#2#0#7'OnClick'#7#17'FormatButtonCl'
-  +'ick'#8'ShowHint'#9#14'ParentShowHint'#8#0#0#12'TSpeedButton'#10'SaveButton'
-  +#19'AnchorSideLeft.Side'#7#9'asrBottom'#4'Left'#2#0#6'Height'#2#29#3'Top'#2
-  +'a'#5'Width'#2'<'#5'Align'#7#8'alBottom'#7'Caption'#6#4'Save'#5'Color'#7#9'c'
-  +'lBtnFace'#9'NumGlyphs'#2#0#7'OnClick'#7#15'SaveButtonClick'#0#0#0#11'TOpenD'
-  +'ialog'#10'OpenDialog'#5'Title'#6#17'Open example file'#6'Filter'#6#28'pasca'
-  +'l file|*.pas; *.pp; *.p'#11'FilterIndex'#2#0#4'left'#3#240#0#3'top'#2#16#0#0
-  +#0
 ]);

ide/fpdoceditwindow.pas

@@ -94,6 +94,7 @@ type
     ShortLabel: TLabel;
     ShortTabSheet: TTabSheet;
     InsertPrintShortSpeedButton: TSpeedButton;
+    InsertURLTagSpeedButton: TSpeedButton;
     UnderlineFormatButton: TSpeedButton;
     procedure AddLinkToInheritedButtonClick(Sender: TObject);
     procedure ApplicationIdle(Sender: TObject; var Done: Boolean);
@@ -220,6 +221,7 @@ begin
   InsertParagraphSpeedButton.Hint := lisCodeHelpInsertParagraphFormattingTag;
   InsertLinkSpeedButton.Hint := lisCodeHelpInsertALink;
   InsertPrintShortSpeedButton.Hint:=lisInsertPrintshortTag2;
+  InsertURLTagSpeedButton.Hint:=lisInsertUrlTag;
 
   ShortLabel.Caption:=lisShort;
   LinkLabel.Caption:=lisLink;
@@ -256,6 +258,7 @@ begin
   InsertVarTagButton.LoadGlyphFromLazarusResource('insertvartag');
   InsertCodeTagButton.LoadGlyphFromLazarusResource('insertcodetag');
   InsertRemarkButton.LoadGlyphFromLazarusResource('insertremark');
+  InsertURLTagSpeedButton.LoadGlyphFromLazarusResource('formatunderline');
   SaveButton.LoadGlyphFromLazarusResource('laz_save');
 end;
 
@@ -324,6 +327,9 @@ begin
     7:
       if (fChain<>nil) and (fChain.Count>0) then
         InsertTag('<printshort id="'+fChain[0].ElementName+'"/>','');
+    //url tag
+    8:
+      InsertTag('<url href="">', '</url>');
   end;
 end;
 

ide/lazarusidestrconsts.pas

@@ -4275,6 +4275,7 @@ resourcestring
   lisEveryNThLineNumber = 'Every n-th line number:';
   lisLink = 'Link:';
   lisShort = 'Short:';
+  lisInsertUrlTag = 'Insert url tag';
   lisInsertPrintshortTag2 = 'Insert printshort tag';
   lisDeleteOldFile2 = 'Delete old file?';
   lisTheUnitSearchPathOfContainsTheSourceDirectoryOfPac = 'The unit search '