paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-05-30 16:22:46 +02:00
Code Issues Packages Projects Releases Wiki Activity
a68d2b603f
lazarus/docs/xml/lcl/extctrls.xml
mattias 028d607404 docs: TCustomIdleTimer 
git-svn-id: trunk@57601 -
2018-04-04 12:43:29 +00:00

6076 lines
216 KiB
XML
Raw Blame History

<?xml version="1.0" encoding="UTF-8"?>
<fpdoc-descriptions>
<package name="lcl">
<!--
====================================================================
ExtCtrls
====================================================================
-->
<module name="ExtCtrls">
<short>Some extra controls commonly used in Lazarus forms</short>
<descr/>
<!-- unresolved type reference Visibility: default -->
<element name="SysUtils">
<short/>
<descr/>
<seealso/>
</element>
<!-- unresolved type reference Visibility: default -->
<element name="Classes">
<short/>
<descr/>
<seealso/>
</element>
<!-- unresolved type reference Visibility: default -->
<element name="LCLStrConsts">
<short/>
<descr/>
<seealso/>
</element>
<!-- unresolved type reference Visibility: default -->
<element name="LCLType">
<short/>
<descr/>
<seealso/>
</element>
<!-- unresolved type reference Visibility: default -->
<element name="LCLProc">
<short/>
<descr/>
<seealso/>
</element>
<!-- unresolved type reference Visibility: default -->
<element name="LResources">
<short/>
<descr/>
<seealso/>
</element>
<!-- unresolved type reference Visibility: default -->
<element name="Controls">
<short/>
<descr/>
<seealso/>
</element>
<!-- unresolved type reference Visibility: default -->
<element name="Forms">
<short/>
<descr/>
<seealso/>
</element>
<!-- unresolved type reference Visibility: default -->
<element name="StdCtrls">
<short/>
<descr/>
<seealso/>
</element>
<!-- unresolved type reference Visibility: default -->
<element name="lMessages">
<short/>
<descr/>
<seealso/>
</element>
<!-- unresolved type reference Visibility: default -->
<element name="GraphType">
<short/>
<descr/>
<seealso/>
</element>
<!-- unresolved type reference Visibility: default -->
<element name="Graphics">
<short/>
<descr/>
<seealso/>
</element>
<!-- unresolved type reference Visibility: default -->
<element name="LCLIntf">
<short/>
<descr/>
<seealso/>
</element>
<!-- unresolved type reference Visibility: default -->
<element name="CustomTimer">
<short/>
<descr/>
<seealso/>
</element>
<!-- alias type Visibility: default -->
<element name="TAbstractReader">
<short/>
<descr/>
<seealso/>
</element>
<!-- enumeration type Visibility: default -->
<element name="TPageFlag">
<short>
<var>TPageFlag</var> - enumerated type containing possible values for page flags for notebook pages</short>
<descr>
<p>
<var>TPageFlag</var> - enumerated type containing possible values for page flags for notebook pages</p>
<pre>pfAdded, // handle of page added to notebook handle
pfAdding, // currently handle of page adding to notebook handle
pfRemoving, // currently removing page handle from notebook handle
pfInserting // currently inserting page into notebook
</pre>
</descr>
<seealso/>
</element>
<!-- enumeration value Visibility: default -->
<element name="TPageFlag.pfAdded">
<short>Internal flag set after page handle was connected to the notebook handle</short>
</element>
<!-- enumeration value Visibility: default -->
<element name="TPageFlag.pfRemoving">
<short/>
</element>
<!-- set type Visibility: default -->
<element name="TPageFlags">
<short>
<var>TPageFlags</var> - set of <var>TPageFlag</var>
</short>
<descr/>
<seealso/>
</element>
<!-- object Visibility: default -->
<element name="TPage">
<short>
<var>TPage</var>: One of the pages in a tabbed Notebook</short>
<descr>
<p>
<var>TPage</var>: One of the pages in a tabbed Notebook</p>
<p>Inherits most of its properties from TCustomPage
</p>
</descr>
<seealso>
<link id="#lcl.StdCtrls.HowToUseStdCtrls">HowToUseStdCtrls</link>
<link id="#lcl.ExtCtrls.Multi-PageControls">Multi-PageControls</link>
</seealso>
</element>
<!-- property Visibility: published -->
<element name="TPage.Caption" link="#LCL.Controls.TControl.Caption">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPage.ChildSizing" link="#LCL.Controls.TWinControl.ChildSizing">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPage.ClientWidth" link="#LCL.Controls.TControl.ClientWidth">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPage.ClientHeight" link="#LCL.Controls.TControl.ClientHeight">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPage.ImageIndex">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPage.Left" link="#LCL.Controls.TControl.Left">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPage.Top" link="#LCL.Controls.TControl.Top">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPage.Width" link="#LCL.Controls.TControl.Width">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPage.Height" link="#LCL.Controls.TControl.Height">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPage.OnContextPopup" link="#LCL.Controls.TControl.OnContextPopup">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPage.OnEnter" link="#LCL.Controls.TWinControl.OnEnter">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPage.OnExit" link="#LCL.Controls.TWinControl.OnExit">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPage.OnMouseDown" link="#LCL.Controls.TControl.OnMouseDown">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPage.OnMouseMove" link="#LCL.Controls.TControl.OnMouseMove">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPage.OnMouseUp" link="#LCL.Controls.TControl.OnMouseUp">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPage.OnResize" link="#LCL.Controls.TControl.OnResize">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPage.PageIndex" link="#LCL.ComCtrls.TCustomPage.PageIndex">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPage.ParentShowHint" link="#LCL.Controls.TControl.ParentShowHint">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPage.PopupMenu" link="#LCL.Controls.TControl.PopupMenu">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPage.TabOrder" link="#LCL.Controls.TWinControl.TabOrder">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPage.Visible" link="#LCL.Controls.TControl.Visible">
<short/>
<descr/>
<seealso/>
</element>
<!-- object Visibility: default -->
<element name="TNotebook">
<short>
<var>TNotebook</var> is a container for a series of <var>pages</var> placed together</short>
<descr>
<p><var>TNotebook</var> is a control which can hold a series of pages placed together. Only one page is shown at a time and this control is completely custom drawn, which means that it is available and looks the same in any widgetset which supports TCustomControl. The pages are containers which can hold controls. This control never has tabs. If you are looking for a control with tabs and pages, please see <var>TPageControl</var> instead.</p>
<p>To use a Notebook, select its icon from the 'Additional' tab of the Component Palette and place it on the Form. Adjust its size, position, alignment and anchoring as required, by moving the object on the Form or by using the Object Inspector.</p>
<p>Pages are added to the NoteBook by selecting the control and right-clicking with the mouse to get a pop-up menu whose first item is 'Add Page'. Pages already in the NoteBook can be edited by selecting the appropriate ActivePage in the Object Inspector and modifying its properties or adding additional components to that Page.</p>
</descr>
<seealso>
<link id="#lcl.StdCtrls.HowToUseStdCtrls"/>
<link id="#lcl.ExtCtrls.TPage"/>
<link id="#lcl.ExtCtrls.Multi-PageControls"/>
</seealso>
</element>
<!-- function Visibility: private -->
<element name="TNotebook.GetActiveNotebookPageComponent">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- function result Visibility: default -->
<element name="TNotebook.GetActiveNotebookPageComponent.Result">
<short/>
</element>
<!-- function Visibility: private -->
<element name="TNotebook.GetNoteBookPage">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- function result Visibility: default -->
<element name="TNotebook.GetNoteBookPage.Result">
<short/>
</element>
<!-- argument Visibility: default -->
<element name="TNotebook.GetNoteBookPage.Index">
<short/>
</element>
<!-- procedure Visibility: private -->
<element name="TNotebook.SetActiveNotebookPageComponent">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TNotebook.SetActiveNotebookPageComponent.AValue">
<short/>
</element>
<!-- constructor Visibility: public -->
<element name="TNotebook.Create">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TNotebook.Create.TheOwner">
<short/>
</element>
<!-- property Visibility: public -->
<element name="TNotebook.Page">
<short/>
<descr/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TNotebook.Page.Index">
<short/>
</element>
<!-- property Visibility: public -->
<element name="TNotebook.ActivePageComponent">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: public -->
<element name="TNotebook.Pages">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TNotebook.ActivePage">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TNotebook.Align" link="#LCL.Controls.TControl.Align">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TNotebook.Anchors" link="#LCL.Controls.TControl.Anchors">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TNotebook.BorderSpacing" link="#LCL.Controls.TControl.BorderSpacing">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TNotebook.Constraints" link="#LCL.Controls.TControl.Constraints">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TNotebook.Enabled" link="#LCL.Controls.TControl.Enabled">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TNotebook.Images">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TNotebook.OnChangeBounds" link="#LCL.Controls.TControl.OnChangeBounds">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TNotebook.OnCloseTabClicked">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TNotebook.OnContextPopup" link="#LCL.Controls.TControl.OnContextPopup">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TNotebook.OnEnter" link="#LCL.Controls.TWinControl.OnEnter">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TNotebook.OnExit" link="#LCL.Controls.TWinControl.OnExit">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TNotebook.OnGetImageIndex">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TNotebook.OnMouseDown" link="#LCL.Controls.TControl.OnMouseDown">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TNotebook.OnMouseMove">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TNotebook.OnMouseUp" link="#LCL.Controls.TControl.OnMouseUp">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TNotebook.OnPageChanged">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TNotebook.OnResize" link="#LCL.Controls.TControl.OnResize">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TNotebook.Options">
<short>Set of <var>Options</var> for this Notebook. Include <var>nboShowCloseButtons</var>, <var>nboMultiLine</var>
</short>
<descr>
<p>Set of <var>Options</var> for this Notebook. Include <var>nboShowCloseButtons</var>, <var>nboMultiLine</var>
</p>
<p>To use the Options, select the tag in the Object Inspector, then select for inclusion any of the listed options, setting them True or False as appropriate.</p>
<p>For example, setting <var>nboShowCloseButtons</var> to True will cause a CloseButton (a small CheckBox with an 'x' in it) to appear on each Tab of the NoteBook, allowing the tabbed Page to be closed when the user clicks on the CloseButton.</p>
</descr>
</element>
<!-- property Visibility: published -->
<element name="TNotebook.PageIndex">
<short/>
<descr/>
<seealso/>
</element>
<!-- object Visibility: default -->
<element name="TTimer">
<short>
<var>TTimer</var>: An elapsed timer useful in many applications</short>
<descr>
<p>
<var>TTimer</var>: An elapsed timer useful in many applications</p>
<p>Inherits most of its properties from <link id="#lcl.CustomTimer.TCustomTimer">TCustomTimer</link>
</p>
</descr>
</element>
<!-- enumeration type Visibility: default -->
<element name="TIdleTimerAutoEvent">
<short>
<var>TIdleTimerAutoEvent</var> - enumerated class containing events relevant to a timer</short>
<descr>
<p>
<var>TIdleTimerAutoEvent</var> - enumerated class containing events relevant to a timer</p>
<pre>itaOnIdle,
itaOnIdleEnd,
itaOnUserInput
</pre>
</descr>
<seealso/>
</element>
<!-- enumeration value Visibility: default -->
<element name="TIdleTimerAutoEvent.itaOnIdle">
<short/>
</element>
<!-- enumeration value Visibility: default -->
<element name="TIdleTimerAutoEvent.itaOnIdleEnd">
<short/>
</element>
<!-- enumeration value Visibility: default -->
<element name="TIdleTimerAutoEvent.itaOnUserInput">
<short/>
</element>
<!-- set type Visibility: default -->
<element name="TIdleTimerAutoEvents">
<short>
<var>TIdleTimerAutoEvents</var> - set of <var>TIdleTimerAutoEvent</var>
</short>
<descr/>
<seealso/>
</element>
<!-- object Visibility: default -->
<element name="TIdleTimer">
<short>
<var>TIdleTimer</var> : A timer to measure idle time between processes</short>
<descr>
<p>
<var>TIdleTimer</var>: A timer to measure idle time between processes</p>
<p>Inherits most of its properties from <link id="#lcl.CustomTimer.TCustomTimer">TCustomTimer</link>
</p>
</descr>
</element>
<!-- variable Visibility: private -->
<element name="TIdleTimer.FAutoEnabled">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TIdleTimer.FAutoEndEvent">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TIdleTimer.FAutoStartEvent">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TIdleTimer.FHandlersConnected">
<short/>
<descr/>
<seealso/>
</element>
<!-- procedure Visibility: private -->
<element name="TIdleTimer.UpdateHandlers">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- procedure Visibility: private -->
<element name="TIdleTimer.SetAutoEndEvent">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TIdleTimer.SetAutoEndEvent.AValue">
<short/>
</element>
<!-- procedure Visibility: private -->
<element name="TIdleTimer.SetAutoStartEvent">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TIdleTimer.SetAutoStartEvent.AValue">
<short/>
</element>
<!-- procedure Visibility: protected -->
<element name="TIdleTimer.SetAutoEnabled">
<short>
<var>SetAutoEnabled</var> - specifies whether AutoEnable is allowed</short>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TIdleTimer.SetAutoEnabled.AValue">
<short/>
</element>
<!-- procedure Visibility: protected -->
<element name="TIdleTimer.DoOnIdle">
<short>
<var>DoOnIdle</var> - performs the code for timer idling</short>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TIdleTimer.DoOnIdle.Sender">
<short/>
</element>
<!-- procedure Visibility: protected -->
<element name="TIdleTimer.DoOnIdleEnd">
<short>
<var>DoOnIdleEnd</var> - performs the code for the end of idling</short>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TIdleTimer.DoOnIdleEnd.Sender">
<short/>
</element>
<!-- procedure Visibility: protected -->
<element name="TIdleTimer.DoOnUserInput">
<short>
<var>DoOnUserInput</var> - performs the code for responding to user input</short>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TIdleTimer.DoOnUserInput.Sender">
<short/>
</element>
<!-- argument Visibility: default -->
<element name="TIdleTimer.DoOnUserInput.Msg">
<short/>
</element>
<!-- procedure Visibility: protected -->
<element name="TIdleTimer.Loaded" link="#rtl.Classes.TComponent.Loaded">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- constructor Visibility: public -->
<element name="TIdleTimer.Create">
<short>
<var>Create</var>: constructor for <var>TIdleTimer</var>: calls inherited <var>Create</var> then sets up operating mode (autostart and autoend)</short>
<descr/>
<errors/>
<seealso>
<link id="#LCL.CustomTimer.TCustomTimer.Create">TCustomTimer.Create</link>
</seealso>
</element>
<!-- argument Visibility: default -->
<element name="TIdleTimer.Create.TheOwner">
<short/>
</element>
<!-- destructor Visibility: public -->
<element name="TIdleTimer.Destroy">
<short>
<var>Destroy</var> - destructor for <var>TIdleTimer</var>: turns off <var>AutoEnabled</var> then calls inherited <var>Destroy</var>
</short>
<descr/>
<errors/>
<seealso>
<link id="#LCL.CustomTimer.TCustomTimer.Destroy">TCustomTimer.Destroy</link>
</seealso>
</element>
<!-- property Visibility: public -->
<element name="TIdleTimer.AutoEnabled" link="#LCL.ExtCtrls.TCustomIdleTimer.AutoEnabled">
<descr/>
<seealso/>
</element>
<!-- property Visibility: public -->
<element name="TIdleTimer.AutoEndEvent" link="#LCL.ExtCtrls.TCustomIdleTimer.AutoEndEvent">
<descr/>
<seealso/>
</element>
<!-- property Visibility: public -->
<element name="TIdleTimer.AutoStartEvent" link="#LCL.ExtCtrls.TCustomIdleTimer.AutoStartEvent">
<descr/>
<seealso/>
</element>
<!-- enumeration type Visibility: default -->
<element name="TShapeType">
<short>
<var>TShapeType</var> - enumerated type containing several standard geometric shapes</short>
<descr>
<p>
<var>TShapeType</var> - enumerated type containing several standard geometric shapes:</p>
<pre>stRectangle
stSquare
stRoundRect
stRoundSquare
stEllipse
stCircle
stSquaredDiamond
stDiamond
</pre>
</descr>
<seealso/>
</element>
<!-- enumeration value Visibility: default -->
<element name="TShapeType.stRectangle">
<short/>
</element>
<!-- enumeration value Visibility: default -->
<element name="TShapeType.stSquare">
<short/>
</element>
<!-- enumeration value Visibility: default -->
<element name="TShapeType.stRoundRect">
<short/>
</element>
<!-- enumeration value Visibility: default -->
<element name="TShapeType.stRoundSquare">
<short/>
</element>
<!-- enumeration value Visibility: default -->
<element name="TShapeType.stEllipse">
<short/>
</element>
<!-- enumeration value Visibility: default -->
<element name="TShapeType.stCircle">
<short/>
</element>
<!-- enumeration value Visibility: default -->
<element name="TShapeType.stSquaredDiamond">
<short/>
</element>
<!-- enumeration value Visibility: default -->
<element name="TShapeType.stDiamond">
<short/>
</element>
<!-- object Visibility: default -->
<element name="TShape">
<short>
<var>TShape</var> - An arbitrary graphic geometrical shape placed on the Form. It may be one of a series of standard shapes defined by
<var>TShapeType </var>
</short>
<descr>
<p>
<var>TShape</var>: An arbitrary graphic geometrical shape placed on the Form. It may be one of a series of standard shapes defined by
<var>TShapeType</var> (stRectangle, stSquare, stRoundRect, stRoundSquare, stEllipse, stCircle, stSquaredDiamond, stDiamond).</p>
<p>It can be displayed using the <var>Paint</var> method and the <var>Brush</var> and <var>Pen</var> tools.</p>
</descr>
</element>
<!-- variable Visibility: private -->
<element name="TShape.FPen">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TShape.FBrush">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TShape.FShape">
<short/>
<descr/>
<seealso/>
</element>
<!-- procedure Visibility: private -->
<element name="TShape.SetBrush">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TShape.SetBrush.Value">
<short/>
</element>
<!-- procedure Visibility: private -->
<element name="TShape.SetPen">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TShape.SetPen.Value">
<short/>
</element>
<!-- procedure Visibility: private -->
<element name="TShape.SetShape">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TShape.SetShape.Value">
<short/>
</element>
<!-- constructor Visibility: public -->
<element name="TShape.Create">
<short>
<var>Create</var> - constructor for <var>TShape</var>: calls inherited <var>Create</var>, sets default styles and bounds, creates pen and brush</short>
<descr/>
<errors/>
<seealso>
<link id="#LCL.Controls.TGraphicControl.Create">TGraphicControl.Create</link>
</seealso>
</element>
<!-- argument Visibility: default -->
<element name="TShape.Create.TheOwner">
<short/>
</element>
<!-- destructor Visibility: public -->
<element name="TShape.Destroy">
<short>
<var>Destroy</var> - destructor for <var>TShape</var>: frees pen and brush, then calls inherited <var>Destroy</var>
</short>
<descr/>
<errors/>
<seealso>
<link id="#LCL.Controls.TGraphicControl.Destroy">TGraphicControl.Destroy</link>
</seealso>
</element>
<!-- procedure Visibility: public -->
<element name="TShape.Paint" link="#LCL.Controls.TGraphicControl.Paint">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- procedure Visibility: public -->
<element name="TShape.StyleChanged">
<short>
<var>StyleChanged</var> - method for handling change of style by Sender</short>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TShape.StyleChanged.Sender">
<short/>
</element>
<!-- property Visibility: published -->
<element name="TShape.Align" link="#LCL.Controls.TControl.Align">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TShape.Anchors" link="#LCL.Controls.TControl.Anchors">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TShape.BorderSpacing" link="#LCL.Controls.TControl.BorderSpacing">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TShape.Brush">
<short>The Brush to be used for colouring this shape</short>
</element>
<!-- property Visibility: published -->
<element name="TShape.Constraints" link="#LCL.Controls.TControl.Constraints">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TShape.DragCursor" link="#LCL.Controls.TControl.DragCursor">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TShape.DragKind" link="#LCL.Controls.TControl.DragKind">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TShape.DragMode" link="#LCL.Controls.TControl.DragMode">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TShape.Enabled" link="#LCL.Controls.TControl.Enabled">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TShape.ParentShowHint" link="#LCL.Controls.TControl.ParentShowHint">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TShape.Pen">
<short>The Pen to be used for drawing this shape</short>
</element>
<!-- property Visibility: published -->
<element name="TShape.OnChangeBounds" link="#LCL.Controls.TControl.OnChangeBounds">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TShape.OnMouseDown" link="#LCL.Controls.TControl.OnMouseDown">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TShape.OnMouseMove" link="#LCL.Controls.TControl.OnMouseMove">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TShape.OnMouseUp" link="#LCL.Controls.TControl.OnMouseUp">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TShape.OnResize" link="#LCL.Controls.TControl.OnResize">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TShape.Shape">
<short>Which <var>Shape</var>? (Rectangle, Square, RoundRect, RoundSquare, Ellipse, Circle, SquaredDiamond, Diamond)</short>
<descr>
<p>Which <var>Shape</var>? </p>
<p>stRectangle,</p>
<p>stSquare,</p>
<p>stRoundRect,</p>
<p>stRoundSquare,</p>
<p>stEllipse,</p>
<p>stCircle,</p>
<p>stSquaredDiamond,</p>
<p>stDiamond</p>
</descr>
</element>
<!-- property Visibility: published -->
<element name="TShape.ShowHint" link="#LCL.Controls.TControl.ShowHint">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TShape.Visible" link="#LCL.Controls.TControl.Visible">
<short/>
<descr/>
<seealso/>
</element>
<!-- enumeration type Visibility: default -->
<element name="TResizeStyle">
<short>
<var>TResizeStyle</var> - enumerated type for style of resizing using splitters</short>
<descr>
<var>rsLine</var> - draw a line, don't update splitter position during moving
<var>rsNone</var> - draw nothing and don't update splitter position during moving
<var>rsPattern</var> - draw a dot pattern, don't update splitter position during moving
<var>rsUpdate</var> - draw nothing, update splitter position during moving </descr>
<seealso/>
</element>
<!-- enumeration value Visibility: default -->
<element name="TResizeStyle.rsLine">
<short/>
</element>
<!-- enumeration value Visibility: default -->
<element name="TResizeStyle.rsNone">
<short/>
</element>
<!-- enumeration value Visibility: default -->
<element name="TResizeStyle.rsPattern">
<short/>
</element>
<!-- enumeration value Visibility: default -->
<element name="TResizeStyle.rsUpdate">
<short/>
</element>
<!-- procedure type Visibility: default -->
<element name="TCanResizeEvent">
<short>
<var>TCanResizeEvent</var> - generic event handling method for resizing using splitter</short>
<descr/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCanResizeEvent.Sender">
<short/>
</element>
<!-- argument Visibility: default -->
<element name="TCanResizeEvent.NewSize">
<short/>
</element>
<!-- argument Visibility: default -->
<element name="TCanResizeEvent.Accept">
<short/>
</element>
<!-- object Visibility: default -->
<element name="TCustomSplitter">
<short>
<var>TCustomSplitter</var> : the base type for
<var>TSplitter</var>
</short>
<descr>
<p>
<var>TCustomSplitter</var>: the base type for
<var>TSplitter</var>
</p>
<p>A Splitter is a vertical or horizontal bar that can be placed on a panel or form, to separate sub-panels functionally and allow re-sizing of the constituent sub-panels</p>
<p>This class defines many of the basic properties for the children classes, such as positioning, sizing and alignment</p>
<pre>{ TCustomSplitter is a control for interactively resizing another control.
It is a vertical or horizontal bar anchored to a side of a control.
You can either set the Align property to alLeft (alRight,alTop,alBottom),
then it will become a vertical bar, aligned to the left and when the user
moves it with the mouse, the control to the left with the same Align=alLeft
will be resized.
The second more flexible possibility is to set the properties Align=alNone,
AnchorSides and ResizeAnchor.
} </pre>
</descr>
</element>
<!-- variable Visibility: private -->
<element name="TCustomSplitter.FMouseInControl">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomSplitter.FResizeAnchor">
<short/>
<descr/>
<seealso/>
</element>
<!-- function Visibility: private -->
<element name="TCustomSplitter.GetResizeControl">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- function result Visibility: default -->
<element name="TCustomSplitter.GetResizeControl.Result">
<short/>
</element>
<!-- procedure Visibility: private -->
<element name="TCustomSplitter.SetResizeAnchor">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomSplitter.SetResizeAnchor.AValue">
<short/>
</element>
<!-- procedure Visibility: private -->
<element name="TCustomSplitter.SetResizeControl">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomSplitter.SetResizeControl.AValue">
<short/>
</element>
<!-- function Visibility: protected -->
<element name="TCustomSplitter.FindAlignOtherControl">
<short>
<var>FindAlignOtherControl</var> - returns another alignment control (the splitter may have to align two controls)</short>
<descr/>
<errors/>
<seealso/>
</element>
<!-- function result Visibility: default -->
<element name="TCustomSplitter.FindAlignOtherControl.Result">
<short/>
</element>
<!-- procedure Visibility: protected -->
<element name="TCustomSplitter.MouseEnter" link="#LCL.Controls.TControl.MouseEnter">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- procedure Visibility: protected -->
<element name="TCustomSplitter.MouseLeave">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomSplitter.AnchorSplitter.Kind">
<short/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomSplitter.AnchorSplitter.AControl">
<short/>
</element>
<!-- function result Visibility: default -->
<element name="TCustomSplitter.GetOtherResizeControl.Result">
<short/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomSplitter.MoveSplitter.Offset">
<short/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomSplitter.SetSplitterPosition.NewPosition">
<short/>
</element>
<!-- function result Visibility: default -->
<element name="TCustomSplitter.GetSplitterPosition.Result">
<short/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomSplitter.FAutoSnap">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomSplitter.FBeveled">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomSplitter.FMinSize">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomSplitter.FOnCanResize">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomSplitter.FOnMoved">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomSplitter.FResizeStyle">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomSplitter.FSplitDragging">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomSplitter.fSplitterStartMouseXY">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomSplitter.fSplitterStartLeftTop">
<short/>
<descr/>
<seealso/>
</element>
<!-- procedure Visibility: private -->
<element name="TCustomSplitter.SetAutoSnap">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomSplitter.SetAutoSnap.AValue">
<short/>
</element>
<!-- procedure Visibility: private -->
<element name="TCustomSplitter.SetBeveled">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomSplitter.SetBeveled.AValue">
<short/>
</element>
<!-- procedure Visibility: private -->
<element name="TCustomSplitter.SetMinSize">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomSplitter.SetMinSize.AValue">
<short/>
</element>
<!-- procedure Visibility: private -->
<element name="TCustomSplitter.SetResizeStyle">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomSplitter.SetResizeStyle.AValue">
<short/>
</element>
<!-- procedure Visibility: protected -->
<element name="TCustomSplitter.StartSplitterMove">
<short>
<var>StartSplitterMove</var> - method for starting movement of the splitter, given the mouse position <var>MouseXY</var>
</short>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomSplitter.StartSplitterMove.Restart">
<short/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomSplitter.StartSplitterMove.MouseXY">
<short/>
</element>
<!-- procedure Visibility: protected -->
<element name="TCustomSplitter.MouseDown" link="#LCL.Controls.TControl.MouseDown">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomSplitter.MouseDown.Button">
<short/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomSplitter.MouseDown.Shift">
<short/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomSplitter.MouseDown.X">
<short/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomSplitter.MouseDown.Y">
<short/>
</element>
<!-- procedure Visibility: protected -->
<element name="TCustomSplitter.MouseMove" link="#LCL.Controls.TControl.MouseMove">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomSplitter.MouseMove.Shift">
<short/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomSplitter.MouseMove.X">
<short/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomSplitter.MouseMove.Y">
<short/>
</element>
<!-- procedure Visibility: protected -->
<element name="TCustomSplitter.MouseUp" link="#LCL.Controls.TControl.MouseUp">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomSplitter.MouseUp.Button">
<short/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomSplitter.MouseUp.Shift">
<short/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomSplitter.MouseUp.X">
<short/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomSplitter.MouseUp.Y">
<short/>
</element>
<!-- function Visibility: protected -->
<element name="TCustomSplitter.FindAlignControl">
<short>
<var>FindAlignControl</var> - returns the main alignment control</short>
<descr/>
<errors/>
<seealso/>
</element>
<!-- function result Visibility: default -->
<element name="TCustomSplitter.FindAlignControl.Result">
<short/>
</element>
<!-- procedure Visibility: protected -->
<element name="TCustomSplitter.SetAlign" link="#LCL.Controls.TControl.SetAlign">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomSplitter.SetAlign.Value">
<short/>
</element>
<!-- procedure Visibility: protected -->
<element name="TCustomSplitter.SetAnchors" link="#LCL.Controls.TControl.SetAnchors">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomSplitter.SetAnchors.AValue">
<short/>
</element>
<!-- procedure Visibility: protected -->
<element name="TCustomSplitter.CheckAlignment">
<short>
<var>CheckAlignment</var> - ensure control is correctly aligned</short>
<descr/>
<errors/>
<seealso/>
</element>
<!-- function Visibility: protected -->
<element name="TCustomSplitter.CheckNewSize">
<short>
<var>CheckNewSize</var> - ensure new size is appropriate: returns True if sucessful</short>
<descr/>
<errors/>
<seealso/>
</element>
<!-- function result Visibility: default -->
<element name="TCustomSplitter.CheckNewSize.Result">
<short/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomSplitter.CheckNewSize.NewSize">
<short/>
</element>
<!-- procedure Visibility: protected -->
<element name="TCustomSplitter.Paint" link="#LCL.Controls.TCustomControl.Paint">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- constructor Visibility: public -->
<element name="TCustomSplitter.Create">
<short>
<var>Create</var> - constructor for <var>TCustomSplitter</var>: calls inherited <var>Create</var> then sets initial alignment, size and style</short>
<descr/>
<errors/>
<seealso>
<link id="#LCL.Controls.TCustomControl.Create">TCustomControl.Create</link>
</seealso>
</element>
<!-- argument Visibility: default -->
<element name="TCustomSplitter.Create.TheOwner">
<short/>
</element>
<!-- property Visibility: public -->
<element name="TCustomSplitter.Align" link="#LCL.Controls.TControl.Align">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: public -->
<element name="TCustomSplitter.ResizeStyle">
<short>Style for resizing - as a line, a pattern, full update, or none</short>
</element>
<!-- property Visibility: public -->
<element name="TCustomSplitter.AutoSnap">
<short>AutoSnap - automatically snaps to a grid point or grid line in the Form designer</short>
<descr>Boolean property, true if snapping to grid positions</descr>
</element>
<!-- property Visibility: public -->
<element name="TCustomSplitter.Beveled">
<short>Whether the edges of the splitter bar are bevelled</short>
</element>
<!-- property Visibility: public -->
<element name="TCustomSplitter.MinSize">
<short>Minimum size for splitter - default 30 pixels</short>
</element>
<!-- property Visibility: public -->
<element name="TCustomSplitter.OnCanResize">
<short>Event handler for receiving permission to resize</short>
</element>
<!-- property Visibility: public -->
<element name="TCustomSplitter.OnMoved">
<short>Event handler for occasion when splitter has moved</short>
</element>
<!-- property Visibility: public -->
<element name="TCustomSplitter.Width">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: public -->
<element name="TCustomSplitter.Cursor" link="#LCL.Controls.TControl.Cursor">
<short/>
<descr/>
<seealso/>
</element>
<element name="TCustomSplitter.AnchorSplitter">
<short>
<var>AnchorSplitter</var> - anchor the splitter to <var>Acontrol </var>using the specified <var>Kind </var>of anchor</short>
</element>
<element name="TCustomSplitter.ResizeControl">
<short>
<var>ResizeControl</var> - the control that is to be re-sized with the splitter</short>
</element>
<element name="TCustomSplitter.GetOtherResizeControl">
<short>
<var>GetOtherResizeControl</var> - find out which other control is to be re-sized</short>
</element>
<element name="TCustomSplitter.MoveSplitter">
<short>
<var>MoveSplitter</var> - by an amount specified by <var>Offset</var>
</short>
</element>
<element name="TCustomSplitter.SetSplitterPosition">
<short>
<var>SetSplitterPosition</var> - to specified <var>NewPosition</var>
</short>
</element>
<element name="TCustomSplitter.GetSplitterPosition">
<short>
<var>GetSplitterPosition</var> - returns the current position of the splitter</short>
</element>
<element name="TCustomSplitter.ResizeAnchor">
<short>
<var>ResizeAnchor</var> - the kind of anchor to be used for resizing</short>
<descr>akLeft for a vertical splitter, akTop for a horizontal splitter.</descr>
</element>
<!-- object Visibility: default -->
<element name="TSplitter">
<short>
<var>TSplitter</var> : A vertical or horizontal bar placed on a panel or form, to separate sub-panels functionally</short>
<descr>
<p>
<var>TSplitter</var>: A vertical or horizontal bar that can be placed on a panel or form, to separate sub-panels functionally and allow re-sizing of the constituent sub-panels</p>
<p>The splitter extends for the full height (if vertical) or full width (if horizontal) of the parent control (form or panel) and is anchored to the edges; its position along the length or height of the parent is determined by the programmer or user by moving the whole control with the mouse, and its size can be adjusted using the sizing bars and with the <var>ResizeAnchor</var> property </p>
</descr>
<seealso>
<link id="#lcl.StdCtrls.HowToUseStdCtrls">HowToUseStdCtrls</link>
</seealso>
</element>
<!-- property Visibility: published -->
<element name="TSplitter.Align" link="#LCL.Controls.TControl.Align">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TSplitter.Anchors" link="#LCL.Controls.TControl.Anchors">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TSplitter.AutoSnap" link="#LCL.ExtCtrls.TCustomSplitter.AutoSnap">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TSplitter.Beveled" link="#LCL.ExtCtrls.TCustomSplitter.Beveled">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TSplitter.Color" link="#LCL.Controls.TControl.Color">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TSplitter.Constraints" link="#LCL.Controls.TControl.Constraints">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TSplitter.Cursor" link="#LCL.Controls.TControl.Cursor">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TSplitter.Height" link="#LCL.Controls.TControl.Height">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TSplitter.MinSize" link="#LCL.ExtCtrls.TCustomSplitter.MinSize">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TSplitter.ParentColor" link="#LCL.Controls.TControl.ParentColor">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TSplitter.ParentShowHint" link="#LCL.Controls.TControl.ParentShowHint">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TSplitter.ResizeStyle" link="#LCL.ExtCtrls.TCustomSplitter.ResizeStyle">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TSplitter.ShowHint" link="#LCL.Controls.TControl.ShowHint">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TSplitter.Visible" link="#LCL.Controls.TControl.Visible">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TSplitter.Width" link="#LCL.Controls.TControl.Width">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TSplitter.OnCanResize" link="#LCL.ExtCtrls.TCustomSplitter.OnCanResize">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TSplitter.OnChangeBounds" link="#LCL.Controls.TControl.OnChangeBounds">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TSplitter.OnMoved" link="#LCL.ExtCtrls.TCustomSplitter.OnMoved">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TSplitter.PopupMenu" link="#LCL.Controls.TControl.PopupMenu">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TSplitter.ResizeAnchor" link="#LCL.ExtCtrls.TCustomSplitter.ResizeAnchor">
<short/>
<descr/>
<seealso/>
</element>
<!-- object Visibility: default -->
<element name="TPaintBox">
<short>
<var>TPaintBox</var>: a painted rectangular box with defined size and color</short>
<descr>
<p>
<var>TPaintBox</var>: a painted rectangular box with defined size and colour</p>
</descr>
<seealso>
<link id="#lcl.StdCtrls.HowToUseStdCtrls">HowToUseStdCtrls</link>
</seealso>
</element>
<!-- variable Visibility: private -->
<element name="TPaintBox.FOnPaint">
<short/>
<descr/>
<seealso/>
</element>
<!-- procedure Visibility: protected -->
<element name="TPaintBox.Paint" link="#LCL.Controls.TGraphicControl.Paint">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- constructor Visibility: public -->
<element name="TPaintBox.Create">
<short>
<var>Create</var> - constructor for <var>TPaintBox</var>: calls inherited <var>Create</var> then sets initial bounds and style</short>
<descr/>
<errors/>
<seealso>
<link id="#LCL.Controls.TGraphicControl.Create">TGraphicControl.Create</link>
</seealso>
</element>
<!-- argument Visibility: default -->
<element name="TPaintBox.Create.AOwner">
<short/>
</element>
<!-- property Visibility: public -->
<element name="TPaintBox.Canvas" link="#LCL.Controls.TGraphicControl.Canvas">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPaintBox.Align" link="#LCL.Controls.TControl.Align">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPaintBox.Anchors" link="#LCL.Controls.TControl.Anchors">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPaintBox.BorderSpacing" link="#LCL.Controls.TControl.BorderSpacing">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPaintBox.Color" link="#LCL.Controls.TControl.Color">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPaintBox.Constraints" link="#LCL.Controls.TControl.Constraints">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPaintBox.Enabled" link="#LCL.Controls.TControl.Enabled">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPaintBox.Font" link="#LCL.Controls.TControl.Font">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPaintBox.Hint" link="#LCL.Controls.TControl.Hint">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPaintBox.ParentColor" link="#LCL.Controls.TControl.ParentColor">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPaintBox.ParentFont" link="#LCL.Controls.TControl.ParentFont">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPaintBox.ParentShowHint" link="#LCL.Controls.TControl.ParentShowHint">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPaintBox.PopupMenu" link="#LCL.Controls.TControl.PopupMenu">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPaintBox.ShowHint" link="#LCL.Controls.TControl.ShowHint">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPaintBox.Visible" link="#LCL.Controls.TControl.Visible">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPaintBox.OnChangeBounds" link="#LCL.Controls.TControl.OnChangeBounds">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPaintBox.OnClick" link="#LCL.Controls.TControl.OnClick">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPaintBox.OnDblClick" link="#LCL.Controls.TControl.OnDblClick">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPaintBox.OnMouseDown" link="#LCL.Controls.TControl.OnMouseDown">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPaintBox.OnMouseMove" link="#LCL.Controls.TControl.OnMouseMove">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPaintBox.OnMouseUp" link="#LCL.Controls.TControl.OnMouseUp">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPaintBox.OnMouseEnter" link="#LCL.Controls.TControl.OnMouseEnter">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPaintBox.OnMouseLeave" link="#LCL.Controls.TControl.OnMouseLeave">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPaintBox.OnPaint" link="#LCL.Controls.TGraphicControl.OnPaint">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPaintBox.OnResize" link="#LCL.Controls.TControl.OnResize">
<short/>
<descr/>
<seealso/>
</element>
<!-- object Visibility: default -->
<element name="TCustomImage">
<short>
<var>TCustomImage</var> - the base type for
<var>TImage</var>
</short>
<descr>
<var>TCustomImage</var>
: The base type for
<var>TImage</var>
. This is a control of the class
<var>TGraphicControl</var>
, designed to be lightweight and fast</descr>
<seealso>
<link id="#lcl.Controls.TGraphicControl">TGraphicControl</link>
</seealso>
</element>
<!-- variable Visibility: private -->
<element name="TCustomImage.FPicture">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomImage.FCenter">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomImage.FProportional">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomImage.FTransparent">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomImage.FStretch">
<short/>
<descr/>
<seealso/>
</element>
<!-- procedure Visibility: private -->
<element name="TCustomImage.SetPicture">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomImage.SetPicture.AValue">
<short/>
</element>
<!-- procedure Visibility: private -->
<element name="TCustomImage.SetCenter">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomImage.SetCenter.Value">
<short/>
</element>
<!-- procedure Visibility: private -->
<element name="TCustomImage.SetProportional">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomImage.SetProportional.AValue">
<short/>
</element>
<!-- procedure Visibility: private -->
<element name="TCustomImage.SetStretch">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomImage.SetStretch.Value">
<short/>
</element>
<!-- procedure Visibility: private -->
<element name="TCustomImage.SetTransparent">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomImage.SetTransparent.Value">
<short/>
</element>
<!-- procedure Visibility: private -->
<element name="TCustomImage.PictureChanged">
<short>
<var>PictureChanged</var> - software emulaton of the <var>OnPictureChanged</var> event</short>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomImage.PictureChanged.SEnder">
<short/>
</element>
<!-- function Visibility: protected -->
<element name="TCustomImage.DestRect">
<short>
<var>DestRect</var> - returns the location of the destination rectangle</short>
<descr/>
<errors/>
<seealso/>
</element>
<!-- function result Visibility: default -->
<element name="TCustomImage.DestRect.Result">
<short/>
</element>
<!-- procedure Visibility: protected -->
<element name="TCustomImage.DoAutoSize" link="#LCL.Controls.TControl.DoAutoSize">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- procedure Visibility: protected -->
<element name="TCustomImage.Paint" link="#LCL.Controls.TGraphicControl.Paint">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- constructor Visibility: public -->
<element name="TCustomImage.Create">
<short>
<var>Create</var> - constructor for <var>TCustomImage</var>: calls inherited <var>Create</var> then sets default style, bounds and local variables: creates space for the picture</short>
<descr/>
<errors/>
<seealso>
<link id="#LCL.Controls.TGraphicControl.Create">TGraphicControl.Create</link>
</seealso>
</element>
<!-- argument Visibility: default -->
<element name="TCustomImage.Create.TheOwner">
<short/>
</element>
<!-- destructor Visibility: public -->
<element name="TCustomImage.Destroy">
<short>
<var>Destroy</var> - destructor for <var>TCustomImage</var>: frees picture then calls inherited <var>Destroy</var>
</short>
<descr/>
<errors/>
<seealso>
<link id="#LCL.Controls.TGraphicControl.Destroy">TGraphicControl.Destroy</link>
</seealso>
</element>
<!-- property Visibility: public -->
<element name="TCustomImage.Align" link="#LCL.Controls.TControl.Align">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: public -->
<element name="TCustomImage.AutoSize" link="#LCL.Controls.TControl.AutoSize">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: public -->
<element name="TCustomImage.Center">
<short>Should image be centered?</short>
<descr>Boolean property - True if image is to be centered</descr>
</element>
<!-- property Visibility: public -->
<element name="TCustomImage.Constraints" link="#LCL.Controls.TControl.Constraints">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: public -->
<element name="TCustomImage.Picture">
<short>
<var>Picture </var>
- the actual image for display</short>
</element>
<!-- property Visibility: public -->
<element name="TCustomImage.Visible" link="#LCL.Controls.TControl.Visible">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: public -->
<element name="TCustomImage.OnClick" link="#LCL.Controls.TControl.OnClick">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: public -->
<element name="TCustomImage.OnMouseDown" link="#LCL.Controls.TControl.OnMouseDown">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: public -->
<element name="TCustomImage.OnMouseMove" link="#LCL.Controls.TControl.OnMouseMove">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: public -->
<element name="TCustomImage.OnMouseUp" link="#LCL.Controls.TControl.OnMouseUp">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: public -->
<element name="TCustomImage.Stretch">
<short>True if picture is to be stretched</short>
</element>
<!-- property Visibility: public -->
<element name="TCustomImage.Transparent">
<short>True if you can see through the image</short>
</element>
<!-- property Visibility: public -->
<element name="TCustomImage.Proportional">
<short>True if image is proportional</short>
</element>
<!-- object Visibility: default -->
<element name="TImage">
<short>
<var>TImage</var> - a graphic image placed on the form; usually loaded from a picture file.</short>
<descr>
<p>
<var>TImage</var>
: a graphic image placed on the form; usually loaded from a picture file.</p>
<p>The actual image is found in <var>Picture</var> or <var>Canvas</var>
</p>
<p>Inherits most of its properties from its ancestors, <link id="#lcl.ExtCtrls.TCustomImage">TCustomImage</link>, <link id="#lcl.Controls.TGraphicControl">TGraphicControl</link> and <link id="#lcl.Controls.TControl">TControl</link>
</p>
</descr>
<seealso>
<link id="#lcl.StdCtrls.HowToUseStdCtrls">HowToUseStdCtrls</link>
</seealso>
</element>
<!-- property Visibility: published -->
<element name="TImage.Align" link="#LCL.Controls.TControl.Align">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TImage.Anchors" link="#lcl.Controls.TControl.Anchors">
<short/>
<descr/>
<seealso>
<link id="#lclControls.TControl.Anchors"/>
</seealso>
</element>
<!-- property Visibility: published -->
<element name="TImage.AutoSize" link="#LCL.Controls.TControl.AutoSize">
<short/>
<descr/>
<seealso>
<link id="#LCL.Controls.TControl.AutoSize">TControl.AutoSize</link>
</seealso>
</element>
<!-- property Visibility: published -->
<element name="TImage.BorderSpacing" link="#LCL.Controls.TControl.BorderSpacing">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TImage.Center" link="#lcl.ExtCtrls.TCustomImage.Center">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TImage.Constraints" link="#LCL.Controls.TControl.Constraints">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TImage.OnChangeBounds" link="#LCL.Controls.TControl.OnChangeBounds">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TImage.OnClick" link="#LCL.Controls.TControl.OnClick">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TImage.OnMouseDown" link="#LCL.Controls.TControl.OnMouseDown">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TImage.OnMouseEnter" link="#LCL.Controls.TControl.OnMouseEnter">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TImage.OnMouseLeave" link="#LCL.Controls.TControl.OnMouseLeave">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TImage.OnMouseMove" link="#LCL.Controls.TControl.OnMouseMove">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TImage.OnMouseUp" link="#LCL.Controls.TControl.OnMouseUp">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TImage.OnPaint" link="#LCL.Controls.TGraphicControl.OnPaint">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TImage.OnResize" link="#LCL.Controls.TControl.OnResize">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TImage.Picture" link="#lcl.ExtCtrls.TCustomImage.Picture"/>
<!-- property Visibility: published -->
<element name="TImage.Proportional" link="#lcl.ExtCtrls.TCustomImage.Proportional">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TImage.Stretch" link="#lcl.ExtCtrls.TCustomImage.Stretch">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TImage.Transparent" link="#lcl.ExtCtrls.TCustomImage.Transparent">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TImage.Visible" link="#LCL.Controls.TControl.Visible">
<short/>
<descr/>
<seealso/>
</element>
<!-- enumeration type Visibility: default -->
<element name="TBevelStyle">
<short>
<var>TBevelStyle</var> - enumerated type for bevel style: lowered or raised</short>
<descr/>
<seealso/>
</element>
<!-- enumeration value Visibility: default -->
<element name="TBevelStyle.bsLowered">
<short/>
</element>
<!-- enumeration value Visibility: default -->
<element name="TBevelStyle.bsRaised">
<short/>
</element>
<!-- enumeration type Visibility: default -->
<element name="TBevelShape">
<short>
<var>TBevelShape</var> - enumerated type for shape of bevel</short>
<descr>
<p>
<var>TBevelShape</var> - enumerated type for shape of bevel</p>
<pre>bsBox
bsFrame
bsTopLine
bsBottomLine
bsLeftLine
bsRightLine
</pre>
</descr>
<seealso/>
</element>
<!-- enumeration value Visibility: default -->
<element name="TBevelShape.bsBox">
<short/>
</element>
<!-- enumeration value Visibility: default -->
<element name="TBevelShape.bsFrame">
<short/>
</element>
<!-- enumeration value Visibility: default -->
<element name="TBevelShape.bsTopLine">
<short/>
</element>
<!-- enumeration value Visibility: default -->
<element name="TBevelShape.bsBottomLine">
<short/>
</element>
<!-- enumeration value Visibility: default -->
<element name="TBevelShape.bsLeftLine">
<short/>
</element>
<!-- enumeration value Visibility: default -->
<element name="TBevelShape.bsRightLine">
<short/>
</element>
<!-- object Visibility: default -->
<element name="TBevel">
<short>A bevel placed around the edge of buttons and other components</short>
<descr>
<p>Its appearance is governed by <link id="TBevelShape"/> and <link id="TBevelStyle"/>
</p>
</descr>
</element>
<!-- variable Visibility: private -->
<element name="TBevel.FStyle">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TBevel.FShape">
<short/>
<descr/>
<seealso/>
</element>
<!-- function Visibility: private -->
<element name="TBevel.GetStyle">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- function result Visibility: default -->
<element name="TBevel.GetStyle.Result">
<short/>
</element>
<!-- procedure Visibility: private -->
<element name="TBevel.SetStyle">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TBevel.SetStyle.aStyle">
<short/>
</element>
<!-- function Visibility: private -->
<element name="TBevel.GetShape">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- function result Visibility: default -->
<element name="TBevel.GetShape.Result">
<short/>
</element>
<!-- procedure Visibility: private -->
<element name="TBevel.SetShape">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TBevel.SetShape.aShape">
<short/>
</element>
<!-- procedure Visibility: protected -->
<element name="TBevel.Paint" link="#LCL.Controls.TGraphicControl.Paint">
<descr>Virtual <var>Paint</var> method called in response to paint requests received by the parent control.
</descr>
<errors/>
<seealso/>
</element>
<!-- constructor Visibility: public -->
<element name="TBevel.Create">
<descr/>
<errors/>
<seealso>
<link id="#LCL.Controls.TGraphicControl.Create">TGraphicControl.Create</link>
</seealso>
<short>
<var>Create</var> - constructor for <var>TBevel</var>: calls inherited <var>Create</var> then sets initial style, shape and bounds</short>
</element>
<!-- argument Visibility: default -->
<element name="TBevel.Create.AOwner">
<short/>
</element>
<!-- destructor Visibility: public -->
<element name="TBevel.Destroy" link="#LCL.Controls.TGraphicControl.Destroy">
<descr/>
<errors/>
<seealso/>
</element>
<!-- procedure Visibility: public -->
<element name="TBevel.Invalidate" link="#LCL.Controls.TControl.Invalidate">
<descr/>
<errors/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TBevel.Align" link="#LCL.Controls.TControl.Align">
<descr>
<p>Either reads a flag containing alignment instructions (<var>FAlign</var>) or writes alignment instructions (<var>SetAlign</var>)</p>
<p>May have no alignment, may have custom or client alignment, or can be aligned to top, bottom, left or right</p>
</descr>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TBevel.Anchors" link="#LCL.Controls.TControl.Anchors">
<descr>
<p>Determines how the control is to be anchored to its parent control</p>
<p>Either reads a flag containing the set of anchors to be used, or writes a set of anchors. If they have been written, this is indicated in <var>IsAnchorsStored</var>
</p>
</descr>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TBevel.BorderSpacing" link="#LCL.Controls.TControl.BorderSpacing">
<descr>
<p>Determines the border spacing for this control</p>
<p>Reads flag to find stored spacing values required for the border of the control, or writes the flag to set the spacing.</p>
<p>The properties are defined in the parent class <link id="#lcl.Controls.TControlBorderSpacing">TControlBorderSpacing</link>
</p>
</descr>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TBevel.Constraints" link="#LCL.Controls.TControl.Constraints">
<descr>
<p>Determine <var>Constraints</var> (max and min height and width) for this control; reads the size constraints or stores new ones.</p>
</descr>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TBevel.Height" link="#LCL.Controls.TControl.Height">
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TBevel.Left" link="#LCL.Controls.TControl.Left">
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TBevel.Name" link="#rtl.Classes.TComponent.Name">
<descr>
<var>Name</var> is the name of the component. This name should be a valid
identifier, i.e. must start with a letter, and can contain only letters,
digits and the underscore character. When attempting to set the name of a
component, the name will be checked for validity. Furthermore, when a
component is owned by another component, the name must be either empty
or must be unique among the child component names.
</descr>
<seealso/>
<errors>Attempting to set the name to an invalid value will result in an exception
being raised.
</errors>
</element>
<!-- property Visibility: published -->
<element name="TBevel.Shape">
<short>
<var>Shape</var> - whether a box, a frame or a line along one of the edges</short>
<seealso>
<link id="#lcl.ExtCtrls.TBevelShape"/>
</seealso>
</element>
<!-- property Visibility: published -->
<element name="TBevel.Top" link="#LCL.Controls.TControl.Top">
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TBevel.Style">
<short>
<var>Style</var> - whether raised or lowered</short>
<seealso>
<link id="#lcl.ExtCtrls.TBevelStyle"/>
</seealso>
</element>
<!-- property Visibility: published -->
<element name="TBevel.Visible" link="#LCL.Controls.TControl.Visible">
<descr>
<pre>The Visible property represents the ability to see a visual control.
If Visible is True the control is shown, otherwise it is hidden.
Calling Show sets, among others, Visible to True.
Setting Visible to False is equivalent to calling Hide method.</pre>
<remark>The Visible property does not depend on control's parent visibility. Use IsVisible method to consider this and get real visibility.</remark>
</descr>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TBevel.Width" link="#LCL.Controls.TControl.Width">
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TBevel.OnChangeBounds" link="#LCL.Controls.TControl.OnChangeBounds">
<descr>
</descr>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TBevel.OnResize" link="#LCL.Controls.TControl.OnResize">
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TBevel.OnMouseDown" link="#LCL.Controls.TControl.OnMouseDown">
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TBevel.OnMouseMove" link="#LCL.Controls.TControl.OnMouseMove">
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TBevel.OnMouseUp" link="#LCL.Controls.TControl.OnMouseUp">
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TBevel.OnPaint" link="#LCL.Controls.TGraphicControl.OnPaint">
<descr/>
<seealso/>
</element>
<!-- enumeration type Visibility: default -->
<element name="TColumnLayout">
<short>
<var>TColumnLayout</var> - enumerated type for layout where data are arranged in columns</short>
<descr/>
<seealso/>
</element>
<!-- enumeration value Visibility: default -->
<element name="TColumnLayout.clHorizontalThenVertical"/>
<!-- enumeration value Visibility: default -->
<element name="TColumnLayout.clVerticalThenHorizontal">
<short/>
</element>
<!-- object Visibility: default -->
<element name="TCustomRadioGroup">
<short>
<var>TCustomRadioGroup:</var> the base type for
<var>TRadioGroup</var>
</short>
<descr>
<p>A group of related but mutually exclusive radio buttons,
selectable by the user.</p>
<p>This class defines <var>Items</var>, where the captions of the individual radio boxes are stored,
<var>Rows</var> and <var>Columns</var> for arranging the radio boxes,
and ColumnLayout to determine whether the data are arranged
down the columns first, or across the rows first.</p>
</descr>
</element>
<!-- variable Visibility: private -->
<element name="TCustomRadioGroup.FButtonList">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomRadioGroup.FColumnLayout">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomRadioGroup.FHiddenButton">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomRadioGroup.FCreatingWnd">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomRadioGroup.FItems">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomRadioGroup.FItemIndex">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomRadioGroup.FColumns">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomRadioGroup.FReading">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomRadioGroup.FOnClick">
<short/>
<descr/>
<seealso/>
</element>
<!-- procedure Visibility: private -->
<element name="TCustomRadioGroup.ItemsChanged">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomRadioGroup.ItemsChanged.Sender">
<short/>
</element>
<!-- procedure Visibility: private -->
<element name="TCustomRadioGroup.Clicked">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomRadioGroup.Clicked.Sender">
<short/>
</element>
<!-- procedure Visibility: private -->
<element name="TCustomRadioGroup.DoPositionButtons">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- procedure Visibility: private -->
<element name="TCustomRadioGroup.SetColumnLayout">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomRadioGroup.SetColumnLayout.AValue">
<short/>
</element>
<!-- procedure Visibility: protected -->
<element name="TCustomRadioGroup.UpdateRadioButtonStates">
<short>
<var>UpdateRadioButtonStates</var> including implementing any pending changes</short>
<descr/>
<errors/>
<seealso/>
</element>
<!-- procedure Visibility: protected -->
<element name="TCustomRadioGroup.ReadState" link="#rtl.Classes.TComponent.ReadState">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomRadioGroup.ReadState.Reader">
<short/>
</element>
<!-- procedure Visibility: protected -->
<element name="TCustomRadioGroup.SetItem">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomRadioGroup.SetItem.Value">
<short/>
</element>
<!-- procedure Visibility: protected -->
<element name="TCustomRadioGroup.SetColumns">
<short>
<var>SetColumns</var> - specifies the number of columns for displaying the items</short>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomRadioGroup.SetColumns.Value">
<short/>
</element>
<!-- procedure Visibility: protected -->
<element name="TCustomRadioGroup.SetItemIndex">
<short>
<var>SetItemIndex</var> - specifies an index for an item</short>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomRadioGroup.SetItemIndex.Value">
<short/>
</element>
<!-- function Visibility: protected -->
<element name="TCustomRadioGroup.GetItemIndex">
<short>
<var>GetItemIndex</var> - returns an index for an item</short>
<descr/>
<errors/>
<seealso/>
</element>
<!-- function result Visibility: default -->
<element name="TCustomRadioGroup.GetItemIndex.Result">
<short/>
</element>
<!-- procedure Visibility: protected -->
<element name="TCustomRadioGroup.Resize">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- property Visibility: protected -->
<element name="TCustomRadioGroup.ItemIndex" link="#LCL.ExtCtrls.TCustomRadioGroup.ItemIndex">
<short>The Index value in the list of Items (a stringlist with the names of the selections for radio buttons)</short>
<descr/>
<seealso/>
</element>
<!-- property Visibility: protected -->
<element name="TCustomRadioGroup.Items">
<short>
<var>Items</var> - a string list containing the captions for the radio boxes</short>
</element>
<!-- property Visibility: protected -->
<element name="TCustomRadioGroup.Columns">
<short>
<var>Columns</var> - the number of columns in which the
<var>Items</var> (radio buttons) are to be arranges</short>
</element>
<!-- property Visibility: protected -->
<element name="TCustomRadioGroup.ColumnLayout">
<short>
<var>ColumnLayout</var> -
<var>HorizontalThenVertical </var> or vice versa</short>
</element>
<!-- property Visibility: protected -->
<element name="TCustomRadioGroup.OnClick">
<short>Event called when the selected item changes</short>
<descr><p>TCustomRadioGroup.OnClick is different from the usual event TControl.OnClick.
Instead of occuring on a mouse click on the control, this event is occurs when
the currently selected item changes. It will not occur if a click does not make the
selection change, will not occur upon clicking a already selected item and will occur
if one changes the selection via the keyboard. It also occurs when the item
is changed programmatically. This is done for Delphi compatibility.</p>
<p>Note that Lazarus also offers another event for the same task with a better name:
see TCustomRadioGroup.OnSelectionChanged for more details.</p>
</descr>
<seealso>
<link id="#LCL.Controls.TControl.OnClick"/>
<link id="TCustomRadioGroup.OnSelectionChanged"/>
</seealso>
</element>
<element name="TCustomRadioGroup.OnSelectionChanged">
<short>Event called when the selected item changes</short>
<descr><p>This event was introduced in Lazarus 0.9.31 and it is called when the selected item is changed.
It is triggered when this is done by the user via, for example the mouse or keyboard,
and is also triggered when the selected item is changed programatically.</p>
</descr>
<seealso>
<link id="TCustomRadioGroup.OnClick"/>
</seealso>
</element>
<!-- constructor Visibility: public -->
<element name="TCustomRadioGroup.Create">
<short>
<var>Create</var> - constructor for <var>TCustomRadioGroup</var>: calls inherited <var>Create</var>, then sets list of buttons, and initialises layout and sizing properties</short>
<descr/>
<errors/>
<seealso>
<link id="#LCL.StdCtrls.TCustomGroupBox.Create">TCustomGroupBox.Create</link>
</seealso>
</element>
<!-- argument Visibility: default -->
<element name="TCustomRadioGroup.Create.TheOwner">
<short/>
</element>
<!-- destructor Visibility: public -->
<element name="TCustomRadioGroup.Destroy">
<short>
<var>Destroy</var> - destructor for <var>TCustomRadioGroup</var>: frees items and buttons, then calls inherited <var>Destroy</var>
</short>
<descr/>
<errors/>
<seealso>
<link id="#LCL.Controls.TWinControl.Destroy">TWinControl.Destroy</link>
</seealso>
</element>
<!-- function Visibility: public -->
<element name="TCustomRadioGroup.CanModify">
<short>
<var>CanModify</var> - if True, modification of the RadioGroup is permitted</short>
<descr/>
<errors/>
<seealso/>
</element>
<!-- function result Visibility: default -->
<element name="TCustomRadioGroup.CanModify.Result">
<short/>
</element>
<!-- procedure Visibility: public -->
<element name="TCustomRadioGroup.CreateWnd">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- function Visibility: public -->
<element name="TCustomRadioGroup.Rows">
<short>
<var>Rows </var>- the number of rows in which Items (radio boxes) are held</short>
</element>
<!-- function result Visibility: default -->
<element name="TCustomRadioGroup.Rows.Result">
<short>Number of rows</short>
</element>
<!-- object Visibility: default -->
<element name="TRadioGroup">
<short>
<var>TRadioGroup</var> : A group of related but mutually exclusive radio buttons, requiring the user to select one af a set of alternatives</short>
<descr>
<p>
<var>TRadioGroup</var>: A group of related but mutually exclusive radio buttons, requiring the user to select one af a set of alternatives. As one button becomes selected, the remaining buttons in the group become automatically deselected.</p>
<p>To Use this control, place it in the required position on the form, then in the Object Inspector select <var>Items</var> and click on the ellipsis (...) to open the string editor. Type in the captions to accompany each check box, then close the string editor and you will see a series of Radio Boxes with their captions displayed beside them. (Note - unlike <link id="#lcl.ExtCtrls.TCheckGroup">TCheckGroup</link>, there is no special RadioGroup editor)</p>
<p>Inherits properties from <link id="#lcl.ExtCtrls.TCustomRadioGroup">TCustomRadioGroup</link> and <link id="#lcl.StdCtrls.TCustomGroupBox">TCustomGroupBox</link>
</p>
<p>
<var>TRadioGroup</var> behaves differently from a group of
<var>TRadioButton</var> controls placed arbitrarily around a form. </p>
<p>In the case of <var>TRadioButton</var>, the mutual exclusivity is a feature that applies to any <var>RadioButton</var> anywhere in the Form, and the <var>RadioButtons</var> can be rearranged in any order or placed anywhere within the containing <var>Form</var>, while in <var>TRadioGroup</var> the exclusivity applies only to buttons within the Group, which are ordered strictly according to their <var>ItemIndex</var> within the <var>Items</var> stringlist. </p>
<p>
<var>TRadioButton</var> is an entity in itself, with a number of additional properties, whereas the buttons within
<var>TRadioGroup</var> are not separate entities, but rather are simply entries in a list of strings, each of which is associated with the on-screen image of a
<var>RadioButton</var>. </p>
<p>The example shows the difference between the use of <var>TRadioButton</var> and <var>TRadioGroup</var>
</p>
</descr>
<seealso>
<link id="#lcl.StdCtrls.HowToUseStdCtrls">HowToUseStdCtrls</link>
<link id="#lcl.StdCtrls.TRadioButton">TRadioButton</link>
</seealso>
<example file="extctrls/radiobutton.pas"/>
</element>
<!-- property Visibility: published -->
<element name="TRadioGroup.Align" link="#LCL.Controls.TControl.Align">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TRadioGroup.Anchors" link="#LCL.Controls.TControl.Anchors">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TRadioGroup.BorderSpacing" link="#lcl.Controls.TControl.BorderSpacing">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TRadioGroup.Caption">
<short>
<var>Caption </var>- the text string appearing above the whole RadioGroup box</short>
</element>
<!-- property Visibility: published -->
<element name="TRadioGroup.ChildSizing" link="#LCL.Controls.TWinControl.ChildSizing">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TRadioGroup.Color" link="#LCL.Controls.TControl.Color">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TRadioGroup.ColumnLayout" link="#lcl.ExtCtrls.TCustomRadioGroup.ColumnLayout">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TRadioGroup.Columns" link="#lcl.ExtCtrls.TCustomRadioGroup.Columns">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TRadioGroup.Constraints" link="#LCL.Controls.TControl.Constraints">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TRadioGroup.Ctl3D" link="#LCL.Controls.TControl.Ctl3D">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TRadioGroup.Enabled" link="#LCL.Controls.TControl.Enabled">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TRadioGroup.ItemIndex" link="#lcl.ExtCtrls.TCustomRadioGroup.ItemIndex">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TRadioGroup.Items" link="#lcl.ExtCtrls.TCustomRadioGroup.Items">
<short>
<var>Items</var> - a string list containing the captions of the radio boxes</short>
<descr>
<p>
<var>Items</var> - a string list containing the captions of the radio boxes</p>
<p>Use the String List editor, opened by selecting <var>Items</var> and the ellipsis (...) in the Object Inspector, to insert the captions for the radio boxes, and determine their order and layout using the <var>Rows</var>, <var>Columns</var> and <var>ColumnLayout</var> properties
</p>
</descr>
</element>
<!-- property Visibility: published -->
<element name="TRadioGroup.OnChangeBounds" link="#LCL.Controls.TControl.OnChangeBounds">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TRadioGroup.OnClick" link="#LCL.ExtCtrls.TCustomRadioGroup.OnClick">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TRadioGroup.OnDblClick" link="#LCL.Controls.TControl.OnDblClick">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TRadioGroup.OnEnter" link="#LCL.Controls.TWinControl.OnEnter">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TRadioGroup.OnExit" link="#LCL.Controls.TWinControl.OnExit">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TRadioGroup.OnKeyDown" link="#LCL.Controls.TWinControl.OnKeyDown">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TRadioGroup.OnKeyPress" link="#LCL.Controls.TWinControl.OnKeyPress">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TRadioGroup.OnKeyUp" link="#LCL.Controls.TWinControl.OnKeyUp">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TRadioGroup.OnMouseDown" link="#LCL.Controls.TControl.OnMouseDown">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TRadioGroup.OnMouseMove" link="#LCL.Controls.TControl.OnMouseMove">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TRadioGroup.OnMouseUp" link="#LCL.Controls.TControl.OnMouseUp">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TRadioGroup.OnResize" link="#LCL.Controls.TControl.OnResize">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TRadioGroup.OnSelectionChanged" link="#lcl.ExtCtrls.TCustomRadioGroup.OnSelectionChanged"/>
<!-- property Visibility: published -->
<element name="TRadioGroup.ParentColor">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TRadioGroup.ParentCtl3D" link="#LCL.Controls.TWinControl.ParentCtl3D">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TRadioGroup.ParentShowHint" link="#LCL.Controls.TControl.ParentShowHint">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TRadioGroup.PopupMenu" link="#LCL.Controls.TControl.PopupMenu">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TRadioGroup.ShowHint" link="#lcl.Controls.TControl.ShowHint">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TRadioGroup.Visible" link="#LCL.Controls.TControl.Visible">
<short/>
<descr/>
<seealso/>
</element>
<!-- procedure type Visibility: default -->
<element name="TCheckGroupClicked">
<short>
<var>TCheckGroupClicked</var> - generic event handler method for a click in a check group</short>
<descr/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCheckGroupClicked.Sender">
<short/>
</element>
<!-- argument Visibility: default -->
<element name="TCheckGroupClicked.Index">
<short/>
</element>
<!-- object Visibility: default -->
<element name="TCustomCheckGroup">
<short>
<var>TCustomCheckGroup</var>: The base type for
<var>TCheckGroup</var>
</short>
<descr>
<p>
<var>TCustomCheckGroup</var>: The base type for
<var>TCheckGroup</var>
</p>
<p>This class defines <var>Items</var>, where the captions for individual check boxes are stored, <var>Rows</var> and <var>Columns</var> for arranging the check boxes, and ColumnLayout to determine whether the data are arranged down the columns first, or across the rows first.</p>
</descr>
<seealso>
<link id="#lcl.StdCtrls.TCustomGroupBox">TCustomGroupBox</link>
</seealso>
</element>
<!-- variable Visibility: private -->
<element name="TCustomCheckGroup.FButtonList">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomCheckGroup.FColumnLayout">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomCheckGroup.FCreatingWnd">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomCheckGroup.FItems">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomCheckGroup.FColumns">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomCheckGroup.FOnItemClick">
<short/>
<descr/>
<seealso/>
</element>
<!-- function Visibility: private -->
<element name="TCustomCheckGroup.GetChecked">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- function result Visibility: default -->
<element name="TCustomCheckGroup.GetChecked.Result">
<short/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomCheckGroup.GetChecked.Index">
<short/>
</element>
<!-- function Visibility: private -->
<element name="TCustomCheckGroup.GetCheckEnabled">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- function result Visibility: default -->
<element name="TCustomCheckGroup.GetCheckEnabled.Result">
<short/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomCheckGroup.GetCheckEnabled.Index">
<short/>
</element>
<!-- procedure Visibility: private -->
<element name="TCustomCheckGroup.Clicked">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomCheckGroup.Clicked.Sender">
<short/>
</element>
<!-- procedure Visibility: private -->
<element name="TCustomCheckGroup.DoClick">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomCheckGroup.DoClick.Index">
<short/>
</element>
<!-- procedure Visibility: private -->
<element name="TCustomCheckGroup.DoPositionButtons">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- procedure Visibility: private -->
<element name="TCustomCheckGroup.ItemsChanged">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomCheckGroup.ItemsChanged.Sender">
<short/>
</element>
<!-- procedure Visibility: private -->
<element name="TCustomCheckGroup.SetChecked">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomCheckGroup.SetChecked.Index">
<short/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomCheckGroup.SetChecked.AValue">
<short/>
</element>
<!-- procedure Visibility: private -->
<element name="TCustomCheckGroup.SetCheckEnabled">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomCheckGroup.SetCheckEnabled.Index">
<short/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomCheckGroup.SetCheckEnabled.AValue">
<short/>
</element>
<!-- procedure Visibility: private -->
<element name="TCustomCheckGroup.SetColumnLayout">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomCheckGroup.SetColumnLayout.AValue">
<short/>
</element>
<!-- procedure Visibility: private -->
<element name="TCustomCheckGroup.UpdateItems">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- procedure Visibility: protected -->
<element name="TCustomCheckGroup.SetItems">
<short>
<var>SetItems</var> - specify the strings that form the Items of the group</short>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomCheckGroup.SetItems.Value">
<short/>
</element>
<!-- procedure Visibility: protected -->
<element name="TCustomCheckGroup.SetColumns">
<short>
<var>SetColumns</var> - specifies the nuber of coulmns in which the Items are arranged</short>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomCheckGroup.SetColumns.Value">
<short/>
</element>
<!-- procedure Visibility: protected -->
<element name="TCustomCheckGroup.DefineProperties">
<short>
<var>DefineProperties</var> - overrides the method inherited from TComponent, defines the top, left properties</short>
<descr/>
<errors/>
<seealso>
<link id="#rtl.Classes.TComponent.DefineProperties">TComponent.DefineProperties</link>
</seealso>
</element>
<!-- argument Visibility: default -->
<element name="TCustomCheckGroup.DefineProperties.Filer">
<short/>
</element>
<!-- procedure Visibility: protected -->
<element name="TCustomCheckGroup.ReadData">
<short>Reads data from a stream</short>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomCheckGroup.ReadData.Stream">
<short/>
</element>
<!-- procedure Visibility: protected -->
<element name="TCustomCheckGroup.WriteData">
<short>Writes Data to a stream</short>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomCheckGroup.WriteData.Stream">
<short/>
</element>
<!-- procedure Visibility: protected -->
<element name="TCustomCheckGroup.Loaded" link="#rtl.Classes.TComponent.Loaded">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- procedure Visibility: protected -->
<element name="TCustomCheckGroup.DoOnResize" link="#LCL.Controls.TControl.DoOnResize">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- constructor Visibility: public -->
<element name="TCustomCheckGroup.Create">
<short>
<var>Create</var> - constructor for <var>TCustomCheckGroup</var>: calls inherited <var>Create</var>, then sets styles, creates lists, initialises sizing and layout properties</short>
<descr/>
<errors/>
<seealso>
<link id="#LCL.StdCtrls.TCustomGroupBox.Create">TCustomGroupBox.Create</link>
</seealso>
</element>
<!-- argument Visibility: default -->
<element name="TCustomCheckGroup.Create.TheOwner">
<short/>
</element>
<!-- destructor Visibility: public -->
<element name="TCustomCheckGroup.Destroy">
<short>
<var>Destroy</var> - destructor for <var>TCustomCheckGroup</var>: frees items and buttons, then calls inherited <var>Destroy</var>
</short>
<descr/>
<errors/>
<seealso>
<link id="#LCL.Controls.TWinControl.Destroy">TWinControl.Destroy</link>
</seealso>
</element>
<!-- function Visibility: public -->
<element name="TCustomCheckGroup.Rows">
<short>
<var>Rows</var> - the number of rows in which the Items (check boxes) are arranged</short>
</element>
<!-- function result Visibility: default -->
<element name="TCustomCheckGroup.Rows.Result">
<short>The number of rows holding items</short>
</element>
<!-- property Visibility: public -->
<element name="TCustomCheckGroup.Items">
<short>
<var>Items</var> - a string list for the captions of the check boxes</short>
</element>
<!-- property Visibility: public -->
<element name="TCustomCheckGroup.Checked">
<short>Whether an individual entry in the list is <var>Checked</var>
</short>
<descr/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomCheckGroup.Checked.Index">
<short/>
</element>
<!-- property Visibility: public -->
<element name="TCustomCheckGroup.CheckEnabled">
<short>
<var>CheckEnabled</var> - whether a given (indexed) entry in the list is allowed to be checked</short>
<descr/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomCheckGroup.CheckEnabled.Index">
<short/>
</element>
<!-- property Visibility: public -->
<element name="TCustomCheckGroup.Columns">
<short>
<var>Columns</var> - the number of columns in which the
<var>Items</var> (check boxes) are to be arranges</short>
</element>
<!-- property Visibility: public -->
<element name="TCustomCheckGroup.ColumnLayout">
<short>
<var>ColumnLayout</var> -
<var>HorizontalThenVertical </var>or vice versa</short>
</element>
<!-- property Visibility: public -->
<element name="TCustomCheckGroup.OnItemClick">
<short>
<var>OnItemClick</var> - event handler for mouse click on one of the Items in the Check Group</short>
</element>
<!-- object Visibility: default -->
<!-- variable Visibility: private -->
<element name="TCustomCheckGroup.FAutoFill">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomCheckGroup.FUpdatingItems">
<short/>
<descr/>
<seealso/>
</element>
<!-- procedure Visibility: private -->
<element name="TCustomCheckGroup.RaiseIndexOutOfBounds">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomCheckGroup.RaiseIndexOutOfBounds.Index">
<short/>
</element>
<!-- procedure Visibility: private -->
<element name="TCustomCheckGroup.SetAutoFill">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomCheckGroup.SetAutoFill.AValue">
<short/>
</element>
<!-- procedure Visibility: private -->
<element name="TCustomCheckGroup.UpdateControlsPerLine">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- property Visibility: public -->
<element name="TCustomCheckGroup.AutoFill">
<short>
<var>AutoFill</var> - whether Check Boxes should be automatically filled in (checked)</short>
<descr/>
<seealso/>
</element>
<element name="TCheckGroup">
<short>
<var>TCheckGroup</var> : A group of Check Boxes physically and logically grouped together on a form</short>
<descr>
<p>
<var>TCheckGroup</var>: A group of Check Boxes physically and logically grouped together on a form</p>
<p>To Use this control, place it in the required position on the form, then
either right-click on the control to see the pop-up CheckGroup editor, or in the Object Inspector select <var>Items</var> and click on the ellipsis (...) to open the string editor. In either case, type in the captions to accompany each check box, then close the string or CheckGroup editor and you will see a series of boxes with their captions displayed beside them.</p>
<p>Inherits properties from <link id="#lcl.ExtCtrls.TCustomCheckGroup">TCustomCheckGroup</link> and <link id="#lcl.StdCtrls.TCustomGroupBox">TCustomGroupBox</link>
</p>
</descr>
<seealso>
<link id="#lcl.StdCtrls.HowToUseStdCtrls">HowToUseStdCtrls</link>
<link id="#lcl.ExtCtrls.TRadioGroup">TRadioGroup</link>
</seealso>
</element>
<!-- property Visibility: published -->
<element name="TCheckGroup.Align" link="#LCL.Controls.TControl.Align">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TCheckGroup.Anchors" link="#lcl.Controls.TControl.Anchors">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TCheckGroup.BorderSpacing" link="#lcl.Controls.TControl.BorderSpacing">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TCheckGroup.Caption">
<short>
<var>Caption</var>: the string which appears at the top of the Check Group Box</short>
<descr>
<p>
<var>Caption</var>: the string which appears as a caption at the top of the Check Group Box to describe the function of the Check Group as a whole</p>
</descr>
</element>
<!-- property Visibility: published -->
<element name="TCheckGroup.ChildSizing" link="#LCL.Controls.TWinControl.ChildSizing">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TCheckGroup.Color" link="#LCL.Controls.TControl.Color">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TCheckGroup.ColumnLayout" link="#lcl.ExtCtrls.TCustomCheckGroup.ColumnLayout">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TCheckGroup.Columns" link="#lcl.ExtCtrls.TCustomCheckGroup.Columns">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TCheckGroup.Constraints" link="#LCL.Controls.TControl.Constraints">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TCheckGroup.Ctl3D" link="#LCL.Controls.TControl.Ctl3D">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TCheckGroup.Enabled" link="#LCL.Controls.TControl.Enabled">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TCheckGroup.Items">
<short>
<var>Items</var> - a string list containing the captions of the check boxes</short>
<descr>
<p>
<var>Items</var> - a string list containing the captions of the check boxes</p>
<p>Use the String List editor or the CheckGroup editor (opened by right-clicking on the control in the Form) to insert the captions for the check boxes, and determine their order and layout</p>
</descr>
</element>
<!-- property Visibility: published -->
<element name="TCheckGroup.OnChangeBounds" link="#LCL.Controls.TControl.OnChangeBounds">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TCheckGroup.OnClick" link="#LCL.Controls.TControl.OnClick">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TCheckGroup.OnDblClick" link="#LCL.Controls.TControl.OnDblClick">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TCheckGroup.OnEnter" link="#LCL.Controls.TWinControl.OnEnter">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TCheckGroup.OnExit" link="#LCL.Controls.TWinControl.OnExit">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TCheckGroup.OnItemClick" link="#lcl.ExtCtrls.TCustomCheckGroup.OnItemClick">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TCheckGroup.OnKeyDown" link="#LCL.Controls.TWinControl.OnKeyDown">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TCheckGroup.OnKeyPress" link="#LCL.Controls.TWinControl.OnKeyPress">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TCheckGroup.OnKeyUp" link="#LCL.Controls.TWinControl.OnKeyUp">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TCheckGroup.OnMouseDown" link="#LCL.Controls.TControl.OnMouseDown">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TCheckGroup.OnMouseMove" link="#LCL.Controls.TControl.OnMouseMove">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TCheckGroup.OnMouseUp" link="#LCL.Controls.TControl.OnMouseUp">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TCheckGroup.OnResize" link="#LCL.Controls.TControl.OnResize">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TCheckGroup.ParentColor" link="#LCL.Controls.TControl.ParentColor">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TCheckGroup.ParentCtl3D" link="#LCL.Controls.TWinControl.ParentCtl3D">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TCheckGroup.ParentShowHint" link="#LCL.Controls.TControl.ParentShowHint">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TCheckGroup.PopupMenu" link="#LCL.Controls.TControl.PopupMenu">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TCheckGroup.ShowHint" link="#LCL.Controls.TControl.ShowHint">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TCheckGroup.Visible" link="#LCL.Controls.TControl.Visible">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TCheckGroup.AutoFill" link="#lcl.ExtCtrls.TCustomCheckGroup.AutoFill">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TCheckGroup.AutoSize" link="#LCL.Controls.TControl.AutoSize">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TCheckGroup.Font" link="#LCL.Controls.TControl.Font">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TCheckGroup.ParentFont" link="#LCL.Controls.TControl.ParentFont">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TCheckGroup.TabOrder" link="#LCL.Controls.TWinControl.TabOrder">
<short/>
<descr/>
<seealso/>
</element>
<!-- object Visibility: default -->
<element name="TBoundLabel">
<short>
<var>TBoundLabel</var>: A label bound to another object, for example in
<var>TLabeledEdit</var>
</short>
<descr>
<var>TBoundLabel</var>: A label bound to another object, for example in
<var>TLabeledEdit</var>
</descr>
<seealso>
<link id="#lcl.ExtCtrls.TLabeledEdit">TLabeledEdit</link>
</seealso>
</element>
<!-- constructor Visibility: public -->
<element name="TBoundLabel.Create">
<short>
<var>Create</var> - constructor for <var>TBoundLabel</var>: calls inherited <var>Create</var>, makes itself a SubComponent to the Owner, and sets its caption to the owner name</short>
<descr/>
<errors/>
<seealso>
<link id="#LCL.StdCtrls.TCustomLabel.Create">TCustomLabel.Create</link>
</seealso>
</element>
<!-- argument Visibility: default -->
<element name="TBoundLabel.Create.TheOwner">
<short/>
</element>
<!-- property Visibility: public -->
<element name="TBoundLabel.FocusControl">
<short>
<var>FocusControl</var> - whether this control has focus</short>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TBoundLabel.Caption" link="#LCL.Controls.TControl.Caption">
<descr>Caption : the caption which will appear on the Bound Label, to identify its function
</descr>
</element>
<!-- property Visibility: published -->
<element name="TBoundLabel.Color" link="#LCL.Controls.TControl.Color">
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TBoundLabel.Height" link="#LCL.Controls.TControl.Height">
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TBoundLabel.Left" link="#LCL.Controls.TControl.Left">
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TBoundLabel.ParentColor" link="#LCL.Controls.TControl.ParentColor">
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TBoundLabel.ParentFont" link="#LCL.Controls.TControl.ParentFont">
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TBoundLabel.ParentShowHint" link="#LCL.Controls.TControl.ParentShowHint">
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TBoundLabel.PopupMenu" link="#LCL.Controls.TControl.PopupMenu">
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TBoundLabel.ShowAccelChar" link="#LCL.StdCtrls.TCustomLabel.ShowAccelChar">
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TBoundLabel.ShowHint" link="#LCL.Controls.TControl.ShowHint">
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TBoundLabel.Top" link="#LCL.Controls.TControl.Top">
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TBoundLabel.Layout" link="#LCL.StdCtrls.TCustomLabel.Layout">
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TBoundLabel.WordWrap" link="#LCL.StdCtrls.TCustomLabel.WordWrap">
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TBoundLabel.Width" link="#LCL.Controls.TControl.Width">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TBoundLabel.OnClick" link="#LCL.Controls.TControl.OnClick">
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TBoundLabel.OnDblClick" link="#LCL.Controls.TControl.OnDblClick">
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TBoundLabel.OnMouseDown" link="#LCL.Controls.TControl.OnMouseDown">
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TBoundLabel.OnMouseMove" link="#LCL.Controls.TControl.OnMouseMove">
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TBoundLabel.OnMouseUp" link="#LCL.Controls.TControl.OnMouseUp">
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TBoundLabel.OnEnter">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TBoundLabel.OnExit">
<short/>
<descr/>
<seealso/>
</element>
<!-- enumeration type Visibility: default -->
<element name="TLabelPosition">
<short>
<var>TLabelPosition</var> - enumerated type for position of a label relative to an edit box: above, below, left, right</short>
<descr/>
<seealso/>
</element>
<!-- enumeration value Visibility: default -->
<element name="TLabelPosition.lpAbove">
<short/>
</element>
<!-- enumeration value Visibility: default -->
<element name="TLabelPosition.lpBelow">
<short/>
</element>
<!-- enumeration value Visibility: default -->
<element name="TLabelPosition.lpLeft">
<short/>
</element>
<!-- enumeration value Visibility: default -->
<element name="TLabelPosition.lpRight">
<short/>
</element>
<!-- object Visibility: default -->
<element name="TCustomLabeledEdit">
<short>Custom Labelled Edit</short>
<descr>
<p>
<var>TCustomLabeledEdit</var>
: The base type for
<var>LabeledEdit</var>.</p>
<p>Note particularly the <link id="#lcl.ExtCtrls.TCustomLabeledEdit.EditLabel">EditLabel</link> property (see <link id="#lcl.Extctrls.TBoundLabel">TBoundLabel</link>), which contains the label attached to the Edit control.</p>
</descr>
<seealso>
<link id="#lcl.StdCtrls.TCustomEdit">TCustomEdit</link>
<link id="#lcl.StdCtrls.TCustomLabel">TCustomLabel</link>
</seealso>
</element>
<!-- variable Visibility: private -->
<element name="TCustomLabeledEdit.FEditLabel">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomLabeledEdit.FLabelPosition">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomLabeledEdit.FLabelSpacing">
<short/>
<descr/>
<seealso/>
</element>
<!-- procedure Visibility: private -->
<element name="TCustomLabeledEdit.SetLabelPosition">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomLabeledEdit.SetLabelPosition.Value">
<short/>
</element>
<!-- procedure Visibility: private -->
<element name="TCustomLabeledEdit.SetLabelSpacing">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomLabeledEdit.SetLabelSpacing.Value">
<short/>
</element>
<!-- procedure Visibility: protected -->
<element name="TCustomLabeledEdit.SetParent" link="#lcl.Controls.TControl.SetParent">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomLabeledEdit.SetParent.AParent">
<short/>
</element>
<!-- procedure Visibility: protected -->
<element name="TCustomLabeledEdit.SetName" link="#lcl.Controls.TControl.SetName">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomLabeledEdit.SetName.Value">
<short/>
</element>
<!-- procedure Visibility: protected -->
<element name="TCustomLabeledEdit.DoSetBounds">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomLabeledEdit.DoSetBounds.ALeft">
<short/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomLabeledEdit.DoSetBounds.ATop">
<short/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomLabeledEdit.DoSetBounds.AWidth">
<short/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomLabeledEdit.DoSetBounds.AHeight">
<short/>
</element>
<!-- procedure Visibility: protected -->
<element name="TCustomLabeledEdit.DoPositionLabel">
<short>
<var>DoPositionLabel</var> - perform the code for positioning the label</short>
<descr/>
<errors/>
<seealso/>
</element>
<!-- procedure Visibility: protected -->
<element name="TCustomLabeledEdit.Notification" link="#rtl.Classes.TComponent.Notification">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomLabeledEdit.Notification.AComponent">
<short/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomLabeledEdit.Notification.Operation">
<short/>
</element>
<!-- procedure Visibility: protected -->
<element name="TCustomLabeledEdit.CMVisibleChanged" link="#LCL.Controls.TWinControl.CMVisibleChanged">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomLabeledEdit.CMVisibleChanged.Msg">
<short/>
</element>
<!-- procedure Visibility: protected -->
<element name="TCustomLabeledEdit.CMEnabledChanged" link="#LCL.Controls.TWinControl.CMEnabledChanged">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomLabeledEdit.CMEnabledChanged.Msg">
<short/>
</element>
<!-- procedure Visibility: protected -->
<element name="TCustomLabeledEdit.CreateInternalLabel">
<short>
<var>CreateInternalLabel</var> - method for internally creating label</short>
<descr/>
<errors/>
<seealso/>
</element>
<!-- constructor Visibility: public -->
<element name="TCustomLabeledEdit.Create">
<short>
<var>Create</var> - constructor for <var>TCustomLabeledEdit</var>: calls inherited <var>Create</var> then sets initial position and label spacing</short>
<descr/>
<errors/>
<seealso>
<link id="#lcl.StdCtrls.TCustomEdit.Create">TCustomEdit.Create</link>
<link id="#lcl.ExtCtrls.TBoundLabel.Create">TBoundLabel.Create</link>
</seealso>
</element>
<!-- argument Visibility: default -->
<element name="TCustomLabeledEdit.Create.TheOwner">
<short/>
</element>
<!-- property Visibility: public -->
<element name="TCustomLabeledEdit.EditLabel">
<short>
<var>EditLabel </var>- the label attached to the edit box</short>
</element>
<!-- property Visibility: public -->
<element name="TCustomLabeledEdit.LabelPosition">
<short>
<var>LabelPosition </var>
- whether above, below, to the left or to the right of the Edit box</short>
</element>
<!-- property Visibility: public -->
<element name="TCustomLabeledEdit.LabelSpacing">
<short>
<var>LabelSpacing</var>
- the distance between the Label and the Edit box</short>
</element>
<!-- object Visibility: default -->
<element name="TLabeledEdit">
<short>Labelled Edit: An Edit Box with a permanently attached Label</short>
<descr>
<p>
<var>TLabeledEdit</var>
: An Edit Box with a permanently attached Label</p>
<p>Saves time and effort over placing separate Label and Edit Box on Form. The properties are described in the parent component, <link id="#lcl.ExtCtrls.TCustomLabeledEdit">TCustomLabeledEdit</link> from which most of the properties are inherited</p>
</descr>
<seealso>
<link id="#lcl.StdCtrls.TCustomEdit">TCustomEdit</link>
<link id="#lcl.ExtCtrls.TBoundLabel">TBoundLabel</link>
</seealso>
</element>
<!-- property Visibility: published -->
<element name="TLabeledEdit.Anchors" link="#lcl.Controls.TControl.Anchors">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TLabeledEdit.AutoSize" link="#lcl.Controls.TControl.AutoSize">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TLabeledEdit.BorderSpacing" link="#lcl.Controls.TControl.BorderSpacing">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TLabeledEdit.CharCase" link="#lcl.StdCtrls.TCustomEdit.CharCase">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TLabeledEdit.Color" link="#lcl.Controls.TControl.Color">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TLabeledEdit.Constraints" link="#lcl.Controls.TControl.Constraints">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TLabeledEdit.Enabled" link="#lcl.Controls.TControl.Enabled">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TLabeledEdit.LabelPosition" link="#lcl.ExtCtrls.TCustomLabeledEdit.LabelPosition">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TLabeledEdit.LabelSpacing" link="#lcl.ExtCtrls.TCustomLabeledEdit.LabelSpacing">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TLabeledEdit.MaxLength" link="#lcl.StdCtrls.TCustomEdit.MaxLength">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TLabeledEdit.ParentColor" link="#lcl.COntrols.TControl.ParentColor">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TLabeledEdit.ParentFont" link="#lcl.COntrols.TControl.ParentFont">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TLabeledEdit.ParentShowHint" link="#lcl.Controls.TControl.ParentShowHint">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TLabeledEdit.PasswordChar" link="#lcl.StdCtrls.TCustomEdit.PasswordChar">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TLabeledEdit.PopupMenu" link="#lcl.StdCtrls.TCustomEdit.PopupMenu">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TLabeledEdit.ReadOnly" link="#lcl.StdCtrls.TCustomEdit.ReadOnly">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TLabeledEdit.ShowHint" link="#lcl.Controls.TControl.ShowHint">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TLabeledEdit.TabOrder" link="#lcl.StdCtrls.TCustomEdit.TabOrder">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TLabeledEdit.TabStop" link="#lcl.StdCtrls.TCustomEdit.TabStop">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TLabeledEdit.Text" link="#lcl.StdCtrls.TCustomEdit.Text">
<short>
<var>Text</var>
: the text-string being entered or edited in the Labelled Edit box</short>
</element>
<!-- property Visibility: published -->
<element name="TLabeledEdit.Visible" link="#lcl.Controls.TControl.Visible">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TLabeledEdit.OnChange" link="#lcl.StdCtrls.TCustomEdit.OnChange">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TLabeledEdit.OnClick" link="#lcl.Controls.TControl.OnClick">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TLabeledEdit.OnDblClick" link="#lcl.Controls.TControl.OnDblClick">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TLabeledEdit.OnEnter" link="#lcl.Controls.TWinControl.OnEnter">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TLabeledEdit.OnExit" link="#lcl.Controls.TWinControl.OnExit">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TLabeledEdit.OnKeyDown" link="#lcl.Controls.TWinControl.OnKeyDown">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TLabeledEdit.OnKeyPress" link="#lcl.Controls.TWinControl.OnKeyPress">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TLabeledEdit.OnKeyUp" link="#lcl.Controls.TWinControl.OnKeyUp">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TLabeledEdit.OnMouseDown" link="#lcl.Controls.TControl.OnMouseDown">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TLabeledEdit.OnMouseMove" link="#lcl.Controls.TControl.OnMouseMove">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TLabeledEdit.OnMouseUp" link="#lcl.Controls.TControl.OnMouseUp">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TLabeledEdit.AutoSelect" link="#lcl.StdCtrls.TCustomEdit.AutoSelect">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TLabeledEdit.DragCursor" link="#lcl.Controls.TControl.DragCursor">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TLabeledEdit.DragMode" link="#lcl.Controls.TControl.DragMode">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TLabeledEdit.EchoMode" link="#lcl.StdCtrls.TCustomEdit.EchoMode">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TLabeledEdit.EditLabel" link="#lcl.ExtCtrls.TCustomLabeledEdit.EditLabel">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TLabeledEdit.OnDragDrop" link="#lcl.Controls.TControl.OnDragDrop">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TLabeledEdit.OnDragOver" link="#lcl.Controls.TControl.OnDragOver">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TLabeledEdit.OnEndDrag" link="#lcl.Controls.TControl.OnEndDrag">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TLabeledEdit.OnStartDrag" link="#lcl.Controls.TControl.OnStartDrag">
<short/>
<descr/>
<seealso/>
</element>
<!-- alias type Visibility: default -->
<element name="TPanelBevel">
<short/>
<descr/>
<seealso/>
</element>
<!-- range type Visibility: default -->
<element name="TBevelWidth">
<short/>
<descr/>
<seealso/>
</element>
<!-- object Visibility: default -->
<element name="TCustomPanel">
<short>The base class for a general container which can hold other objects. It has a customizable border and a central text.</short>
<descr>
<p>
<var>TCustomPanel</var>: The base type for <var>TPanel</var>
</p>
<p>A Panel is a defined rectangular area of the form into which other components can be placed to group them functionally and geographically.</p>
<p>
<var>TCustomPanel </var>defines the positioning and bevelling properties of any descendent classes, and provides methods for painting and writing text to the panel.</p>
</descr>
</element>
<!-- variable Visibility: private -->
<element name="TCustomPanel.FBevelInner">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomPanel.FBevelOuter">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomPanel.FBevelWidth">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomPanel.FBorderWidth">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomPanel.FAlignment">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomPanel.FFullRepaint">
<short/>
<descr/>
<seealso/>
</element>
<!-- procedure Visibility: private -->
<element name="TCustomPanel.SetAlignment">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomPanel.SetAlignment.Value">
<short/>
</element>
<!-- procedure Visibility: private -->
<element name="TCustomPanel.SetBevelInner">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomPanel.SetBevelInner.Value">
<short/>
</element>
<!-- procedure Visibility: private -->
<element name="TCustomPanel.SetBevelOuter">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomPanel.SetBevelOuter.Value">
<short/>
</element>
<!-- procedure Visibility: private -->
<element name="TCustomPanel.SetBevelWidth">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomPanel.SetBevelWidth.Value">
<short/>
</element>
<!-- procedure Visibility: private -->
<element name="TCustomPanel.SetBorderWidth">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomPanel.SetBorderWidth.Value">
<short/>
</element>
<!-- procedure Visibility: protected -->
<element name="TCustomPanel.AdjustClientRect" link="#LCL.Controls.TWinControl.AdjustClientRect">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomPanel.AdjustClientRect.Rect">
<short/>
</element>
<!-- procedure Visibility: protected -->
<element name="TCustomPanel.RealSetText" link="#lcl.Controls.TControl.RealSetText">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomPanel.RealSetText.Value">
<short/>
</element>
<!-- procedure Visibility: protected -->
<element name="TCustomPanel.Paint" link="#lcl.Controls.TCustomControl.Paint">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- function Visibility: protected -->
<element name="TCustomPanel.ParentColorIsStored">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- function result Visibility: default -->
<element name="TCustomPanel.ParentColorIsStored.Result">
<short/>
</element>
<!-- function Visibility: protected -->
<element name="TCustomPanel.CanTab">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- function result Visibility: default -->
<element name="TCustomPanel.CanTab.Result">
<short/>
</element>
<!-- procedure Visibility: private -->
<element name="TCustomPanel.UpdateBordersAndBevels">
<short>
<var>UpdateBordersAndBevels</var> - make sure any changes to borders and bevels are accurately shown</short>
<descr/>
<errors/>
<seealso/>
</element>
<!-- function Visibility: protected -->
<element name="TCustomPanel.GetControlClassDefaultSize" link="#lcl.Controls.TControl.GetControlClassDefaultSize">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- function result Visibility: default -->
<element name="TCustomPanel.GetControlClassDefaultSize.Result">
<short/>
</element>
<!-- procedure Visibility: protected -->
<element name="TCustomPanel.CMParentColorChanged" link="#LCL.Controls.TControl.CMParentColorChanged">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomPanel.CMParentColorChanged.Message">
<short/>
</element>
<!-- function Visibility: protected -->
<element name="TCustomPanel.GetDefaultDockCaption" link="#LCL.Controls.TControl.GetDefaultDockCaption">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- function result Visibility: default -->
<element name="TCustomPanel.GetDefaultDockCaption.Result">
<short/>
</element>
<!-- procedure Visibility: protected -->
<element name="TCustomPanel.Loaded" link="#rtl.Classes.TComponent.Loaded">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- procedure Visibility: protected -->
<element name="TCustomPanel.UpdateParentColorChange">
<short>
<var>UpdateParentColorChange</var> - update any pending changes in parent colour</short>
<descr/>
<errors/>
<seealso/>
</element>
<!-- constructor Visibility: public -->
<element name="TCustomPanel.Create">
<short>
<var>Create</var> - constructor for <var>TCustomPanel</var>: calls inherited <var>Create</var> then sets initial style, bevel, colour, alignment and bounds</short>
<descr/>
<errors/>
<seealso>
<link id="#lcl.Controls.TCustomControl.Create">TCustomControl.Create</link>
</seealso>
</element>
<!-- argument Visibility: default -->
<element name="TCustomPanel.Create.TheOwner">
<short/>
</element>
<!-- property Visibility: public -->
<element name="TCustomPanel.Align" link="#lcl.Controls.TControl.Align">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: public -->
<element name="TCustomPanel.Alignment">
<short>
<var>Alignment</var> - whether text is left or right justified, or centered</short>
</element>
<!-- property Visibility: public -->
<element name="TCustomPanel.BevelInner">
<short>
<var>BevelInner</var> - determines the nature of the Inner Bevel of the panel (whether raised, lowered etc)</short>
</element>
<!-- property Visibility: public -->
<element name="TCustomPanel.BevelOuter">
<short>
<var>BevelOuter</var> - determines the nature of the Outer Bevel of the panel (whether raised, lowered etc)</short>
</element>
<!-- property Visibility: public -->
<element name="TCustomPanel.BevelWidth">
<short>
<var>BevelWidth </var>- the Width of the panel's bevel in pixels</short>
</element>
<!-- property Visibility: public -->
<element name="TCustomPanel.BorderWidth" link="#lcl.Controls.TWincontrol.BorderWidth"/>
<!-- property Visibility: public -->
<element name="TCustomPanel.Color" link="#lcl.Controls.TControl.Color">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: public -->
<element name="TCustomPanel.Caption" link="#lcl.Controls.TControl.Caption">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: public -->
<element name="TCustomPanel.FullRepaint">
<short>
<var>FullRepaint</var> - if True, the panel needs to be fully repainted after each change</short>
<descr/>
<seealso/>
</element>
<!-- property Visibility: public -->
<element name="TCustomPanel.ParentColor" link="#lcl.Controls.TControl.ParentColor">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: public -->
<element name="TCustomPanel.TabStop" link="#lcl.Controls.TWinControl.TabStop">
<short/>
<descr/>
<seealso/>
</element>
<!-- object Visibility: default -->
<element name="TPanel">
<short>The main class for a general container which can hold other objects. It has a customizable border and a central text.</short>
<descr>
<p>A Panel is a defined rectangular area of the form into which other components can be placed to group them functionally and geographically.</p>
</descr>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPanel.Align" link="#lcl.Controls.TControl.Align"/>
<element name="TPanel.Alignment" link="#lcl.ExtCtrls.TCustomPanel.Alignment"/>
<element name="TPanel.Anchors" link="#lcl.Controls.TControl.Anchors"/>
<element name="TPanel.AutoSize" link="#lcl.Controls.TControl.AutoSize"/>
<!-- property Visibility: published -->
<element name="TPanel.BorderSpacing" link="#lcl.Controls.TControl.BorderSpacing">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPanel.BevelInner" link="#lcl.ExtCtrls.TCustomPanel.BevelInner">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPanel.BevelOuter" link="#lcl.ExtCtrls.TCustomPanel.BevelOuter">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPanel.BevelWidth" link="#lcl.ExtCtrls.TCustomPanel.BevelWidth">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPanel.BorderWidth" link="#lcl.Controls.TWinControl.BorderWidth">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPanel.BorderStyle" link="#lcl.Controls.TWinControl.BorderStyle">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPanel.Caption">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPanel.ChildSizing" link="#lcl.Controls.TWinControl,ChildSizing">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPanel.ClientHeight" link="#lcl.Controls.TControl.ClientHeight">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPanel.ClientWidth" link="#lcl.Controls.TControl.ClientWidth">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPanel.Color" link="#lcl.Controls.TControl.Color">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPanel.Constraints" link="#lcl.Controls.TControl.Constraints">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPanel.DragMode" link="#lcl.Controls.TControl.DragMode">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPanel.Enabled" link="#lcl.Controls.TControl.Enabled">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPanel.Font" link="#lcl.Controls.TControl.Font">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPanel.FullRepaint" link="#lcl.ExtCtrls.TCustomPanel.FullRepaint">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPanel.ParentColor" link="#lcl.Controls.TControl.ParentColor">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPanel.ParentFont" link="#lcl.Controls.TControl.ParentFont">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPanel.ParentShowHint" link="#lcl.Controls.TControl.ParentShowHint">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPanel.PopupMenu" link="#lcl.Controls.TControl.PopupMenu">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPanel.ShowHint" link="#lcl.Controls.TControl.ShowHint">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPanel.TabOrder" link="#lcl.Controls.TWinControl.TabOrder">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPanel.TabStop" link="#lcl.Controls.TWinControl.TabStop">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPanel.Visible" link="#LCL.Controls.TControl.Visible">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPanel.OnClick" link="#lcl.Controls.TControl.OnClick">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPanel.OnDblClick" link="#lcl.Controls.TControl.OnDblClick">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPanel.OnDragDrop" link="#lcl.Controls.TControl.OnDragDrop">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPanel.OnDragOver" link="#lcl.Controls.TControl.OnDragOver">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPanel.OnEndDrag" link="#lcl.Controls.TControl.OnEndDrag">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPanel.OnEnter" link="#LCL.Controls.TWinControl.OnEnter"/>
<!-- property Visibility: published -->
<element name="TPanel.OnExit" link="#LCL.Controls.TWinControl.OnExit"/>
<!-- property Visibility: published -->
<element name="TPanel.OnMouseDown" link="#lcl.Controls.TControl.OnMouseDown">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPanel.OnMouseMove" link="#lcl.Controls.TControl.OnMouseMove">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPanel.OnMouseUp" link="#lcl.Controls.TControl.OnMouseUp">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPanel.OnResize" link="#lcl.Controls.TControl.OnResize">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPanel.OnStartDrag" link="#lcl.Controls.TControl.OnStartDrag">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPanel.DockSite" link="#lcl.Controls.TWinControl.DockSite">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPanel.DragCursor" link="#lcl.Controls.TControl.DragCursor">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPanel.DragKind" link="#lcl.Controls.TControl.DragKind">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPanel.UseDockManager" link="#lcl.Controls.TWinControl.UseDockManager">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPanel.OnDockDrop" link="#lcl.Controls.TWinControl.OnDockDrop">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPanel.OnDockOver" link="#lcl.Controls.TWinControl.OnDockOver">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPanel.OnEndDock" link="#lcl.Controls.TControl.OnEndDock">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPanel.OnGetSiteInfo" link="#LCL.Controls.TWinControl.OnGetSiteInfo">
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPanel.OnGetDockCaption" link="#LCL.Controls.TWinControl.OnGetDockCaption">
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPanel.OnStartDock" link="#lcl.Controls.TControl.OnStartDock">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPanel.OnUnDock" link="#lcl.Controls.TWinControl.OnUnDock">
<short/>
<descr/>
<seealso/>
</element>
<!-- constant Visibility: default -->
<element name="TCN_First">
<short/>
<descr/>
<seealso/>
</element>
<!-- constant Visibility: default -->
<element name="TCN_SELCHANGE">
<short/>
<descr/>
<seealso/>
</element>
<!-- constant Visibility: default -->
<element name="TCN_SELCHANGING">
<short/>
<descr/>
<seealso/>
</element>
<!-- procedure Visibility: default -->
<element name="Register">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<element name="TCustomTrayIcon">
<short>
<var>TCustomTrayIcon </var>- the base class for
<var>TTrayIcon</var>, a multiplatform System Tray component.</short>
</element>
<element name="TTrayIcon">
<short>
<var>TTrayIcon</var> is a multiplatform System Tray component. It adds an icon to the tray and signifies an application that is inactive but ready to be activated. Under Windows the System tray is usually located on the bottom-right corner of the screen, but it may be elsewhere. On other operating systems this position varies.</short>
</element>
<element name="TCustomTrayIcon.Create">
<descr>
<var>Create</var> creates a new instance of a <var>TCustomTrayIcon</var> class.
If <var>AOwner</var> is not <var>Nil</var>, the new component attempts to insert itself in the list of owned components of the owner.
</descr>
<short>
<var>Create</var> - constructor for <var>TCustomTrayIcon</var>: performs inherited <var>Create</var> then creates icon, timer and initialises balloon timeout</short>
<seealso>
<link id="#rtl.Classes.TComponent.Create">TComponent.Create</link>
</seealso>
</element>
<element name="TCustomTrayIcon.Destroy">
<descr>
<var>Destroy</var> sends a <var>opRemove</var> notification to all components in the free-notification list. After that, all owned components are destroyed by calling <link id="#rtl.Classes.TComponent.DestroyComponents">DestroyComponents</link> (and hence removed from the list of owned components). When this is done, the component removes itself from its owner's child component list.
After that, the parent's destroy method is called.
</descr>
<short>
<var>Destroy</var> - destructor for <var>TCustomTrayIcon</var>: frees icon and timer then calls inherited <var>Destroy</var>
</short>
<seealso>
<link id="#rtl.Classes.TComponent.Destroy">TComponent.Destroy</link>
</seealso>
</element>
<element name="TCustomTrayIcon.Hide">
<short>Hide - Removes the icon from the System Tray</short>
</element>
<element name="TCustomTrayIcon.Show">
<short>Show - Shows the icon on the System Tray</short>
</element>
<element name="TCustomTrayIcon.ShowBalloonHint">
<short>
<var>ShowBalloonHint</var> displays a smal balloon-like window near the tray icon. It can be used to send notifications about the status of an action, or notify of a received message or any other event which doesn't require an imediate response. The Ballon window disappears after <var>BallonHintTimeout</var> milliseconds or when the user clicks it or it's close button.</short>
</element>
<element name="TCustomTrayIcon.GetPosition">
<short>Find the position of the Tray Icon and thus a position suitable to display the hinting BalloonHint. Under Windows an approximate location is detected.</short>
</element>
<element name="TCustomTrayIcon.BalloonFlags">
<short>the set of kinds of balloon flag that can be displayed (may be None, Info, Warning or Error)</short>
</element>
<element name="TCustomTrayIcon.BalloonHint">
<short>The text to be shown in the hinting balloon</short>
</element>
<element name="TCustomTrayIcon.BalloonTimeout">
<short>The period after which the hinting balloon disappears</short>
</element>
<element name="TCustomTrayIcon.BalloonTitle">
<short>The title to be shown on the hinting balloon</short>
</element>
<element name="TCustomTrayIcon.Canvas">
<short>The canvas of the Tray Icon</short>
</element>
<element name="TCustomTrayIcon.PopUpMenu">
<short>PopUpMenu - a popup menu which is displayed when right mouse button is clicked over icon - separate from hint balloon</short>
</element>
<element name="TCustomTrayIcon.Icon">
<short>The Icon or picture that is to be displayed</short>
</element>
<element name="TCustomTrayIcon.Hint">
<short>A simple hint that is shown when the mouse hovers over the icon.</short>
</element>
<element name="TCustomTrayIcon.ShowIcon">
<short>Determines if <var>Icon</var> should be painted to the System Tray. This can be set to false if one wishes to instead paint to the Canvas of the Tray Icon.</short>
</element>
<element name="TCustomTrayIcon.Visible">
<short>It is set to true when the icon is shown and remains true until Hide is called. Setting <var>Visible</var> has the same effect as calling Hide or Show.</short>
</element>
<element name="TCustomTrayIcon.OnClick">
<short>Event Handler for Mouse Click on Tray Icon</short>
</element>
<element name="TCustomTrayIcon.OnDblClick">
<short>Event handler for mouse double-click</short>
</element>
<element name="TCustomTrayIcon.OnMouseDown">
<short>Event handler if mouse button is pressed down</short>
</element>
<element name="TCustomTrayIcon.OnMouseUp">
<short>Event handler if mouse button is up</short>
</element>
<element name="TCustomTrayIcon.OnMouseMove">
<short>Event handler for mouse movement</short>
</element>
<element name="TCustomTrayIcon.OnPaint">
<short>Use this to implement custom drawing to the icon. Draw using the canvas property of the icon. Note: Does not work on win32. </short>
</element>
<element name="TTrayIcon.BalloonFlags" link="#LCL.ExtCtrls.TCustomTrayIcon.BalloonFlags"/>
<element name="TTrayIcon.BalloonHint" link="#LCL.ExtCtrls.TCustomTrayIcon.BalloonHint"/>
<element name="TTrayIcon.BalloonTimeout" link="#LCL.ExtCtrls.TCustomTrayIcon.BalloonTimeout"/>
<element name="TTrayIcon.BalloonTitle" link="#LCL.ExtCtrls.TCustomTrayIcon.BalloonTitle"/>
<element name="TTrayIcon.PopUpMenu" link="#LCL.ExtCtrls.TCustomTrayIcon.PopUpMenu"/>
<element name="TTrayIcon.Icon" link="#LCL.ExtCtrls.TCustomTrayIcon.Icon"/>
<element name="TTrayIcon.Hint" link="#LCL.ExtCtrls.TCustomTrayIcon.Hint"/>
<element name="TTrayIcon.Visible" link="#LCL.ExtCtrls.TCustomTrayIcon.Visible"/>
<element name="TTrayIcon.OnClick" link="#LCL.ExtCtrls.TCustomTrayIcon.OnClick"/>
<element name="TTrayIcon.OnDblClick" link="#LCL.ExtCtrls.TCustomTrayIcon.OnDblClick"/>
<element name="TTrayIcon.OnMouseDown" link="#LCL.ExtCtrls.TCustomTrayIcon.OnMouseDown"/>
<element name="TTrayIcon.OnMouseUp" link="#LCL.ExtCtrls.TCustomTrayIcon.OnMouseUp"/>
<element name="TTrayIcon.OnMouseMove" link="#LCL.ExtCtrls.TCustomTrayIcon.OnMouseMove"/>
<element name="TTrayIcon.OnPaint" link="#LCL.ExtCtrls.TCustomTrayIcon.OnPaint"/>
<element name="TBevel.Assign" link="#rtl.Classes.TPersistent.Assign">
<descr>
<p>
<var>Assign</var> copies the contents of
<var>Source</var> to
<var>Self</var>, if the classes of the destination and source classes are
compatible.
</p>
<p>The <var>TPersistent</var> implementation of <var>Assign</var> does nothing
but calling the <link id="#rtl.Classes.TPersistent.AssignTo">AssignTo</link> method of
source. This means that if the destination class does not know how to assign
the contents of the source class, the source class instance is asked to assign
itself to the destination class. This means that it is necessary to
implement only one of the two methods so that two classes can be assiged to
one another.
</p>
<remark>
<p>In general, a statement of the form
</p>
<code>Destination:=Source;
</code>
<p>(where <var>Destination</var> and <var>Source</var> are classes) does not
achieve the same as a statement of the form
</p>
<code>Destination.Assign(Source);
</code>
<p>After the former statement, both <var>Source</var> and
<var>Destination</var> will point to the same object. The latter statemtent
will copy the <var>contents</var> of the <var>Source</var> class to the
<var>Destination</var> class.
</p>
</remark>
</descr>
</element>
<element name="TBoundLabel.DragCursor" link="#LCL.Controls.TControl.DragCursor"/>
<element name="TBoundLabel.DragMode" link="#LCL.Controls.TControl.DragMode"/>
<element name="TBoundLabel.OnDragDrop" link="#LCL.Controls.TControl.OnDragDrop"/>
<element name="TBoundLabel.OnDragOver" link="#LCL.Controls.TControl.OnDragOver"/>
<element name="TBoundLabel.OnEndDrag" link="#LCL.Controls.TControl.OnEndDrag"/>
<element name="TBoundLabel.OnStartDrag" link="#LCL.Controls.TControl.OnStartDrag"/>
<topic name="Multi-PageControls">
<short>
<var>Multi-PageControls</var> - controls that offer a selection of alternative pages for display</short>
<descr>
<p>
<var>Multi-PageControls</var> - controls that offer a selection of alternative pages for display</p>
<p>A number of controls, found in Units <var>ExtCtrls</var> and <var>ComCtrls</var>, offer the ability to create multi-page forms with a series of <var>Tabs</var> along one edge that allow the user to select one of the <var>Pages</var> for display and interaction.</p>
<p>These include: <var>TPageControl</var>, <var>TNoteBook</var>, <var>TTabControl</var> and <var>THeaderControl</var> (the Header Control components have a very different structure and function). Icons for all of these exist on the <var>Additional</var> or <var>Common Controls</var> tabs of the Component Palette in the Lazarus IDE.</p>
<p>While the various components may look superficially similar, they differ in properties, inheritance, method of adding additional pages, behaviour at run-time, methods for referencing pages and so on.</p>
<p>We have to be very clear when using the various properties, to distinguish between the word 'Tab' as referring to a Tab indicating an identifier for a page, and 'Tab' as referring to the <b>TAB</b> key on the standard keyboard. In common with most Lazarus components, it is possible to enable each control to be included in the <var>TabOrder</var> of <var>TabStops</var> for a <var>Form</var>, so that the component can be reached by repeated pressing of the <b>TAB</b> key, and we must not confuse this use of 'Tab' with the use to denote a <var>Page</var>.</p>
<p>The properties <var>CanTab</var>, <var>TabStop</var> and <var>TabOrder</var> refer to the use of the <b>TAB</b> key to navigate to the relevant control.</p>
<p>Properties such as <var>Tabs</var>, <var>TabIndex</var>, <var>IndexOfTabAt()</var>, <var>TabIndexAtClientPos()</var>, <var>TabPosition</var>, <var>TabHeight</var>, <var>TabWidth</var>, <var>TabVisible</var>, <var>OnCloseTabClicked</var> refer to the use for <var>Page</var> selection.</p>
<p>
<var>TTabControl</var> and
<var>TPageControl</var> are both descended from
<var>TCustomNoteBook</var> (which is in turn descended from
<var>TWinControl</var>) and have many inherited properties in common.
<var>TPageControl</var> has, in general, more advanced features and is probably intended to replace
<var>TNoteBook</var>.</p>
<p>The following table summarises the main differences between the two components.</p>
<table>
<th>
<td>Property or method</td>
<td>
<var>TNoteBook</var>
</td>
<td>
<var>TPageControl</var>
</td>
</th>
<tr>
<td>Pages, ActivePage</td>
<td>String, <var>TPage</var>
</td>
<td>
<var>TTabSheet</var>, a more advanced version of
<var>TPage</var>
</td>
</tr>
<tr>
<td>Drag/Drop/Dock</td>
<td>Drag properties, but minimal Dock or Drop</td>
<td>Full Drag, Drop, Dock properties and methods</td>
</tr>
<tr>
<td>Indexing</td>
<td>
<var>PageIndex</var>
</td>
<td>
<var>ActivePageIndex</var>,
<var>TabIndex</var>
</td>
</tr>
<tr>
<td>Showing/Hiding Tabs</td>
<td>
<var>ShowTabs</var>
</td>
<td>
<var>TabVisible</var> in
<var>TTabSheet</var>
</td>
</tr>
<tr>
<td>Hints</td>
<td>No Hinting methods</td>
<td>
<var>ShowHint</var>,
<var>ParentShowHint</var>
</td>
</tr>
<tr>
<td>Font</td>
<td>No Font properties</td>
<td>
<var>Font</var>,
<var>ParentFont</var>
</td>
</tr>
<tr>
<td>Sensing position of Tab</td>
<td>None</td>
<td>
<var>TabPosition</var>,
<var>OnGetSiteInfo</var>
</td>
</tr>
<tr>
<td>Options</td>
<td>Published property <var>Options</var>, include <var>nboShowCloseButtons</var>, <var>nboMultiLine</var>
</td>
<td>No published <var>Options</var> property, but inherits <var>Options</var> (public property) from <var>TCustomNoteBook</var>, so they could be set explicitly in code</td>
</tr>
</table>
<p>The individual Pages in both of the above controls (descended from <var>TCustomNoteBook</var>) are separate and can have their own specific collections of widgets which appear only when the relevant Page is selected by its Tab.</p>
<p>In contrast, the <var>TTabControl</var> component (descended from <var>TCustomTabControl</var>) has only one display area (Protected property <var>DisplayRect</var>), but the image displayed in it is determined by which tab has been selected. Each Tab has an index value which is used to select the appropriate image from an indexed <var>ImageList</var> and display it in the Display Rectangle.</p>
<p>The properties of the Tabs in <var>TTabControl</var> are very configurable compared with those in the controls derived from <var>TCustomNoteBook</var>, allowing for instance the creation of multi-line captions, the placement of images on Tabs, the possibility of the Owner routine determining the drawing of the tab, the configuration of Tab size, the selection of multiple tabs. The trade-off is that the display area is restricted in what it can display, and is essentially confined to display of images.</p>
<p>To use any of the above controls, select them from the relevant tab on the IDE Component Palette and drop them on the form in the required position. Fill in as many relevant properties as you can in the Object Inspector.</p>
<p>To add Tabs or Pages to the controls, select the control with a left mouse click or by selecting from the Component menu in the Object Inspector, then right-click on the component to get a pop-up menu, whose first item will be 'Add Page' or 'Add Tab'.</p>
<p>The Tabs in <var>TTabControl</var> can be edited by selecting 'Tabs' in the Object Inspector, clicking on the ellipsis (...) and using the string editor that pops up.</p>
<p>The pages in<var>TNoteBook</var> or <var>TPageControl</var> can be edited by selecting the <var>ActivePage</var> in the Object Inspector and then editing the properties of the individual page.</p>
<p>
<var>THeaderControl</var> offers a widget that could be placed along the edge of a Panel or Form, allowing a highly customised mechanism for selection. However, there are no intrinsically associated display areas, and it is the developer's responsibility to supply an index associated with the selection from the
<var>THeaderControl</var> and determining what action is to occur or what is to be displayed in any attached Panel or Form.</p>
<p>When the control is first selected from the Component Palette and placed on a Form, it consists of an unadorned rectangle. However, selecting the control and right-clicking (or selecting the 'Sections' property in the Object Inspector) gives access to a Sections editor (a StringList editor) and Sections can be added to the control. The sections are separated by vertical lines, and each section can have a string inserted as a label, associated with an Index value. The Sections can be rearranged, re-ordered, or be individually painted.</p>
<p>In a typical application a <var>THeaderControl</var> and a <var>TPanel</var> or <var>TForm</var> would be docked together, and code would be written to find which Section of the Header had been selected, then use its index to control the display in the other docked control.</p>
</descr>
</topic>
<!-- enumeration value Visibility: default -->
<element name="TPageFlag.pfAdding">
<short/>
</element>
<!-- property Visibility: published -->
<element name="TPage.Font" link="#LCL.Controls.TControl.Font">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPage.ParentFont" link="#LCL.Controls.TControl.ParentFont">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TNotebook.DragCursor" link="#LCL.Controls.TControl.DragCursor">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TNotebook.DragMode" link="#LCL.Controls.TControl.DragMode">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TNotebook.Font" link="#LCL.Controls.TControl.Font">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TNotebook.OnChanging">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TNotebook.OnDragDrop" link="#LCL.Controls.TControl.OnDragDrop">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TNotebook.OnDragOver" link="#LCL.Controls.TControl.OnDragOver">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TNotebook.OnEndDrag" link="#LCL.Controls.TControl.OnEndDrag">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TNotebook.OnStartDrag" link="#LCL.Controls.TControl.OnStartDrag">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TNotebook.ParentFont" link="#LCL.Controls.TControl.ParentFont">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TNotebook.PopupMenu" link="#LCL.Controls.TControl.PopupMenu">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TNotebook.TabOrder" link="#LCL.Controls.TWinControl.TabOrder">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TNotebook.TabStop" link="#LCL.Control.TWinControl.TabStop">
<short/>
<descr/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TIdleTimer.DoOnIdle.Done">
<short/>
</element>
<!-- function Visibility: protected -->
<element name="TShape.GetControlClassDefaultSize" link="#LCL.Controls.TControl.GetControlClassDefaultSize">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- function result Visibility: default -->
<element name="TShape.GetControlClassDefaultSize.Result">
<short/>
</element>
<!-- property Visibility: published -->
<element name="TShape.OnDragDrop" link="#LCL.Controls.TControl.OnDragDrop">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TShape.OnDragOver" link="#LCL.Controls.TControl.OnDragOver">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TShape.OnEndDrag" link="#LCL.Controls.TControl.OnEndDrag">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TShape.OnPaint" link="#LCL.Controls.TGraphicControl.OnPaint">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TShape.OnStartDrag" link="#LCL.Controls.TControl.OnStartDrag">
<short/>
<descr/>
<seealso/>
</element>
<!-- function Visibility: protected -->
<element name="TPaintBox.GetControlClassDefaultSize" link="#LCL.Controls.TControl.GetControlClassDefaultSize">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- function result Visibility: default -->
<element name="TPaintBox.GetControlClassDefaultSize.Result">
<short/>
</element>
<!-- property Visibility: published -->
<element name="TPaintBox.DragCursor" link="#LCL.Controls.TControl.DragCursor">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPaintBox.DragMode" link="#LCL.Controls.TControl.DragMode">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPaintBox.OnDragDrop" link="#LCL.Controls.TControl.OnDragDrop">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPaintBox.OnDragOver" link="#LCL.Controls.TControl.OnDragOver">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPaintBox.OnEndDrag" link="#LCL.Controls.TControl.OnEndDrag">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPaintBox.OnMouseWheel" link="#LCL.Controls.TControl.OnMouseWheel">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPaintBox.OnMouseWheelDown" link="#LCL.Controls.TControl.OnMouseWheelDown">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPaintBox.OnMouseWheelUp" link="#LCL.Controls.TControl.OnMouseWheelUp">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TPaintBox.OnStartDrag" link="#LCL.Controls.TControl.OnStartDrag">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomImage.FUseParentCanvas">
<short/>
<descr/>
<seealso/>
</element>
<!-- function Visibility: private -->
<element name="TCustomImage.GetCanvas">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- function result Visibility: default -->
<element name="TCustomImage.GetCanvas.Result">
<short/>
</element>
<!-- procedure Visibility: protected -->
<element name="TCustomImage.CalculatePreferredSize" link="#LCL.Controls.TControl.CalculatePreferredSize">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomImage.CalculatePreferredSize.PreferredWidth">
<short/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomImage.CalculatePreferredSize.PreferredHeight">
<short/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomImage.CalculatePreferredSize.WithThemeSpace">
<short/>
</element>
<!-- function Visibility: protected -->
<element name="TCustomImage.GetControlClassDefaultSize" link="#LCL.Controls.TControl.GetControlClassDefaultSize">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- function result Visibility: default -->
<element name="TCustomImage.GetControlClassDefaultSize.Result">
<short/>
</element>
<!-- property Visibility: public -->
<element name="TCustomImage.Canvas" link="#lcl.Controls.TGraphicControl.Canvas">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TImage.DragCursor" link="#LCL.Controls.TControl.DragCursor">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TImage.DragMode" link="#LCL.Controls.TControl.DragMode">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TImage.Enabled" link="#LCL.Controls.TControl.Enabled">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TImage.OnDblClick" link="#LCL.Controls.TControl.OnDblClick">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TImage.OnDragDrop" link="#LCL.Controls.TControl.OnDragDrop">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TImage.OnDragOver" link="#LCL.Controls.TControl.OnDragOver">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TImage.OnEndDrag" link="#LCL.Controls.TControl.OnEndDrag">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TImage.OnStartDrag" link="#LCL.Controls.TControl.OnStartDrag">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TImage.ParentShowHint" link="#LCL.Controls.TControl.ParentShowHint">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TImage.PopupMenu" link="#LCL.Controls.TControl.PopupMenu">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TImage.ShowHint" link="#LCL.Controls.TControl.ShowHint">
<short/>
<descr/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TBevel.Assign.Source">
<short/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomRadioGroup.FAutoFill">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomRadioGroup.fIgnoreClicks">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomRadioGroup.FLastClickedItemIndex">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomRadioGroup.FUpdatingItems">
<short/>
<descr/>
<seealso/>
</element>
<!-- procedure Visibility: private -->
<element name="TCustomRadioGroup.Changed">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomRadioGroup.Changed.Sender">
<short/>
</element>
<!-- procedure Visibility: private -->
<element name="TCustomRadioGroup.ItemEnter">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomRadioGroup.ItemEnter.Sender">
<short/>
</element>
<!-- procedure Visibility: private -->
<element name="TCustomRadioGroup.ItemExit">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomRadioGroup.ItemExit.Sender">
<short/>
</element>
<!-- procedure Visibility: private -->
<element name="TCustomRadioGroup.ItemKeyDown">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomRadioGroup.ItemKeyDown.Sender">
<short/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomRadioGroup.ItemKeyDown.Key">
<short/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomRadioGroup.ItemKeyDown.Shift">
<short/>
</element>
<!-- procedure Visibility: private -->
<element name="TCustomRadioGroup.ItemResize">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomRadioGroup.ItemResize.Sender">
<short/>
</element>
<!-- procedure Visibility: private -->
<element name="TCustomRadioGroup.SetAutoFill">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomRadioGroup.SetAutoFill.AValue">
<short/>
</element>
<!-- procedure Visibility: private -->
<element name="TCustomRadioGroup.UpdateControlsPerLine">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- procedure Visibility: private -->
<element name="TCustomRadioGroup.UpdateItems">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- procedure Visibility: private -->
<element name="TCustomRadioGroup.UpdateTabStops">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- procedure Visibility: protected -->
<element name="TCustomRadioGroup.Loaded" link="#rtl.Classes.TComponent.Loaded">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- procedure Visibility: protected -->
<element name="TCustomRadioGroup.InitializeWnd" link="#LCL.Controls.TWinControl.InitializeWnd">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- procedure Visibility: protected -->
<element name="TCustomRadioGroup.SetItems">
<short>
<var>SetItems</var> - specifies the strings that form the Items of the group</short>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomRadioGroup.SetItems.Value">
<short/>
</element>
<!-- procedure Visibility: protected -->
<element name="TCustomRadioGroup.CheckItemIndexChanged">
<short>
<var>CheckItemIndexChanged</var> - find out if the index for an item has changes</short>
<descr/>
<errors/>
<seealso/>
</element>
<!-- property Visibility: public -->
<element name="TCustomRadioGroup.AutoFill">
<short>
<var>AutoFill</var> - whether responses to <var>Items</var> should automatically be filled in </short>
<descr/>
<seealso/>
</element>
<!-- property Visibility: public -->
<element name="TCustomRadioGroup.TabStop" link="#LCL.Controls.TWinControl.TabStop">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TRadioGroup.AutoFill" link="ExtCtrls.TCustomRadioGroup.AutoFill">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TRadioGroup.AutoSize" link="#LCL.Controls.TControl.AutoSize">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TRadioGroup.ClientHeight" link="#LCL.Controls.TControl.ClientHeight">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TRadioGroup.ClientWidth" link="#LCL.Controls.TControl.ClientWidth">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TRadioGroup.DragCursor" link="#LCL.Controls.TControl.DragCursor">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TRadioGroup.DragMode" link="#LCL.Controls.TControl.DragMode">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TRadioGroup.Font" link="#LCL.Controls.TControl.Font">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TRadioGroup.OnDragDrop" link="#LCL.Controls.TControl.OnDragDrop">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TRadioGroup.OnDragOver" link="#lcl.Controls.TControl.OnDragOver">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TRadioGroup.OnEndDrag" link="#LCL.Controls.TControl.OnEndDrag">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TRadioGroup.OnStartDrag" link="#LCL.Controls.TControl.OnStartDrag">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TRadioGroup.ParentFont" link="#LCL.Controls.TControl.ParentFont">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TRadioGroup.TabOrder" link="#LCL.Controls.TWinControl.TabOrder">
<short/>
<descr/>
<seealso/>
</element>
<!-- property Visibility: published -->
<element name="TRadioGroup.TabStop" link="#LCL.Controls.TWinControl.TabStop">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomTrayIcon.FBalloonFlags">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomTrayIcon.FBalloonHint">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomTrayIcon.FBalloonTimeout">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomTrayIcon.FBalloonTitle">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomTrayIcon.FPopUpMenu">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomTrayIcon.FIcon">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomTrayIcon.FHint">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomTrayIcon.FVisible">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomTrayIcon.FShowIcon">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomTrayIcon.FNotifier">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomTrayIcon.FTimer">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomTrayIcon.FOnPaint">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomTrayIcon.FOnClick">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomTrayIcon.FOnDblClick">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomTrayIcon.FOnMouseDown">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomTrayIcon.FOnMouseUp">
<short/>
<descr/>
<seealso/>
</element>
<!-- variable Visibility: private -->
<element name="TCustomTrayIcon.FOnMouseMove">
<short/>
<descr/>
<seealso/>
</element>
<!-- function Visibility: private -->
<element name="TCustomTrayIcon.GetCanvas">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- function result Visibility: default -->
<element name="TCustomTrayIcon.GetCanvas.Result">
<short/>
</element>
<!-- procedure Visibility: private -->
<element name="TCustomTrayIcon.SetHint">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomTrayIcon.SetHint.AValue">
<short/>
</element>
<!-- procedure Visibility: private -->
<element name="TCustomTrayIcon.SetIcon">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomTrayIcon.SetIcon.AValue">
<short/>
</element>
<!-- procedure Visibility: private -->
<element name="TCustomTrayIcon.SetVisible">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomTrayIcon.SetVisible.Value">
<short/>
</element>
<!-- procedure Visibility: private -->
<element name="TCustomTrayIcon.HandleNotifierClose">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomTrayIcon.HandleNotifierClose.Sender">
<short/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomTrayIcon.HandleNotifierClose.CloseAction">
<short/>
</element>
<!-- procedure Visibility: private -->
<element name="TCustomTrayIcon.HandleNotifierTimeout">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomTrayIcon.HandleNotifierTimeout.Sender">
<short/>
</element>
<!-- procedure Visibility: private -->
<element name="TCustomTrayIcon.IconChanged">
<short/>
<descr/>
<errors/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomTrayIcon.IconChanged.Sender">
<short/>
</element>
<!-- variable Visibility: public -->
<element name="TCustomTrayIcon.Handle">
<short>Operating system <var>Handle</var> for the Tray Icon</short>
<descr/>
<seealso/>
</element>
<!-- argument Visibility: default -->
<element name="TCustomTrayIcon.Create.TheOwner">
<short/>
</element>
<!-- function result Visibility: default -->
<element name="TCustomTrayIcon.Hide.Result">
<short/>
</element>
<!-- function result Visibility: default -->
<element name="TCustomTrayIcon.Show.Result">
<short/>
</element>
<!-- procedure Visibility: public -->
<element name="TCustomTrayIcon.InternalUpdate">
<short>
<var>InternalUpdate</var> - updates any pending changes</short>
<descr>
The behavior of this method depends on the widgetset and it was added to provide an way to update items which either cannot be updated automatically upon change or would be too inneficient to be updated on each change. One example of this is the tray icon menu under LCL-Carbon. It is not automatically updated when changes are done to it's associated LCL TPopUpMenu, but changes are updated when InternalUpdate is called. This happens because the tray icon menus are Cocoa menus which don't match the Carbon menus from LCL-Carbon. Similar things happen in various other widgetsets, so InternalUpdate can be expected to update the menu and/or icon of the tray icon, if this is necessary. If such an update is not required, for example because it is automatically updated on each change, then InternalUpdate will simply do nothing, so it is always a safe function to call, regardless of the widgetset.
</descr>
<errors/>
<seealso/>
</element>
<!-- function result Visibility: default -->
<element name="TCustomTrayIcon.GetPosition.Result">
<short/>
</element>
<element name="TShape.OnEndDock" link="#LCL.Controls.TControl.OnEndDock"/>
<element name="TShape.OnStartDock" link="#LCL.Controls.TControl.OnStartDock"/>
<element name="TCustomImage.OnPictureChanged">
<short>
<var>OnPictureChanged</var> - event handler for a change in the picture</short>
</element>
<element name="TImage.OnMouseWheel" link="#LCL.Controls.TControl.OnMouseWheel"/>
<element name="TImage.OnMouseWheelDown" link="#LCL.Controls.TControl.OnMouseWheelDown"/>
<element name="TImage.OnMouseWheelUp" link="#LCL.Controls.TControl.OnMouseWheelUp"/>
<element name="TImage.OnPictureChanged" link="#LCL.ExtCtrls.TCustomImage.OnPictureChanged"/>
<element name="TRadioGroup.OnUTF8KeyPress" link="#LCL.Controls.TWinControl.OnUTF8KeyPress"/>
<element name="TCheckGroup.OnUTF8KeyPress" link="#LCL.Controls.TWinControl.OnUTF8KeyPress"/>
<element name="TLabeledEdit.OnUTF8KeyPress" link="#LCL.Controls.TWinControl.OnUTF8KeyPress"/>
<element name="TBalloonFlags">
<short>
<var>TBalloonFlags</var> enumerated type for flags on Tray Icon balloons</short>
</element>
<element name="TCustomPage.WSRegisterClass" link="#LCL.LCLClasses.TLCLComponent.WSRegisterClass"/>
<element name="TShape.WSRegisterClass" link="#LCL.LCLClasses.TLCLComponent.WSRegisterClass"/>
<element name="TCustomSplitter.WSRegisterClass" link="#LCL.LCLClasses.TLCLComponent.WSRegisterClass"/>
<element name="TPaintBox.WSRegisterClass" link="#LCL.LCLClasses.TLCLComponent.WSRegisterClass"/>
<element name="TCustomImage.WSRegisterClass" link="#LCL.LCLClasses.TLCLComponent.WSRegisterClass"/>
<element name="TBevel.WSRegisterClass" link="#LCL.LCLClasses.TLCLComponent.WSRegisterClass"/>
<element name="TCustomRadioGroup.WSRegisterClass" link="#LCL.LCLClasses.TLCLComponent.WSRegisterClass"/>
<element name="TCustomCheckGroup.WSRegisterClass" link="#LCL.LCLClasses.TLCLComponent.WSRegisterClass"/>
<element name="TCustomLabeledEdit.WSRegisterClass" link="#LCL.LCLClasses.TLCLComponent.WSRegisterClass"/>
<element name="TCustomPanel.WSRegisterClass" link="#LCL.LCLClasses.TLCLComponent.WSRegisterClass"/>
<element name="TCustomTrayIcon.WSRegisterClass" link="#LCL.LCLClasses.TLCLComponent.WSRegisterClass"/>
<element name="TTimer.Enabled" link="#LCL.CustomTimer.TCustomTimer.Enabled"/>
<element name="TTimer.Interval" link="#LCL.CustomTimer.TCustomTimer.Interval"/>
<element name="TTimer.OnTimer" link="#LCL.CustomTimer.TCustomTimer.OnTimer"/>
<element name="TTimer.OnStartTimer" link="#LCL.CustomTimer.TCustomTimer.OnStartTimer"/>
<element name="TTimer.OnStopTimer" link="#LCL.CustomTimer.TCustomTimer.OnStopTimer"/>
<element name="TCustomIdleTimer">
<short>
<var>TCustomIdleTimer</var> - base class for <var>TIdleTimer</var>
</short>
</element>
<element name="TCustomIdleTimer.SetAutoEnabled">
<short>
<var>SetAutoEnabled</var> puts the supplied boolean value into the AutoEnabled property and updates handlers</short>
</element>
<element name="TCustomIdleTimer.DoOnIdle">
<short>
<var>DoOnIdle</var> - action to be taken if the timer is idle</short>
</element>
<element name="TCustomIdleTimer.DoOnIdleEnd">
<short>
<var>DoOnIdleEnd</var> -action to be taken at the end of an idle period</short>
</element>
<element name="TCustomIdleTimer.DoOnUserInput">
<short>
<var>DoOnUserInput</var> - action to be taken when user input is detected</short>
</element>
<element name="TCustomIdleTimer.Loaded">
<seealso>
<link id="#rtl.Classes.TComponent.Loaded">TComponent.Loaded</link>
</seealso>
<short>
<var>Loaded</var> - calls inherited method and updates Handlers</short>
</element>
<element name="TCustomIdleTimer.Create">
<short>
<var>Create</var> - constructor for TCustomIdleTimer: calls inherited Create and initialises some local event variables</short>
</element>
<element name="TCustomIdleTimer.Destroy">
<short>
<var>Destroy</var> - destructor for <var>TCustomIdleTimer</var>: calls inherited <var>Destroy</var> after setting the <var>AutoEnabled</var> property False</short>
</element>
<element name="TCustomIdleTimer.AutoEnabled">
<short>
<var>AutoEnabled</var> - if True, Timer is automatically enabled</short>
</element>
<element name="TCustomIdleTimer.AutoStartEvent">
<short>
<var>AutoStartEvent</var> - the event that triggers autostart (either idle time-out or user input)</short>
<descr>AutoStartEvent defines, when Enabled is automatically set to true. This
is one of the following events:
<ul><li>on application becomes idle</li><li>on application stops being idle (e.g. user input or some timer fired)</li><li>user input, e.g. key press, mouse move</li>
</ul>
</descr>
</element>
<element name="TCustomIdleTimer.AutoEndEvent">
<short><var>AutoEndEvent</var> - the event that stops the timer by setting Enabled to false</short>
<descr>AutoEndEvent defines, when Enabled is automatically set to false. This
is one of the following events:
<ul><li>on application becomes idle</li><li>on application stops being idle (e.g. user input or some timer fired)</li><li>user input, e.g. key press, mouse move</li>
</ul>
</descr>
</element>
<element name="TCustomIdleTimer.FireOnIdle">
<short>
<var>FireOnIdle</var> - boolean property determining whether the timer should fire when idle</short>
</element>
<element name="TIdleTimer.Enabled" link="#LCL.CustomTimer.TCustomTimer.Enabled"/>
<element name="TIdleTimer.Interval" link="#LCL.CustomTimer.TCustomTimer.Interval"/>
<element name="TIdleTimer.OnTimer" link="#LCL.CustomTimer.TCustomTimer.OnTimer"/>
<element name="TIdleTimer.OnStartTimer" link="#LCL.CustomTimer.TCustomTimer.OnStartTimer"/>
<element name="TIdleTimer.OnStopTimer" link="#LCL.CustomTimer.TCustomTimer.OnStopTimer"/>
<element name="TFlowPanel">
<short>Container with flow layout of controls placed in it.</short>
<descr>
<p>Use TFloatPanel if you need a container with float layout.
The Anchors and Align properties of child controls are ignored.
</p><p>The floating direction is determined with
<link id="#LCL.extctrls.TCustomFlowPanel.FlowStyle">FlowStyle</link> property.</p>
</descr>
</element>
<element name="TCustomFlowPanel.AutoWrap"><short>Determine if controls in TCustomFlowPanel are wrapped.</short>
</element><element name="TCustomFlowPanel.ControlList"><short>Use ControlList to set extra options of flow panel controls.</short>
</element><element name="TCustomFlowPanel.FlowStyle"><short>Use FlowStyle to determine the flow direction of the flow panel layout.</short>
</element><element name="TFlowPanelControl.Control"><short>The associated control to the flow panel control item.</short><descr>Don't set the Control property manually. It is used iternally by the designer.</descr>
</element><element name="TFlowPanelControl.WrapAfter"><short>Determines the wrap policy after this control.</short><descr>Valid only if <link id="#LCLBase.TCustomFlowPanel.AutoWrap">TFlowPanel.AutoWrap</link> = True.</descr>
</element><element name="TCustomFlowPanel"><short>The base class for <link id="#LCLBase.extctrls.TFlowPanel">TFlowPanel</link>
</short>
</element>
<element name="TCustomFlowPanel.FlowLayout"><short>Use FlowLayout to set the layout (alignment) for the non-flow coordinate. Default: tlTop</short><descr>In case of horizontal/vertical flow style:
tlTop: top/left alignment in row/column
tlCenter: center
tlBottom: bottom/right</descr>
</element>
</module>
<!-- ExtCtrls -->
</package>
</fpdoc-descriptions>
Reference in New Issue View Git Blame Copy Permalink