diff --git a/docs/xml/lcl/forms.xml b/docs/xml/lcl/forms.xml
index bcb4d72cd4..a89f16b702 100644
--- a/docs/xml/lcl/forms.xml
+++ b/docs/xml/lcl/forms.xml
@@ -9247,15 +9247,33 @@ ShowModal creates its own event loop calling ProcessMessages.
       <!-- variable Visibility: default -->
       <element name="RequireDerivedFormResource">
         <short>When True every form must have a resource (e.g. a .res file). An exception is raised if the resource is missing when creating a form.</short>
-        <descr>The form resource is the lfm file compiled into the executable of your application. For this flag it does not matter if it was compiled via an lrs file or via fpcres. The resource is automatically loaded by TForm and therfore any descendant when it is created via Create(Owner). If the resource is missing there is something wrong with either a resource or the unit which contains the faulty form. If the flag is false you will see a blank form and probably search a long time what is wrong. If you set this flag to true you get an exception. 
-
-For creating forms without resources you have 3 options:
-<ul><li>Create a TForm class (not a descendant)</li><li>Construct your form using the CreateNew() constructor.</li><li>It is also possible to disable the exception by setting the global variable RequireDerivedFormResource to False. </li>
+        <descr>
+          <p>The form resource is the lfm file compiled into the executable of
+          your application. For this flag it does not matter if it was compiled
+          via an lrs file or via fpcres. The resource is automatically loaded by
+          TForm and therfore any descendant when it is created via Create(Owner).
+          If the resource is missing there is something wrong with either a
+          resource or the unit which contains the faulty form.
+          If the flag is false you will see a blank form and probably search
+          a long time what is wrong. If you set this flag to true you get an exception.
+          </p>
+          <p>
+          For creating forms without resources you have 3 options:
+          </p>
+          <ul>
+            <li>Create a TForm class (not a descendant)</li>
+            <li>Construct your form using the CreateNew() constructor.</li>
+            <li>It is also possible to disable the exception by setting the global
+               variable RequireDerivedFormResource to False. </li>
           </ul>
-History:
-
-Before 0.9.31 there was no exception. Therefore some resourceless forms might use the standard constructor Create(Owner) and will now get exceptions. This change is Delphi compatible and compatible with TFrame and TDataModule components.
-</descr>
+          <p>
+          History:
+          Before 0.9.31 there was no exception. Therefore some resourceless forms
+          might use the standard constructor Create(Owner) and will now get
+          exceptions. This change is Delphi compatible and compatible with
+          TFrame and TDataModule components.
+          </p>
+        </descr>
         <seealso>
         </seealso>
       <notes><note>?</note>
diff --git a/docs/xml/lcl/graphics.xml b/docs/xml/lcl/graphics.xml
index 9ff05ac90b..e3ba4ef328 100644
--- a/docs/xml/lcl/graphics.xml
+++ b/docs/xml/lcl/graphics.xml
@@ -6056,52 +6056,34 @@ Calling the <var>MoveTo</var>
       <element name="TCanvas.TextOut.Y">
         <short/>
       </element>
-      <!-- argument Visibility: default -->
-      <element name="TCanvas.TextOut.Text">
-        <short/>
-      </element>
-      <!-- procedure Visibility: public -->
-      <element name="TCanvas.TextRect">
-        <short>
-          <var>TextRect</var> - writes the specified text string in the rectangle at specified position, with optionally specified style</short>
-        <descr/>
-        <errors/>
-        <seealso/>
-      </element>
-      <!-- argument Visibility: default -->
-      <element name="TCanvas.TextRect.ARect">
-        <short/>
-      </element>
-      <!-- argument Visibility: default -->
-      <element name="TCanvas.TextRect.X">
-        <short/>
-      </element>
-      <!-- argument Visibility: default -->
-      <element name="TCanvas.TextRect.Y">
-        <short/>
-      </element>
-      <!-- argument Visibility: default -->
-      <element name="TCanvas.TextRect.Text">
-        <short/>
-      </element>
       <!-- procedure Visibility: public -->
       <element name="TCanvas.TextRect">
         <short>Writes <var>Text</var> string within a specified rectangle, according to predefined <var>Style</var>
         </short>
         <descr>
-&#x9;  Writes <var>Text</var> string within a specified rectangle, according to predefined <var>Style</var><br/>
-          The boundaries of the rectangle are specified in <var>ARect</var><br/><var>X, Y</var> define the starting point for writing the <var>Text</var> within the rectangle.<br/>
-&#x9;  <var>TextStyle</var> determines whether the text is justified, centered, word-wrapped, clipped at the rectangle boundaries, etc. If the <var>Style</var> argument is omitted, defaults are assumed.<br/>
-&#x9;  <br/>
-&#x9;  <b>Note:</b>
+        <p>
+          Writes <var>Text</var> string within a specified rectangle, according
+          to predefined <var>Style</var>
+        </p>
+        <p>The boundaries of the rectangle are specified in <var>ARect</var>
+        </p>
+        <p><var>X, Y</var> define the starting point for writing the
+          <var>Text</var> within the rectangle.
+        </p>
+        <p>
+          <var>TextStyle</var> determines whether the text is justified,
+          centered, word-wrapped, clipped at the rectangle boundaries, etc.
+          If the <var>Style</var> argument is omitted, defaults are assumed.
+        </p>
+        <p>
+          <b>Note:</b>
           The exact text position depends on the specified rectangle, the <var>TextStyle</var> of the canvas, and the <var>X, Y</var> coordinates:
+        </p>
           <ul>
-            <li><var>TextStyle.Alignment = taLeftJustify</var>: Text begins at <var>X</var>
-            </li>
+            <li><var>TextStyle.Alignment = taLeftJustify</var>: Text begins at <var>X</var></li>
             <li><var>TextStyle.Alignment = taCenter</var>: Text center is in the center of the rectangle (horizontally)</li>
             <li><var>TextStyle.Alignment = taRightJustify</var>: Text ends at right edge of the rectangle</li>
-            <li><var>TextStyle.Layout = tlTop</var>: Top of the text is at <var>Y</var>
-            </li>
+            <li><var>TextStyle.Layout = tlTop</var>: Top of the text is at <var>Y</var></li>
             <li><var>TextStyle.Layout = tlCenter</var>: Text center is in the center of the rectangle (vertically)</li>
             <li><var>TextStyle.Layout = tlBottom</var>: Text sits above the the bottom edge of the rectangle</li>
           </ul>