Hi,
This patch removes all duplicates from the controls.xml file (bug #1962)
Apply this patch from the root Lazarus directory.
Regards,
- Graeme -
--
There's no place like 127.0.0.1
Index: docs/xml/lcl/controls.xml
===================================================================
--- docs/xml/lcl/controls.xml (revision 9763)
+++ docs/xml/lcl/controls.xml (working copy)
@@ -195,15 +195,6 @@
<descr/>
<seealso/>
</element>
- <!-- object Visibility: default -->
- <element name="TWinControl"/>
- <!-- object Visibility: default -->
- <element name="TControl">
- <short/>
- <descr/>
- <errors/>
- <seealso/>
- </element>
<!-- "class of" type Visibility: default -->
<element name="TWinControlClass">
<short/>
@@ -1156,13 +1147,6 @@
<element name="TMouseWheelUpDownEvent.Handled">
<short/>
</element>
- <!-- object Visibility: default -->
- <element name="TDragObject">
- <short/>
- <descr/>
- <errors/>
- <seealso/>
- </element>
<!-- enumeration type Visibility: default -->
<element name="TDragState">
<short/>
@@ -9838,9 +9822,8 @@
<!-- property Visibility: public -->
<element name="TWinControl.TabStop">
<short>Determines if the user can tab to a control.</short>
- <descr>Use the TabStop to allow or disallow access to the control using the Tab key.
-
-If the TabStop is True, the control is in the tab order. If TabStop is False, the control is not in the tab order and the user can't press the Tab key to move to the control.</descr>
+ <descr/>
+ <seealso/>
</element>
<!-- property Visibility: public -->
<element name="TWinControl.OnDockDrop">
@@ -10750,13 +10733,6 @@
<short/>
</element>
<!-- object Visibility: default -->
- <element name="TDockTree">
- <short/>
- <descr/>
- <errors/>
- <seealso/>
- </element>
- <!-- object Visibility: default -->
<element name="TDockZone">
<short/>
<descr/>
@@ -11896,25 +11872,6 @@
<short/>
</element>
<!-- procedure Visibility: default -->
- <element name="AdjustBorderSpace">
- <short/>
- <descr/>
- <errors/>
- <seealso/>
- </element>
- <!-- argument Visibility: default -->
- <element name="AdjustBorderSpace.RemainingClientRect">
- <short/>
- </element>
- <!-- argument Visibility: default -->
- <element name="AdjustBorderSpace.CurBorderSpace">
- <short/>
- </element>
- <!-- argument Visibility: default -->
- <element name="AdjustBorderSpace.Space">
- <short/>
- </element>
- <!-- procedure Visibility: default -->
<element name="Register">
<short/>
<descr/>
