paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-11-23 13:59:24 +01:00
Code Issues Packages Projects Releases Wiki Activity

LCL: docs Parent

Browse Source 
git-svn-id: trunk@35010 -
This commit is contained in:
mattias 2012-01-29 09:41:52 +00:00
parent 275923bb94
commit 1f2c9a687e
1 changed files with 185 additions and 179 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

286
docs/xml/lcl/controls.xml
View File

@ -161,6 +161,7 @@
<element name="TWinControlClass"> <element name="TWinControlClass">
<short> <short>
<var>TWinControlClass</var> - class of <var>TWinControlClass</var> - class of
<var>TWinControl</var> <var>TWinControl</var>
</short> </short>
<descr/> <descr/>
@ -170,6 +171,7 @@
<element name="TControlClass"> <element name="TControlClass">
<short> <short>
<var>TControlClass</var> - class of <var>TControlClass</var> - class of
<var>TControl</var> <var>TControl</var>
</short> </short>
<descr/> <descr/>
@ -236,7 +238,7 @@
<element link="TLMMouse" name="TCMDesignHitTest"/> <element link="TLMMouse" name="TCMDesignHitTest"/>
<!-- record type Visibility: default --> <!-- record type Visibility: default -->
<element name="TCMControlChange"> <element name="TCMControlChange">
<short></short> <short/>
<descr/> <descr/>
<seealso/> <seealso/>
</element> </element>
@ -262,7 +264,7 @@
</element> </element>
<!-- record type Visibility: default --> <!-- record type Visibility: default -->
<element name="TCMControlListChange"> <element name="TCMControlListChange">
<short></short> <short/>
<descr/> <descr/>
<seealso/> <seealso/>
</element> </element>
@ -286,23 +288,23 @@
</element> </element>
<!-- alias type Visibility: default --> <!-- alias type Visibility: default -->
<element link="TLMKey" name="TCMDialogChar"> <element link="TLMKey" name="TCMDialogChar">
<short></short> <short/>
</element> </element>
<!-- alias type Visibility: default --> <!-- alias type Visibility: default -->
<element link="TLMKey" name="TCMDialogKey"> <element link="TLMKey" name="TCMDialogKey">
<short></short> <short/>
</element> </element>
<!-- alias type Visibility: default --> <!-- alias type Visibility: default -->
<element link="TLMEnter" name="TCMEnter"> <element link="TLMEnter" name="TCMEnter">
<short></short> <short/>
</element> </element>
<!-- alias type Visibility: default --> <!-- alias type Visibility: default -->
<element link="TLMExit" name="TCMExit"> <element link="TLMExit" name="TCMExit">
<short></short> <short/>
</element> </element>
<!-- record type Visibility: default --> <!-- record type Visibility: default -->
<element name="TCMCancelMode"> <element name="TCMCancelMode">
<short></short> <short/>
</element> </element>
<element name="TCMCancelMode.Msg"> <element name="TCMCancelMode.Msg">
<short/> <short/>
@ -318,7 +320,7 @@
</element> </element>
<!-- record type Visibility: default --> <!-- record type Visibility: default -->
<element name="TCMChildKey"> <element name="TCMChildKey">
<short></short> <short/>
<descr/> <descr/>
<seealso/> <seealso/>
</element> </element>
@ -381,7 +383,7 @@
</element> </element>
<element name="TAlign.alCustom"> <element name="TAlign.alCustom">
<short>Control has special alignment.</short> <short>Control has special alignment.</short>
<descr></descr> <descr/>
</element> </element>
<!-- set type Visibility: default --> <!-- set type Visibility: default -->
<element link="TAlign" name="TAlignSet"> <element link="TAlign" name="TAlignSet">
@ -409,37 +411,37 @@
<element link="TAnchorKind" name="TAnchors"/> <element link="TAnchorKind" name="TAnchors"/>
<!-- constant Visibility: default --> <!-- constant Visibility: default -->
<element name="AnchorAlign"> <element name="AnchorAlign">
<short></short> <short/>
<descr/> <descr/>
<seealso/> <seealso/>
</element> </element>
<!-- constant Visibility: default --> <!-- constant Visibility: default -->
<element link="TAnchorKind" name="MainAlignAnchor"> <element link="TAnchorKind" name="MainAlignAnchor">
<short></short> <short/>
<descr/> <descr/>
<seealso/> <seealso/>
</element> </element>
<!-- constant Visibility: default --> <!-- constant Visibility: default -->
<element link="TAnchorKind" name="OppositeAnchor"> <element link="TAnchorKind" name="OppositeAnchor">
<short></short> <short/>
<descr/> <descr/>
<seealso/> <seealso/>
</element> </element>
<!-- constant Visibility: default --> <!-- constant Visibility: default -->
<element link="TAnchorKind" name="ClockwiseAnchor"> <element link="TAnchorKind" name="ClockwiseAnchor">
<short></short> <short/>
<descr/> <descr/>
<seealso/> <seealso/>
</element> </element>
<!-- constant Visibility: default --> <!-- constant Visibility: default -->
<element name="DefaultSideForAnchorKind"> <element name="DefaultSideForAnchorKind">
<short></short> <short/>
<descr/> <descr/>
<seealso/> <seealso/>
</element> </element>
<!-- constant Visibility: default --> <!-- constant Visibility: default -->
<element name="AnchorReferenceSide"> <element name="AnchorReferenceSide">
<short></short> <short/>
<descr/> <descr/>
<seealso/> <seealso/>
</element> </element>
@ -553,13 +555,13 @@
<!-- range type Visibility: default --> <!-- range type Visibility: default -->
<element link="TFormBorderStyle" name="TBorderStyle"> <element link="TFormBorderStyle" name="TBorderStyle">
<short>Possible types of borders (with or without border).</short> <short>Possible types of borders (with or without border).</short>
<seealso></seealso> <seealso/>
</element> </element>
<!-- alias type Visibility: default --> <!-- alias type Visibility: default -->
<element link="TFormBorderStyle" name="TControlBorderStyle"> <element link="TFormBorderStyle" name="TControlBorderStyle">
<short>Possible types of control borders (with or without border).</short> <short>Possible types of control borders (with or without border).</short>
<descr>A subset of TFormBorderStyle, listing only the styles available to a control that is not a form.</descr> <descr>A subset of TFormBorderStyle, listing only the styles available to a control that is not a form.</descr>
<seealso></seealso> <seealso/>
</element> </element>
<!-- enumeration type Visibility: default --> <!-- enumeration type Visibility: default -->
<element name="TControlRoleForForm"> <element name="TControlRoleForForm">
@ -761,23 +763,23 @@ More cursors
<short>Can have child controls in the designer.</short> <short>Can have child controls in the designer.</short>
</element> </element>
<element name="TControlStyleType.csCaptureMouse"> <element name="TControlStyleType.csCaptureMouse">
<short></short> <short/>
</element> </element>
<element name="TControlStyleType.csDesignInteractive"> <element name="TControlStyleType.csDesignInteractive">
<short>wants mouse events in design mode</short> <short>wants mouse events in design mode</short>
</element> </element>
<element name="TControlStyleType.csClickEvents"> <element name="TControlStyleType.csClickEvents">
<short></short> <short/>
</element> </element>
<element name="TControlStyleType.csFramed"> <element name="TControlStyleType.csFramed">
<short></short> <short/>
</element> </element>
<element name="TControlStyleType.csSetCaption"> <element name="TControlStyleType.csSetCaption">
<short>As long as Name=Text, changing the Name will set the Caption.</short> <short>As long as Name=Text, changing the Name will set the Caption.</short>
<descr>When for example a button's Name and Caption have the value 'Button1' and the Name is changed to 'Button2' then the Caption is changed as well. When Name and Caption differs this flag has no effect. This flag has no effect during loading.</descr> <descr>When for example a button's Name and Caption have the value 'Button1' and the Name is changed to 'Button2' then the Caption is changed as well. When Name and Caption differs this flag has no effect. This flag has no effect during loading.</descr>
</element> </element>
<element name="TControlStyleType.csOpaque"> <element name="TControlStyleType.csOpaque">
<short></short> <short/>
</element> </element>
<element name="TControlStyleType.csDoubleClicks"> <element name="TControlStyleType.csDoubleClicks">
<short>control understands mouse double clicks</short> <short>control understands mouse double clicks</short>
@ -798,25 +800,25 @@ More cursors
<short>control is invisible in the designer</short> <short>control is invisible in the designer</short>
</element> </element>
<element name="TControlStyleType.csReplicatable"> <element name="TControlStyleType.csReplicatable">
<short></short> <short/>
</element> </element>
<element name="TControlStyleType.csNoStdEvents"> <element name="TControlStyleType.csNoStdEvents">
<short></short> <short/>
</element> </element>
<element name="TControlStyleType.csDisplayDragImage"> <element name="TControlStyleType.csDisplayDragImage">
<short>display images from dragimagelist during drag operation over control</short> <short>display images from dragimagelist during drag operation over control</short>
</element> </element>
<element name="TControlStyleType.csReflector"> <element name="TControlStyleType.csReflector">
<short></short> <short/>
</element> </element>
<element name="TControlStyleType.csActionClient"> <element name="TControlStyleType.csActionClient">
<short></short> <short/>
</element> </element>
<element name="TControlStyleType.csMenuEvents"> <element name="TControlStyleType.csMenuEvents">
<short></short> <short/>
</element> </element>
<element name="TControlStyleType.csNoFocus"> <element name="TControlStyleType.csNoFocus">
<short></short> <short/>
</element> </element>
<element name="TControlStyleType.csNeedsBorderPaint"> <element name="TControlStyleType.csNeedsBorderPaint">
<short>[not implemented]</short> <short>[not implemented]</short>
@ -957,7 +959,7 @@ More cursors
<element link="#LCL.Graphics.TCanvas.FreeHandle" name="TControlCanvas.FreeHandle"/> <element link="#LCL.Graphics.TCanvas.FreeHandle" name="TControlCanvas.FreeHandle"/>
<!-- function Visibility: public --> <!-- function Visibility: public -->
<element name="TControlCanvas.ControlIsPainting"> <element name="TControlCanvas.ControlIsPainting">
<short></short> <short/>
<descr/> <descr/>
<errors/> <errors/>
<seealso/> <seealso/>
@ -1141,7 +1143,7 @@ EndDrag stops dragging, the image is removed from the screen.
</element> </element>
<!-- procedure type Visibility: default --> <!-- procedure type Visibility: default -->
<element name="TKeyEvent"> <element name="TKeyEvent">
<short></short> <short/>
<descr/> <descr/>
<seealso/> <seealso/>
</element> </element>
@ -1156,7 +1158,7 @@ EndDrag stops dragging, the image is removed from the screen.
</element> </element>
<!-- procedure type Visibility: default --> <!-- procedure type Visibility: default -->
<element name="TKeyPressEvent"> <element name="TKeyPressEvent">
<short></short> <short/>
<descr/> <descr/>
<seealso/> <seealso/>
</element> </element>
@ -1176,7 +1178,7 @@ EndDrag stops dragging, the image is removed from the screen.
</element> </element>
<!-- procedure type Visibility: default --> <!-- procedure type Visibility: default -->
<element name="TMouseEvent"> <element name="TMouseEvent">
<short></short> <short/>
<descr/> <descr/>
<seealso/> <seealso/>
</element> </element>
@ -1197,7 +1199,7 @@ EndDrag stops dragging, the image is removed from the screen.
</element> </element>
<!-- procedure type Visibility: default --> <!-- procedure type Visibility: default -->
<element name="TMouseMoveEvent"> <element name="TMouseMoveEvent">
<short></short> <short/>
<descr/> <descr/>
<seealso/> <seealso/>
</element> </element>
@ -1514,10 +1516,10 @@ dmFindTarget: find child control under the mouse
<short>Which cursor to return (rejected:crNoDrop or accepted:crDrag).</short> <short>Which cursor to return (rejected:crNoDrop or accepted:crDrag).</short>
</element> </element>
<element name="TDragObject.GetDragCursor.X"> <element name="TDragObject.GetDragCursor.X">
<short></short> <short/>
</element> </element>
<element name="TDragObject.GetDragCursor.Y"> <element name="TDragObject.GetDragCursor.Y">
<short></short> <short/>
</element> </element>
<!-- function Visibility: protected --> <!-- function Visibility: protected -->
<element name="TDragObject.GetDragImages"> <element name="TDragObject.GetDragImages">
@ -2406,21 +2408,21 @@ dmFindTarget: find child control under the mouse
</element> </element>
<!-- enumeration type Visibility: default --> <!-- enumeration type Visibility: default -->
<element name="TSizeConstraintsOption"> <element name="TSizeConstraintsOption">
<short></short> <short/>
<descr/> <descr/>
<seealso/> <seealso/>
</element> </element>
<element name="TSizeConstraintsOption.scoAdviceWidthAsMin"> <element name="TSizeConstraintsOption.scoAdviceWidthAsMin">
<short></short> <short/>
</element> </element>
<element name="TSizeConstraintsOption.scoAdviceWidthAsMax"> <element name="TSizeConstraintsOption.scoAdviceWidthAsMax">
<short></short> <short/>
</element> </element>
<element name="TSizeConstraintsOption.scoAdviceHeightAsMin"> <element name="TSizeConstraintsOption.scoAdviceHeightAsMin">
<short></short> <short/>
</element> </element>
<element name="TSizeConstraintsOption.scoAdviceHeightAsMax"> <element name="TSizeConstraintsOption.scoAdviceHeightAsMax">
<short></short> <short/>
</element> </element>
<!-- set type Visibility: default --> <!-- set type Visibility: default -->
<element link="TSizeConstraintsOption" name="TSizeConstraintsOptions"/> <element link="TSizeConstraintsOption" name="TSizeConstraintsOptions"/>
@ -2645,7 +2647,7 @@ dmFindTarget: find child control under the mouse
</element> </element>
<!-- procedure type Visibility: default --> <!-- procedure type Visibility: default -->
<element name="TConstrainedResizeEvent"> <element name="TConstrainedResizeEvent">
<short></short> <short/>
<descr/> <descr/>
<seealso/> <seealso/>
</element> </element>
@ -2666,7 +2668,7 @@ dmFindTarget: find child control under the mouse
</element> </element>
<!-- range type Visibility: default --> <!-- range type Visibility: default -->
<element name="TSpacingSize"> <element name="TSpacingSize">
<short></short> <short/>
<descr/> <descr/>
<seealso/> <seealso/>
</element> </element>
@ -3080,16 +3082,17 @@ dmFindTarget: find child control under the mouse
<errors/> <errors/>
Can raise an exception 'TAnchorSide.CheckSidePosition invalid Side'. Can raise an exception 'TAnchorSide.CheckSidePosition invalid Side'.
<seealso/> <seealso/>
</element> </element>
<element name="TAnchorSide.CheckSidePosition.Result"> <element name="TAnchorSide.CheckSidePosition.Result">
<short>False when errors have been found.</short> <short>False when errors have been found.</short>
</element> </element>
<element name="TAnchorSide.CheckSidePosition.NewControl"> <element name="TAnchorSide.CheckSidePosition.NewControl">
<short></short> <short/>
</element> </element>
<element name="TAnchorSide.CheckSidePosition.NewSide"> <element name="TAnchorSide.CheckSidePosition.NewSide">
<short></short> <short/>
</element> </element>
<element name="TAnchorSide.CheckSidePosition.ReferenceControl"> <element name="TAnchorSide.CheckSidePosition.ReferenceControl">
<short>The control we are anchored to.</short> <short>The control we are anchored to.</short>
@ -3113,10 +3116,10 @@ dmFindTarget: find child control under the mouse
<seealso/> <seealso/>
</element> </element>
<element name="TAnchorSide.IsAnchoredToParent.Result"> <element name="TAnchorSide.IsAnchoredToParent.Result">
<short></short> <short/>
</element> </element>
<element name="TAnchorSide.IsAnchoredToParent.ParentSide"> <element name="TAnchorSide.IsAnchoredToParent.ParentSide">
<short></short> <short/>
</element> </element>
<!-- procedure Visibility: public --> <!-- procedure Visibility: public -->
<element name="TAnchorSide.FixCenterAnchoring"> <element name="TAnchorSide.FixCenterAnchoring">
@ -3345,17 +3348,17 @@ dmFindTarget: find child control under the mouse
</element> </element>
<!-- enumeration type Visibility: default --> <!-- enumeration type Visibility: default -->
<element name="TControlAutoSizePhase"> <element name="TControlAutoSizePhase">
<short></short> <short/>
<descr/> <descr/>
<seealso/> <seealso/>
</element> </element>
<!-- enumeration value Visibility: default --> <!-- enumeration value Visibility: default -->
<element name="TControlAutoSizePhase.caspNone"> <element name="TControlAutoSizePhase.caspNone">
<short></short> <short/>
</element> </element>
<!-- enumeration value Visibility: default --> <!-- enumeration value Visibility: default -->
<element name="TControlAutoSizePhase.caspChangingProperties"> <element name="TControlAutoSizePhase.caspChangingProperties">
<short></short> <short/>
</element> </element>
<!-- enumeration value Visibility: default --> <!-- enumeration value Visibility: default -->
<element name="TControlAutoSizePhase.caspCreatingHandles"> <element name="TControlAutoSizePhase.caspCreatingHandles">
@ -3363,11 +3366,11 @@ dmFindTarget: find child control under the mouse
</element> </element>
<!-- enumeration value Visibility: default --> <!-- enumeration value Visibility: default -->
<element name="TControlAutoSizePhase.caspComputingBounds"> <element name="TControlAutoSizePhase.caspComputingBounds">
<short></short> <short/>
</element> </element>
<!-- enumeration value Visibility: default --> <!-- enumeration value Visibility: default -->
<element name="TControlAutoSizePhase.caspRealizingBounds"> <element name="TControlAutoSizePhase.caspRealizingBounds">
<short></short> <short/>
</element> </element>
<!-- enumeration value Visibility: default --> <!-- enumeration value Visibility: default -->
<element name="TControlAutoSizePhase.caspShowing"> <element name="TControlAutoSizePhase.caspShowing">
@ -3392,10 +3395,10 @@ dmFindTarget: find child control under the mouse
<seealso/> <seealso/>
</element> </element>
<element name="TControlShowHintEvent.Sender"> <element name="TControlShowHintEvent.Sender">
<short></short> <short/>
</element> </element>
<element name="TControlShowHintEvent.HintInfo"> <element name="TControlShowHintEvent.HintInfo">
<short></short> <short/>
</element> </element>
<!-- procedure type Visibility: default --> <!-- procedure type Visibility: default -->
<element name="TContextPopupEvent"> <element name="TContextPopupEvent">
@ -3446,28 +3449,28 @@ dmFindTarget: find child control under the mouse
<short>Set when BoundsRectForNewParent has been initialized.</short> <short>Set when BoundsRectForNewParent has been initialized.</short>
</element> </element>
<element name="TControlFlag.cfBaseBoundsValid"> <element name="TControlFlag.cfBaseBoundsValid">
<short></short> <short/>
</element> </element>
<element name="TControlFlag.cfPreferredSizeValid"> <element name="TControlFlag.cfPreferredSizeValid">
<short>Set when PreferredSize has been calculated (CalculatePreferredSize).</short> <short>Set when PreferredSize has been calculated (CalculatePreferredSize).</short>
</element> </element>
<element name="TControlFlag.cfPreferredMinSizeValid"> <element name="TControlFlag.cfPreferredMinSizeValid">
<short></short> <short/>
</element> </element>
<element name="TControlFlag.cfOnChangeBoundsNeeded"> <element name="TControlFlag.cfOnChangeBoundsNeeded">
<short></short> <short/>
</element> </element>
<element name="TControlFlag.cfProcessingWMPaint"> <element name="TControlFlag.cfProcessingWMPaint">
<short>Set (in WndProc) while processing an LM_PAINT message.</short> <short>Set (in WndProc) while processing an LM_PAINT message.</short>
</element> </element>
<element name="TControlFlag.cfKillChangeBounds"> <element name="TControlFlag.cfKillChangeBounds">
<short></short> <short/>
</element> </element>
<element name="TControlFlag.cfKillInvalidatePreferredSize"> <element name="TControlFlag.cfKillInvalidatePreferredSize">
<short></short> <short/>
</element> </element>
<element name="TControlFlag.cfKillAdjustSize"> <element name="TControlFlag.cfKillAdjustSize">
<short></short> <short/>
</element> </element>
<!-- set type Visibility: default --> <!-- set type Visibility: default -->
<element link="TControlFlag" name="TControlFlags"/> <element link="TControlFlag" name="TControlFlags"/>
@ -3501,10 +3504,8 @@ dmFindTarget: find child control under the mouse
<!-- enumeration type Visibility: default --> <!-- enumeration type Visibility: default -->
<element name="TLayoutAdjustmentPolicy"> <element name="TLayoutAdjustmentPolicy">
<short>Indicates the policy for the LCL to execute automatic adjustments in the form layout</short> <short>Indicates the policy for the LCL to execute automatic adjustments in the form layout</short>
<descr> <descr/>
</descr> <seealso/>
<seealso>
</seealso>
</element> </element>
<!-- enumeration value Visibility: default --> <!-- enumeration value Visibility: default -->
<element name="TLazAccessibilityRole.lapDefault"> <element name="TLazAccessibilityRole.lapDefault">
@ -3525,8 +3526,7 @@ dmFindTarget: find child control under the mouse
<!-- enumeration type Visibility: default --> <!-- enumeration type Visibility: default -->
<element name="TLazAccessibilityRole"> <element name="TLazAccessibilityRole">
<short>Indicates the role which a accessible object takes in the user interface</short> <short>Indicates the role which a accessible object takes in the user interface</short>
<descr> <descr/>
</descr>
<seealso> <seealso>
<link id="TLazAccessibleObject"/> <link id="TLazAccessibleObject"/>
</seealso> </seealso>
@ -3654,8 +3654,10 @@ dmFindTarget: find child control under the mouse
<!-- class Visibility: default --> <!-- class Visibility: default -->
<element name="TLazAccessibleObject"> <element name="TLazAccessibleObject">
<short>Represents an accessible object with which the user of a accessibility tool can interact.</short> <short>Represents an accessible object with which the user of a accessibility tool can interact.</short>
<descr><p>Every TControl has a TLazAccessibleObject instace associated with it, which means that every TControl is potentially accessible, but to actually be usable the accessible object needs to have its properties set, the most important of which are the role, description and value. Native windowed classes should already receive accessibility properties from the underlying widgetset utilized, while TCustomControl descendents will have their accessibility taken care by the LCL itself. User applications should add accessibility for their own TCustomControl descendent classes and also possibly customize the descriptions of some elements. It is also possible to make an accessible object invisible for user, which is done by setting its AccessibleRole property to larIgnored.</p> <descr>
<p>Accessibility support in Lazarus is also documented in the wiki in http://wiki.lazarus.freepascal.org/LCL_Accessibility</p></descr> <p>Every TControl has a TLazAccessibleObject instace associated with it, which means that every TControl is potentially accessible, but to actually be usable the accessible object needs to have its properties set, the most important of which are the role, description and value. Native windowed classes should already receive accessibility properties from the underlying widgetset utilized, while TCustomControl descendents will have their accessibility taken care by the LCL itself. User applications should add accessibility for their own TCustomControl descendent classes and also possibly customize the descriptions of some elements. It is also possible to make an accessible object invisible for user, which is done by setting its AccessibleRole property to larIgnored.</p>
<p>Accessibility support in Lazarus is also documented in the wiki in http://wiki.lazarus.freepascal.org/LCL_Accessibility</p>
</descr>
<seealso> <seealso>
<link id="TControl"/> <link id="TControl"/>
<link id="TControl.AccessibleRole"/> <link id="TControl.AccessibleRole"/>
@ -3682,11 +3684,11 @@ dmFindTarget: find child control under the mouse
<element link="TControl.AutoSizingAll" name="TControl.FAutoSizingAll"/> <element link="TControl.AutoSizingAll" name="TControl.FAutoSizingAll"/>
<element link="TControl.AutoSizingLockCount" name="TControl.FAutoSizingLockCount"/> <element link="TControl.AutoSizingLockCount" name="TControl.FAutoSizingLockCount"/>
<element name="TControl.FAutoSizingSelf"> <element name="TControl.FAutoSizingSelf">
<short></short> <short/>
</element> </element>
<element link="TControl.BaseBounds" name="TControl.FBaseBounds"/> <element link="TControl.BaseBounds" name="TControl.FBaseBounds"/>
<element name="TControl.FBaseBoundsLock"> <element name="TControl.FBaseBoundsLock">
<short></short> <short/>
</element> </element>
<element link="TControl.BaseParentClientSize" name="TControl.FBaseParentClientSize"/> <element link="TControl.BaseParentClientSize" name="TControl.FBaseParentClientSize"/>
<element link="TControl.BiDiMode" name="TControl.FBiDiMode"/> <element link="TControl.BiDiMode" name="TControl.FBiDiMode"/>
@ -3779,7 +3781,7 @@ dmFindTarget: find child control under the mouse
<element link="TControl.SessionProperties" name="TControl.FSessionProperties"/> <element link="TControl.SessionProperties" name="TControl.FSessionProperties"/>
<element link="TControl.ShowHint" name="TControl.FShowHint"/> <element link="TControl.ShowHint" name="TControl.FShowHint"/>
<element name="TControl.FSizeLock"> <element name="TControl.FSizeLock">
<short></short> <short/>
</element> </element>
<element link="TControl.TBDockHeight" name="TControl.FTBDockHeight"/> <element link="TControl.TBDockHeight" name="TControl.FTBDockHeight"/>
<element link="TControl.Top" name="TControl.FTop"/> <element link="TControl.Top" name="TControl.FTop"/>
@ -4154,7 +4156,7 @@ dmFindTarget: find child control under the mouse
</element> </element>
<!-- procedure Visibility: protected --> <!-- procedure Visibility: protected -->
<element name="TControl.DoOnParentHandleDestruction"> <element name="TControl.DoOnParentHandleDestruction">
<short></short> <short/>
<descr>implement in descendants [what?] <descr>implement in descendants [what?]
</descr> </descr>
<errors/> <errors/>
@ -4306,6 +4308,7 @@ dmFindTarget: find child control under the mouse
<p> <p>
<var>TWinControl</var> overrides this and asks the interface for theme dependent values. <var>TWinControl</var> overrides this and asks the interface for theme dependent values.
See See
<link id="TWinControl.CalculatePreferredSize"/> for more information. <link id="TWinControl.CalculatePreferredSize"/> for more information.
</p> </p>
<p>WithThemeSpace: If true, adds space for stacking. <p>WithThemeSpace: If true, adds space for stacking.
@ -4463,8 +4466,7 @@ dmFindTarget: find child control under the mouse
<descr>Affects the order in which client controls with the same alignment are positioned <descr>Affects the order in which client controls with the same alignment are positioned
</descr> </descr>
<errors/> <errors/>
<seealso> <seealso/>
</seealso>
</element> </element>
<!-- procedure Visibility: private --> <!-- procedure Visibility: private -->
<element link="TControl.BiDiMode" name="TControl.SetBiDiMode"/> <element link="TControl.BiDiMode" name="TControl.SetBiDiMode"/>
@ -4846,7 +4848,7 @@ dmFindTarget: find child control under the mouse
<short/> <short/>
</element> </element>
<element name="TControl.WMMouseWheel"> <element name="TControl.WMMouseWheel">
<short></short> <short/>
</element> </element>
<element name="TControl.WMMouseWheel.Message"> <element name="TControl.WMMouseWheel.Message">
<short/> <short/>
@ -5453,7 +5455,7 @@ dmFindTarget: find child control under the mouse
<seealso/> <seealso/>
</element> </element>
<element name="TControl.DialogChar.Result"> <element name="TControl.DialogChar.Result">
<short></short> <short/>
</element> </element>
<element name="TControl.DialogChar.Message"> <element name="TControl.DialogChar.Message">
<short/> <short/>
@ -5466,7 +5468,7 @@ dmFindTarget: find child control under the mouse
<seealso/> <seealso/>
</element> </element>
<element name="TControl.UpdateMouseCursor.X"> <element name="TControl.UpdateMouseCursor.X">
<short></short> <short/>
</element> </element>
<element name="TControl.UpdateMouseCursor.Y"> <element name="TControl.UpdateMouseCursor.Y">
<short/> <short/>
@ -5511,7 +5513,7 @@ dmFindTarget: find child control under the mouse
<element link="#rtl.Classes.TComponent.Loaded" name="TControl.Loaded"/> <element link="#rtl.Classes.TComponent.Loaded" name="TControl.Loaded"/>
<!-- procedure Visibility: protected --> <!-- procedure Visibility: protected -->
<element name="TControl.LoadedAll"> <element name="TControl.LoadedAll">
<short></short> <short/>
<descr/> <descr/>
<errors/> <errors/>
<seealso/> <seealso/>
@ -6015,7 +6017,7 @@ dmFindTarget: find child control under the mouse
</short> </short>
</element> </element>
<element name="TControl.ManualDock.KeepDockSiteSize"> <element name="TControl.ManualDock.KeepDockSiteSize">
<short></short> <short/>
</element> </element>
<!-- function Visibility: public --> <!-- function Visibility: public -->
<element name="TControl.ManualFloat"> <element name="TControl.ManualFloat">
@ -6031,7 +6033,7 @@ dmFindTarget: find child control under the mouse
<short>The screen area where the floating control is moved; the client area of a float host site.</short> <short>The screen area where the floating control is moved; the client area of a float host site.</short>
</element> </element>
<element name="TControl.ManualFloat.KeepDockSiteSize"> <element name="TControl.ManualFloat.KeepDockSiteSize">
<short></short> <short/>
</element> </element>
<!-- function Visibility: public --> <!-- function Visibility: public -->
<element name="TControl.ReplaceDockedControl"> <element name="TControl.ReplaceDockedControl">
@ -6088,7 +6090,7 @@ dmFindTarget: find child control under the mouse
</element> </element>
<!-- function Visibility: public --> <!-- function Visibility: public -->
<element name="TControl.AutoSizePhases"> <element name="TControl.AutoSizePhases">
<short></short> <short/>
<descr/> <descr/>
<errors/> <errors/>
<seealso/> <seealso/>
@ -6105,7 +6107,7 @@ dmFindTarget: find child control under the mouse
</element> </element>
<!-- function Visibility: public --> <!-- function Visibility: public -->
<element name="TControl.AutoSizeCheckParent"> <element name="TControl.AutoSizeCheckParent">
<short></short> <short/>
<descr/> <descr/>
<errors/> <errors/>
<seealso/> <seealso/>
@ -6180,7 +6182,7 @@ dmFindTarget: find child control under the mouse
<short>The sibling control to which we should anchor.</short> <short>The sibling control to which we should anchor.</short>
</element> </element>
<element name="TControl.AnchorToCompanion.FreeCompositeSide"> <element name="TControl.AnchorToCompanion.FreeCompositeSide">
<short></short> <short/>
</element> </element>
<!-- procedure Visibility: public --> <!-- procedure Visibility: public -->
<element name="TControl.AnchorSame"> <element name="TControl.AnchorSame">
@ -6310,6 +6312,7 @@ dmFindTarget: find child control under the mouse
<p> <p>
<var>TWinControl</var> overrides this and asks the interface for theme dependent values. See <var>TWinControl</var> overrides this and asks the interface for theme dependent values. See
<link id="TWinControl.CalculatePreferredSize"/> for more information.</p> <link id="TWinControl.CalculatePreferredSize"/> for more information.</p>
</descr> </descr>
</element> </element>
@ -6414,7 +6417,7 @@ dmFindTarget: find child control under the mouse
<short/> <short/>
</element> </element>
<element name="TControl.GetAnchorsDependingOnParent.WithNormalAnchors"> <element name="TControl.GetAnchorsDependingOnParent.WithNormalAnchors">
<short></short> <short/>
</element> </element>
<!-- procedure Visibility: public --> <!-- procedure Visibility: public -->
<element name="TControl.DisableAutoSizing"> <element name="TControl.DisableAutoSizing">
@ -6438,7 +6441,7 @@ dmFindTarget: find child control under the mouse
<short/> <short/>
</element> </element>
<element name="TControl.UpdateBaseBounds.UseLoadedValues"> <element name="TControl.UpdateBaseBounds.UseLoadedValues">
<short></short> <short/>
</element> </element>
<!-- procedure Visibility: public --> <!-- procedure Visibility: public -->
<element name="TControl.WriteLayoutDebugReport"> <element name="TControl.WriteLayoutDebugReport">
@ -6887,7 +6890,7 @@ dmFindTarget: find child control under the mouse
<!-- procedure Visibility: public --> <!-- procedure Visibility: public -->
<element name="TControl.InitiateAction"> <element name="TControl.InitiateAction">
<short>Update the action associated with this control.</short> <short>Update the action associated with this control.</short>
<descr></descr> <descr/>
<errors/> <errors/>
<seealso/> <seealso/>
</element> </element>
@ -7295,7 +7298,7 @@ dmFindTarget: find child control under the mouse
<element name="TControl.CaptureMouseButtons"> <element name="TControl.CaptureMouseButtons">
<short>Which mouse button(s) to be used for capture? Default is the left button. <short>Which mouse button(s) to be used for capture? Default is the left button.
</short> </short>
<descr></descr> <descr/>
<seealso/> <seealso/>
</element> </element>
<!-- property Visibility: public --> <!-- property Visibility: public -->
@ -7753,11 +7756,19 @@ dmFindTarget: find child control under the mouse
<short>The control within which the control is shown.</short> <short>The control within which the control is shown.</short>
<descr> <descr>
<p>When the Parent moves or hides, all its children move or hide together with it. <p>When the Parent moves or hides, all its children move or hide together with it.
</p> </p>
<p>Every TControl must have a Parent, else it is never shown. <p>Every TControl must have a Parent, else it is never shown.
</p> </p>
<p>The Parent of a floating form is Nil. <p>The Parent of a floating form is Nil.
</p> </p>
<p>Set the parent last to reduce updates. For example:
Button1:=TButton.Create(Self);
Button1.Name:='Button1';
Button1.Caption:='Click me'; // parent is not set, so it does not update the whole form
Button1.Parent:=Form1; // set parent as last, the LCL now applies all properties
</p>
<p>Delphi/VCL: Parent must be set first under Delphi, because many properties work differently if they are set before or after Handle creation. The LCL applies the properties when the Handle is created.
</p>
</descr> </descr>
</element> </element>
<!-- property Visibility: public --> <!-- property Visibility: public -->
@ -7819,14 +7830,14 @@ dmFindTarget: find child control under the mouse
</element> </element>
<!-- property Visibility: public --> <!-- property Visibility: public -->
<element name="TControl.ReadBounds"> <element name="TControl.ReadBounds">
<short></short> <short/>
<descr/> <descr/>
<seealso/> <seealso/>
</element> </element>
<!-- property Visibility: protected --> <!-- property Visibility: protected -->
<element name="TControl.SessionProperties"> <element name="TControl.SessionProperties">
<short>The stored (saved) properties of the current session, expressed as a string</short> <short>The stored (saved) properties of the current session, expressed as a string</short>
<descr></descr> <descr/>
<seealso/> <seealso/>
</element> </element>
<!-- property Visibility: public --> <!-- property Visibility: public -->
@ -8230,10 +8241,10 @@ dmFindTarget: find child control under the mouse
<seealso/> <seealso/>
</element> </element>
<element name="TWinControlFlag.wcfClientRectNeedsUpdate"> <element name="TWinControlFlag.wcfClientRectNeedsUpdate">
<short></short> <short/>
</element> </element>
<element name="TWinControlFlag.wcfColorChanged"> <element name="TWinControlFlag.wcfColorChanged">
<short></short> <short/>
</element> </element>
<element name="TWinControlFlag.wcfFontChanged"> <element name="TWinControlFlag.wcfFontChanged">
<short>Set if font was changed before handle creation.</short> <short>Set if font was changed before handle creation.</short>
@ -8246,7 +8257,7 @@ dmFindTarget: find child control under the mouse
</short> </short>
</element> </element>
<element name="TWinControlFlag.wcfEraseBackground"> <element name="TWinControlFlag.wcfEraseBackground">
<short></short> <short/>
</element> </element>
<element name="TWinControlFlag.wcfCreatingHandle"> <element name="TWinControlFlag.wcfCreatingHandle">
<short>Set while constructing the handle of this control.</short> <short>Set while constructing the handle of this control.</short>
@ -8266,10 +8277,10 @@ dmFindTarget: find child control under the mouse
</short> </short>
</element> </element>
<element name="TWinControlFlag.wcfUpdateShowing"> <element name="TWinControlFlag.wcfUpdateShowing">
<short></short> <short/>
</element> </element>
<element name="TWinControlFlag.wcfHandleVisible"> <element name="TWinControlFlag.wcfHandleVisible">
<short></short> <short/>
</element> </element>
<element name="TWinControlFlag.wcfAdjustedLogicalClientRectValid"> <element name="TWinControlFlag.wcfAdjustedLogicalClientRectValid">
<short>Set when the adjusted ClientRect is valid.</short> <short>Set when the adjusted ClientRect is valid.</short>
@ -8278,7 +8289,7 @@ dmFindTarget: find child control under the mouse
</seealso> </seealso>
</element> </element>
<element name="TWinControlFlag.wcfKillIntfSetBounds"> <element name="TWinControlFlag.wcfKillIntfSetBounds">
<short></short> <short/>
</element> </element>
<!-- set type Visibility: default --> <!-- set type Visibility: default -->
<element link="TWinControlFlag" name="TWinControlFlags"> <element link="TWinControlFlag" name="TWinControlFlags">
@ -8625,6 +8636,7 @@ dmFindTarget: find child control under the mouse
</short> </short>
<descr/>It's called often, so don't put expensive code here, or cache the result. <descr/>It's called often, so don't put expensive code here, or cache the result.
<errors/> <errors/>
<seealso> <seealso>
<link id="TWinControl.GetAdjustedLogicalClientRect"/> <link id="TWinControl.GetAdjustedLogicalClientRect"/>
@ -8679,7 +8691,7 @@ dmFindTarget: find child control under the mouse
</seealso> </seealso>
</element> </element>
<element name="TWinControl.AlignControls.AControl"> <element name="TWinControl.AlignControls.AControl">
<short></short> <short/>
</element> </element>
<element name="TWinControl.AlignControls.RemainingClientRect"> <element name="TWinControl.AlignControls.RemainingClientRect">
<short>The available space, becomes remaining space on exit.</short> <short>The available space, becomes remaining space on exit.</short>
@ -8948,6 +8960,7 @@ dmFindTarget: find child control under the mouse
<p> <p>
<var>WithThemeSpace</var>: If true, adds space for stacking. For example: <var>WithThemeSpace</var>: If true, adds space for stacking. For example:
<var>TRadioButton</var> has a minimum size. But for stacking multiple TRadioButtons there should be some space around. <var>TRadioButton</var> has a minimum size. But for stacking multiple TRadioButtons there should be some space around.
This space is theme dependent, so it is passed as a parameter to the widgetset. </p> This space is theme dependent, so it is passed as a parameter to the widgetset. </p>
</descr> </descr>
@ -9153,7 +9166,7 @@ dmFindTarget: find child control under the mouse
</element> </element>
<!-- procedure Visibility: protected --> <!-- procedure Visibility: protected -->
<element name="TWinControl.CMEnter"> <element name="TWinControl.CMEnter">
<short></short> <short/>
<descr/> <descr/>
<errors/> <errors/>
<seealso/> <seealso/>
@ -9163,7 +9176,7 @@ dmFindTarget: find child control under the mouse
</element> </element>
<!-- procedure Visibility: protected --> <!-- procedure Visibility: protected -->
<element name="TWinControl.CMExit"> <element name="TWinControl.CMExit">
<short></short> <short/>
<descr/> <descr/>
<errors/> <errors/>
<seealso/> <seealso/>
@ -9248,8 +9261,7 @@ dmFindTarget: find child control under the mouse
</element> </element>
<!-- procedure Visibility: protected --> <!-- procedure Visibility: protected -->
<element name="TWinControl.WMEnter"> <element name="TWinControl.WMEnter">
<short> <short/>
</short>
<descr/> <descr/>
<errors/> <errors/>
<seealso/> <seealso/>
@ -9259,8 +9271,7 @@ dmFindTarget: find child control under the mouse
</element> </element>
<!-- procedure Visibility: protected --> <!-- procedure Visibility: protected -->
<element name="TWinControl.WMExit"> <element name="TWinControl.WMExit">
<short> <short/>
</short>
<descr/> <descr/>
<errors/> <errors/>
<seealso/> <seealso/>
@ -9645,7 +9656,7 @@ dmFindTarget: find child control under the mouse
<short>The control being undocked.</short> <short>The control being undocked.</short>
</element> </element>
<element name="TWinControl.DoUnDock.KeepDockSiteSize"> <element name="TWinControl.DoUnDock.KeepDockSiteSize">
<short></short> <short/>
</element> </element>
<!-- procedure Visibility: protected --> <!-- procedure Visibility: protected -->
<element name="TWinControl.GetSiteInfo"> <element name="TWinControl.GetSiteInfo">
@ -9772,7 +9783,7 @@ dmFindTarget: find child control under the mouse
<short/> <short/>
</element> </element>
<element name="TWinControl.DoKeyDownBeforeInterface.IsRecurseCall"> <element name="TWinControl.DoKeyDownBeforeInterface.IsRecurseCall">
<short></short> <short/>
</element> </element>
<!-- function Visibility: protected --> <!-- function Visibility: protected -->
<element name="TWinControl.DoRemainingKeyDown"> <element name="TWinControl.DoRemainingKeyDown">
@ -9790,8 +9801,7 @@ dmFindTarget: find child control under the mouse
</element> </element>
<!-- function Visibility: protected --> <!-- function Visibility: protected -->
<element name="TWinControl.DoRemainingKeyUp"> <element name="TWinControl.DoRemainingKeyUp">
<short> <short/>
</short>
<descr/> <descr/>
<errors/> <errors/>
<seealso/> <seealso/>
@ -9843,8 +9853,7 @@ dmFindTarget: find child control under the mouse
</element> </element>
<!-- function Visibility: protected --> <!-- function Visibility: protected -->
<element name="TWinControl.ChildKey"> <element name="TWinControl.ChildKey">
<short> <short/>
</short>
<descr/> <descr/>
<errors/> <errors/>
<seealso/> <seealso/>
@ -9857,8 +9866,7 @@ dmFindTarget: find child control under the mouse
</element> </element>
<!-- function Visibility: protected --> <!-- function Visibility: protected -->
<element name="TWinControl.SendDialogChar"> <element name="TWinControl.SendDialogChar">
<short> <short/>
</short>
<descr/> <descr/>
<errors/> <errors/>
<seealso/> <seealso/>
@ -9935,8 +9943,7 @@ dmFindTarget: find child control under the mouse
</element> </element>
<!-- procedure Visibility: protected --> <!-- procedure Visibility: protected -->
<element name="TWinControl.KeyDownAfterInterface"> <element name="TWinControl.KeyDownAfterInterface">
<short> <short/>
</short>
<descr/> <descr/>
<errors/> <errors/>
<seealso/> <seealso/>
@ -9988,8 +9995,7 @@ dmFindTarget: find child control under the mouse
</element> </element>
<!-- procedure Visibility: protected --> <!-- procedure Visibility: protected -->
<element name="TWinControl.KeyUpAfterInterface"> <element name="TWinControl.KeyUpAfterInterface">
<short> <short/>
</short>
<descr/> <descr/>
<errors/> <errors/>
<seealso/> <seealso/>
@ -10224,7 +10230,7 @@ End;
</element> </element>
<!-- procedure Visibility: protected --> <!-- procedure Visibility: protected -->
<element name="TWinControl.MainWndProc"> <element name="TWinControl.MainWndProc">
<short></short> <short/>
<descr>[This method does nothing, and cannot be overridden???] <descr>[This method does nothing, and cannot be overridden???]
</descr> </descr>
<errors/> <errors/>
@ -11358,9 +11364,12 @@ End;
<p> <p>
<var>TGraphicControl</var> provides a <var>TGraphicControl</var> provides a
<var>Canvas</var> property for access to the control's drawing surface <var>Canvas</var> property for access to the control's drawing surface
and a virtual and a virtual
<var>Paint</var> method and an <var>Paint</var> method and an
<var>OnPaint</var> handler, <var>OnPaint</var> handler,
called in response to paint requests received by the parent control. called in response to paint requests received by the parent control.
</p> </p>
@ -11539,7 +11548,7 @@ End;
<element link="#LCL.ImgList.TCustomImageList.Width" name="TImageList.Width"/> <element link="#LCL.ImgList.TCustomImageList.Width" name="TImageList.Width"/>
<!-- object Visibility: default --> <!-- object Visibility: default -->
<element name="TControlPropertyStorage"> <element name="TControlPropertyStorage">
<short></short> <short/>
<descr/> <descr/>
<errors/> <errors/>
<seealso/> <seealso/>
@ -11916,13 +11925,13 @@ End;
</element> </element>
<!-- enumeration type Visibility: default --> <!-- enumeration type Visibility: default -->
<element name="TDockTreeFlag"> <element name="TDockTreeFlag">
<short></short> <short/>
<descr/> <descr/>
<seealso/> <seealso/>
</element> </element>
<!-- enumeration value Visibility: default --> <!-- enumeration value Visibility: default -->
<element name="TDockTreeFlag.dtfUpdateAllNeeded"> <element name="TDockTreeFlag.dtfUpdateAllNeeded">
<short></short> <short/>
</element> </element>
<!-- set type Visibility: default --> <!-- set type Visibility: default -->
<element link="TDockTreeFlag" name="TDockTreeFlags"/> <element link="TDockTreeFlag" name="TDockTreeFlags"/>
@ -12043,7 +12052,7 @@ End;
<element link="TDockTree.DockZoneClass" name="TDockTree.FDockZoneClass"/> <element link="TDockTree.DockZoneClass" name="TDockTree.FDockZoneClass"/>
<!-- variable Visibility: private --> <!-- variable Visibility: private -->
<element name="TDockTree.FFlags"> <element name="TDockTree.FFlags">
<short></short> <short/>
<descr/> <descr/>
<seealso/> <seealso/>
</element> </element>
@ -12467,7 +12476,7 @@ End;
</element> </element>
<!-- procedure Visibility: default --> <!-- procedure Visibility: default -->
<element name="MoveWindowOrg"> <element name="MoveWindowOrg">
<short></short> <short/>
<descr/> <descr/>
<errors/> <errors/>
<seealso/> <seealso/>
@ -12505,8 +12514,7 @@ End;
<short>Set the mouse capture to AWinControl or its child at the given coordinates</short> <short>Set the mouse capture to AWinControl or its child at the given coordinates</short>
<descr/> <descr/>
<errors/> <errors/>
<seealso> <seealso/>
</seealso>
</element> </element>
<element name="SetCaptureControl.Control"> <element name="SetCaptureControl.Control">
<short/> <short/>
@ -12525,8 +12533,7 @@ End;
The LCL extends this to allow TControl capture the mouse. The LCL extends this to allow TControl capture the mouse.
</descr> </descr>
<errors/> <errors/>
<seealso> <seealso/>
</seealso>
</element> </element>
<element name="GetCaptureControl.Result"> <element name="GetCaptureControl.Result">
<short/> <short/>
@ -12881,7 +12888,7 @@ End;
<element name="TGetDockCaptionEvent.ACaption"> <element name="TGetDockCaptionEvent.ACaption">
<short/> <short/>
</element> </element>
<element name="TDragManagerDefault" link="TDragManager"> <element link="TDragManager" name="TDragManagerDefault">
<short>Implementation of TDragManager.</short> <short>Implementation of TDragManager.</short>
</element> </element>
<!-- object Visibility: default --> <!-- object Visibility: default -->
@ -12893,8 +12900,7 @@ End;
<p>[entire review DoDi 2010-02-16]</p> <p>[entire review DoDi 2010-02-16]</p>
</descr> </descr>
<errors/> <errors/>
<seealso> <seealso/>
</seealso>
</element> </element>
<!-- variable Visibility: private --> <!-- variable Visibility: private -->
<element name="TDragManager.FDragImmediate"> <element name="TDragManager.FDragImmediate">
@ -13134,19 +13140,19 @@ End;
</element> </element>
<!-- enumeration value Visibility: default --> <!-- enumeration value Visibility: default -->
<element name="TControlCellAlign.ccaFill"> <element name="TControlCellAlign.ccaFill">
<short></short> <short/>
</element> </element>
<!-- enumeration value Visibility: default --> <!-- enumeration value Visibility: default -->
<element name="TControlCellAlign.ccaLeftTop"> <element name="TControlCellAlign.ccaLeftTop">
<short></short> <short/>
</element> </element>
<!-- enumeration value Visibility: default --> <!-- enumeration value Visibility: default -->
<element name="TControlCellAlign.ccaRightBottom"> <element name="TControlCellAlign.ccaRightBottom">
<short></short> <short/>
</element> </element>
<!-- enumeration value Visibility: default --> <!-- enumeration value Visibility: default -->
<element name="TControlCellAlign.ccaCenter"> <element name="TControlCellAlign.ccaCenter">
<short></short> <short/>
</element> </element>
<!-- set type Visibility: default --> <!-- set type Visibility: default -->
<element link="TControlCellAlign" name="TControlCellAligns"/> <element link="TControlCellAlign" name="TControlCellAligns"/>
@ -13260,16 +13266,16 @@ End;
</element> </element>
<!-- function Visibility: default --> <!-- function Visibility: default -->
<element name="operator :=(Variant): TCaption"> <element name="operator :=(Variant): TCaption">
<short></short> <short/>
<descr/> <descr/>
<errors/> <errors/>
<seealso/> <seealso/>
</element> </element>
<element name="operator :=(Variant): TCaption.Result"> <element name="operator :=(Variant): TCaption.Result">
<short></short> <short/>
</element> </element>
<element name="operator :=(Variant): TCaption.AVariant"> <element name="operator :=(Variant): TCaption.AVariant">
<short></short> <short/>
</element> </element>
<!-- Variables go here --> <!-- Variables go here -->
<!-- variable Visibility: implementation --> <!-- variable Visibility: implementation -->
@ -13288,12 +13294,12 @@ End;
</element> </element>
<!-- variable Visibility: default --> <!-- variable Visibility: default -->
<element name="DockSplitterClass"> <element name="DockSplitterClass">
<short></short> <short/>
<descr/> <descr/>
<seealso/> <seealso/>
</element> </element>
<!-- variable Visibility: default --> <!-- variable Visibility: default -->
<element name="DragManager" link="TDragManager"> <element link="TDragManager" name="DragManager">
<short>The current DragManager (always TDragManagerDefault).</short> <short>The current DragManager (always TDragManagerDefault).</short>
<descr>A DragManager can be implemented only in the Controls unit, <descr>A DragManager can be implemented only in the Controls unit,
because it must access private elements of the other classes, because it must access private elements of the other classes,
@ -13309,7 +13315,7 @@ End;
</element> </element>
<!-- variable Visibility: default --> <!-- variable Visibility: default -->
<element name="NewStyleControls"> <element name="NewStyleControls">
<short></short> <short/>
<descr/> <descr/>
<seealso/> <seealso/>
</element> </element>
@ -13327,6 +13333,7 @@ End;
<p> <p>
<var>TControl.AdjustSize</var> calls <var>TControl.AdjustSize</var> calls
<var>DoAutoSize</var> in a smart fashion.</p> <var>DoAutoSize</var> in a smart fashion.</p>
<p>During loading and handle creation the calls are delayed.</p> <p>During loading and handle creation the calls are delayed.</p>
<p>This method initially does the same as <link id="#lcl.Controls.TWinControl.DoAutoSize">TWinControl.DoAutoSize</link>. But since <var>DoAutoSize</var> is commonly overriden by descendant components, it is not useful to perform all tests, which can result in too much overhead. To reduce this the LCL calls <var>AdjustSize</var> instead.</p> <p>This method initially does the same as <link id="#lcl.Controls.TWinControl.DoAutoSize">TWinControl.DoAutoSize</link>. But since <var>DoAutoSize</var> is commonly overriden by descendant components, it is not useful to perform all tests, which can result in too much overhead. To reduce this the LCL calls <var>AdjustSize</var> instead.</p>
@ -13358,8 +13365,7 @@ End;
<p>If Parent=nil then Left, Top depend on the widgetset and the window manager. Till Lazarus 0.9.25 this is typically the screen coordinate of the left,top of the client area of the form. This is Delphi incompatible. It is planned to change this to the Left, Top of the window.</p> <p>If Parent=nil then Left, Top depend on the widgetset and the window manager. Till Lazarus 0.9.25 this is typically the screen coordinate of the left,top of the client area of the form. This is Delphi incompatible. It is planned to change this to the Left, Top of the window.</p>
<p>Hint:</p> <p>Hint:</p>
<p>Each time you change Left and Top the LCL moves instantly. If you want to change both Left and Top use instead:</p> <p>Each time you change Left and Top the LCL moves instantly. If you want to change both Left and Top use instead:</p>
<code> <code>with Button1 do
with Button1 do
SetBounds(NewLeft,NewTop,Width,Height); SetBounds(NewLeft,NewTop,Width,Height);
</code> </code>
<ul> <ul>