<?xml version="1.0"?>
<fpdoc-descriptions>
  <package name="lcl">
    <!--
  ====================================================================
    Forms
  ====================================================================
-->
    <module name="Forms">
      <short>Contains definitions and descriptions for constructing the Forms which are the basis of the Lazarus Graphical User Interface</short>
      <descr/>
      <!-- unresolved type reference Visibility: default -->
      <element name="Classes">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- unresolved type reference Visibility: default -->
      <element name="SysUtils">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- unresolved type reference Visibility: default -->
      <element name="TypInfo">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- unresolved type reference Visibility: default -->
      <element name="Math">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- unresolved type reference Visibility: default -->
      <element name="AvgLvlTree">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- unresolved type reference Visibility: default -->
      <element name="Maps">
        <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="LCLIntf">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- unresolved type reference Visibility: default -->
      <element name="InterfaceBase">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- unresolved type reference Visibility: default -->
      <element name="LResources">
        <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="Menus">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- unresolved type reference Visibility: default -->
      <element name="LMessages">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- unresolved type reference Visibility: default -->
      <element name="CustomTimer">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- unresolved type reference Visibility: default -->
      <element name="ActnList">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- unresolved type reference Visibility: default -->
      <element name="ClipBrd">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- unresolved type reference Visibility: default -->
      <element name="CustApp">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- unresolved type reference Visibility: default -->
      <element name="HelpIntfs">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- unresolved type reference Visibility: default -->
      <element name="LCLClasses">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- unresolved type reference Visibility: default -->
      <element name="Controls">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- procedure type Visibility: default -->
      <element name="TProcedure">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- procedure type Visibility: default -->
      <element name="TProcedureOfObject">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- enumeration type Visibility: default -->
      <element name="TPosition">
        <short>Represents the Position and Size on Screen of an Form</short>
        <descr>
          <p>poDesigned - The Form appears exactly as it is positioned and sized in the Form Designer</p>
          <p>poDefault - The window manager decides how the form is to appear, in a default position and size</p>
          <p>poDefaultPosOnly - keeps the Designed size, but position determined by windowmanager</p>
          <p>poDefaultSizeOnly - keeps the Designed position, but size determined by windowmanager</p>
          <p>poScreenCenter - Centers the form on screen</p>
          <p>poDeskTopCenter - Centers the form on desktop</p>
          <p>poMainFormCenter - Centers the Form on the Main Form</p>
          <p>poOwnerFormCenter - Centers the Form on Owner form</p>
        </descr>
        <seealso/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TPosition.poDesigned">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TPosition.poDefault">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TPosition.poDefaultPosOnly">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TPosition.poDefaultSizeOnly">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TPosition.poScreenCenter">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TPosition.poDesktopCenter">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TPosition.poMainFormCenter">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TPosition.poOwnerFormCenter">
        <short/>
      </element>
      <!-- enumeration type Visibility: default -->
      <element name="TWindowState">
        <short>Represents the actual State of the window on the screen</short>
        <descr>
          <p>wsNormal - The window appears normal</p>
          <p>wsMinimized - The window appears minimized</p>
          <p>wsMaximized - The window appears maximized</p>
        </descr>
        <seealso/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TWindowState.wsNormal">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TWindowState.wsMinimized">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TWindowState.wsMaximized">
        <short/>
      </element>
      <!-- enumeration type Visibility: default -->
      <element name="TCloseAction">
        <short/>
        <descr/>
        <seealso>
          <link id="TCustomForm.OnClose">TCustomForm.OnClose</link>
        </seealso>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TCloseAction.caNone">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TCloseAction.caHide">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TCloseAction.caFree">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TCloseAction.caMinimize">
        <short/>
      </element>
      <!-- object Visibility: default -->
      <element name="TScrollingWinControl">
        <short>
          <var>TScrollingWinControl</var> - a class of Window Control that has one or more scroll bars</short>
        <descr>Scrolling Window Control: A window control with scroll bars.
An ancestor class for many forms with scrolling windows
</descr>
        <errors/>
        <seealso/>
      </element>
      <!-- object Visibility: default -->
      <element name="TCustomHintAction">
        <short>
          <var>TCustomHintAction</var> - Base class for <var>THintAction</var>, the action for displaying a Hint</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TCustomHintAction.Hint" link="#LCL.ActnList.TCustomAction.Hint">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- enumeration type Visibility: default -->
      <element name="TScrollBarKind">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TScrollBarKind.sbHorizontal">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TScrollBarKind.sbVertical">
        <short/>
      </element>
      <!-- range type Visibility: default -->
      <element name="TScrollBarInc">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- enumeration type Visibility: default -->
      <element name="TScrollBarStyle">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TScrollBarStyle.ssRegular">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TScrollBarStyle.ssFlat">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TScrollBarStyle.ssHotTrack">
        <short/>
      </element>
      <!-- object Visibility: default -->
      <element name="EScrollBar">
        <short>Exception in Scroll Bar</short>
        <descr>Exception class for Scroll Bar</descr>
        <errors/>
        <seealso/>
      </element>
      <!-- object Visibility: default -->
      <element name="TControlScrollBar">
        <short>
          <var>TControlScrollBar</var> - base class for defining scroll bars on Forms and windows</short>
        <descr>Control Scroll Bar: Scroll Bar control for adding to windows. Can be horizontal or vertical.<br/>

This is an ancestor class for many form types and classes of windowed controls
</descr>
        <errors/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TControlScrollBar.FAutoRange">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TControlScrollBar.FIncrement">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TControlScrollBar.FKind">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TControlScrollBar.FPage">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TControlScrollBar.FPosition">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TControlScrollBar.FRange">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TControlScrollBar.FSmooth">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TControlScrollBar.FVisible">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TControlScrollBar.FOldScrollInfo">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TControlScrollBar.FOldScrollInfoValid">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: protected -->
      <element name="TControlScrollBar.FControl">
        <short>
          <var>FControl</var> - local variable to hold the Window Control to which the scroll bar belongs</short>
        <descr/>
        <seealso/>
      </element>
      <!-- function Visibility: protected -->
      <element name="TControlScrollBar.ControlAutoScroll">
        <short>
          <var>ControlAutoScroll</var> - returns True if the control can Auto-Scroll</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TControlScrollBar.ControlAutoScroll.Result">
        <short/>
      </element>
      <!-- function Visibility: protected -->
      <element name="TControlScrollBar.ControlHandle">
        <short>
          <var>ControlHandle</var> - the operating system handle for this control</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TControlScrollBar.ControlHandle.Result">
        <short/>
      </element>
      <!-- function Visibility: protected -->
      <element name="TControlScrollBar.GetIncrement">
        <short>
          <var>GetIncrement</var> - returns the size of the increment for each slick in the scroll bar</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TControlScrollBar.GetIncrement.Result">
        <short/>
      </element>
      <!-- function Visibility: protected -->
      <element name="TControlScrollBar.GetPage">
        <short>
          <var>GetPage</var> - returns the size of the Page-Down (or -Up) Increment for the scroll bar</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TControlScrollBar.GetPage.Result">
        <short/>
      </element>
      <!-- function Visibility: protected -->
      <element name="TControlScrollBar.GetPosition">
        <short>
          <var>GetPosition</var> returns the position of the slider in the scroll bar</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TControlScrollBar.GetPosition.Result">
        <short/>
      </element>
      <!-- function Visibility: protected -->
      <element name="TControlScrollBar.GetRange">
        <short>
          <var>GetRange</var> - returns the valid range of values for the scroll bar movement</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TControlScrollBar.GetRange.Result">
        <short/>
      </element>
      <!-- function Visibility: protected -->
      <element name="TControlScrollBar.GetSize">
        <short>
          <var>GetSize</var> - returns the size of the scroll bar</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TControlScrollBar.GetSize.Result">
        <short/>
      </element>
      <!-- function Visibility: protected -->
      <element name="TControlScrollBar.GetSmooth">
        <short>
          <var>GetSmooth</var> - returns True if smooth scrolling is to be used</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TControlScrollBar.GetSmooth.Result">
        <short/>
      </element>
      <!-- function Visibility: protected -->
      <element name="TControlScrollBar.GetVisible">
        <short>
          <var>GetVisible</var> - returns True if the scroll bar is visible</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TControlScrollBar.GetVisible.Result">
        <short/>
      </element>
      <!-- function Visibility: protected -->
      <element name="TControlScrollBar.HandleAllocated">
        <short>
          <var>HandleAllocated</var> - returns True if a handle has been allocated</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TControlScrollBar.HandleAllocated.Result">
        <short/>
      </element>
      <!-- function Visibility: protected -->
      <element name="TControlScrollBar.SmoothIsStored">
        <short>
          <var>SmoothIsStored</var> - returns True if the Smooth status has been stored</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TControlScrollBar.SmoothIsStored.Result">
        <short/>
      </element>
      <!-- function Visibility: protected -->
      <element name="TControlScrollBar.VisibleIsStored">
        <short>
          <var>VisibleIsStored</var> - returns True if the Visible status has been stored</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TControlScrollBar.VisibleIsStored.Result">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TControlScrollBar.AutoCalcRange">
        <short>
          <var>AutoCalcRange</var> - method for automatically calculating the range of values for the scroll bar</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TControlScrollBar.ControlUpdateScrollBars">
        <short>
          <var>ControlUpdateScrollBars</var> - method to be used by the owner control for updating its scrollbars</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TControlScrollBar.ScrollHandler">
        <short>
          <var>ScrollHandler</var> - message handler to control scrolling</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TControlScrollBar.ScrollHandler.Message">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TControlScrollBar.SetIncrement">
        <short>
          <var>SetIncrement</var> - specifies the scrolling increment</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TControlScrollBar.SetIncrement.AValue">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TControlScrollBar.SetPage">
        <short>
          <var>SetPage</var> - specifies the page scrolling increment</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TControlScrollBar.SetPage.AValue">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TControlScrollBar.SetPosition">
        <short>
          <var>SetPosition</var> - specifies the position of the slider in the scroll bar</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TControlScrollBar.SetPosition.Value">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TControlScrollBar.SetRange">
        <short>
          <var>SetRange</var> - specifies the range of values for the scroll bar</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TControlScrollBar.SetRange.Value">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TControlScrollBar.SetSize">
        <short>
          <var>SetSize</var> - specifies the size of the scroll bar</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TControlScrollBar.SetSize.AValue">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TControlScrollBar.SetSmooth">
        <short>
          <var>SetSmooth</var> - specifies whether smooth scrolling is to be used</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TControlScrollBar.SetSmooth.Value">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TControlScrollBar.SetVisible">
        <short>
          <var>SetVisible</var> - specifies whether the scroll bar is to be visible</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TControlScrollBar.SetVisible.Value">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TControlScrollBar.UpdateScrollBar">
        <short>
          <var>UpdateScrollBar</var> - method to update the scroll bar (position etc)</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TControlScrollBar.InvalidateScrollInfo">
        <short>
          <var>InvalidateScrollInfo</var> - method to render scroll information non-valid</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- constructor Visibility: public -->
      <element name="TControlScrollBar.Create">
        <descr/>
        <errors/>
        <seealso>
          <link id="#rtl.System.TObject.Create">TObject.Create</link>
        </seealso>
        <short>
          <var>Create</var> - constructor for <var>TControlScrollBar</var>: performs inherited <var>Create</var> then initialises local flags for page, increment, position etc</short>
      </element>
      <!-- argument Visibility: default -->
      <element name="TControlScrollBar.Create.AControl">
        <short>The identity of the windowed control in which the scroll bar is found</short>
      </element>
      <!-- argument Visibility: default -->
      <element name="TControlScrollBar.Create.AKind">
        <short>Whether this is a horizontal or a vertical scrollbar</short>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TControlScrollBar.Assign">
        <short>
          <var>Assign</var> - if Source is a <var>TControlScrollBar</var>, copies properties to itself, else performs inherited <var>Assign</var>
        </short>
        <descr>Assigns the contents of the source object to the current object; in particular finds the increment, position, range and whether smooth scrolling is to  be feature and whether the scroll bar is visible
</descr>
        <errors/>
        <seealso>
          <link id="#rtl.Classes.TPersistent.Assign"/>
        </seealso>
      </element>
      <!-- argument Visibility: default -->
      <element name="TControlScrollBar.Assign.Source">
        <short>The object that called this instance of the class</short>
      </element>
      <!-- function Visibility: public -->
      <element name="TControlScrollBar.IsScrollBarVisible">
        <short>Visibility of scroll bar</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TControlScrollBar.IsScrollBarVisible.Result">
        <short>Returns 'True' if scroll bar visible</short>
      </element>
      <!-- function Visibility: public -->
      <element name="TControlScrollBar.ScrollPos">
        <short>Position of the indicator cursor on the scroll bar</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TControlScrollBar.ScrollPos.Result">
        <short>Returns position of the scroll cursor as an integer</short>
      </element>
      <!-- property Visibility: public -->
      <element name="TControlScrollBar.Kind">
        <short>Finds which kind of scroll bar this is: horizontal or vertical</short>
        <descr>Reads a flag to determine which kind of scroll bar</descr>
        <seealso/>
      </element>
      <!-- function Visibility: public -->
      <element name="TControlScrollBar.GetOtherScrollBar">
        <short>Finds out details of the other scroll bar</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TControlScrollBar.GetOtherScrollBar.Result">
        <short>Returns a link to the details of the other scroll bar</short>
      </element>
      <!-- function Visibility: public -->
      <element name="TControlScrollBar.GetHorzScrollBar">
        <short>
          <var>GetHorzScrollBar</var> - find the position and properties of the horizontal scroll bar</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TControlScrollBar.GetHorzScrollBar.Result">
        <short>Returns details of the horizontal scroll bar as a pointer to a structure</short>
      </element>
      <!-- function Visibility: public -->
      <element name="TControlScrollBar.GetVertScrollBar">
        <short>
          <var>GetVertScrollBar</var> - find the position and properties of the vertical scroll bar</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TControlScrollBar.GetVertScrollBar.Result">
        <short>Returns details of the vertical scroll bar as a pointer to a structure</short>
      </element>
      <!-- property Visibility: public -->
      <element name="TControlScrollBar.Size">
        <short>Determine the size of the scroll bar</short>
        <descr>Reads or writes a flag to determine the size; by default the size is not stored</descr>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TControlScrollBar.Increment">
        <short>The size of the scrolling increment</short>
        <descr>The amount by which the scroll indicator moves if the triangle at either end of the bar is selected.<br/>

Read or write a flag to determine the increment, an integer with a default value of 8 (pixels)</descr>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TControlScrollBar.Page">
        <short>The size of the paging increment for scrolling</short>
        <descr>The amount by which the scroll indicator moves if the cursor selects the scroll bar above, below or on either side of the scroll indicator. <br/>
Reads or writes a flag to determine paging increment; default value is 80 pixels</descr>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TControlScrollBar.Smooth">
        <short>Determine whether smooth scrolling is to be implemented</short>
        <descr>Reads or writes a flag to determine smooth scrolling, and sets a flag is the scrolling status is stored</descr>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TControlScrollBar.Position">
        <short>Position of the scroll bar</short>
        <descr>Reads or writes a flag with the position; default is zero</descr>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TControlScrollBar.Range">
        <short>The range (extent) of the scroll bar</short>
        <descr>Reads or writes a flag to determine the range; default is zero</descr>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TControlScrollBar.Visible">
        <short>Is the scroll bar visible?</short>
        <descr>Reads or writes flag to determine visibility, and sets a flag if the property is stored</descr>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TScrollingWinControl.FHorzScrollBar">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TScrollingWinControl.FVertScrollBar">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TScrollingWinControl.FAutoScroll">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TScrollingWinControl.FIsUpdating">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TScrollingWinControl.SetAutoScroll">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScrollingWinControl.SetAutoScroll.Value">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TScrollingWinControl.SetHorzScrollBar">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScrollingWinControl.SetHorzScrollBar.Value">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TScrollingWinControl.SetVertScrollBar">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScrollingWinControl.SetVertScrollBar.Value">
        <short/>
      </element>
      <!-- function Visibility: private -->
      <element name="TScrollingWinControl.StoreScrollBars">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TScrollingWinControl.StoreScrollBars.Result">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TScrollingWinControl.AlignControls">
        <short>
          <var>AlignControls</var> - calls inherited <var>AlignControls</var>, then calculates sizes for the scrollbars if required</short>
        <descr/>
        <errors/>
        <seealso>
          <link id="#LCL.Controls.TWinControl.AlignControls">TWinControl.AlignControls</link>
        </seealso>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScrollingWinControl.AlignControls.AControl">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScrollingWinControl.AlignControls.ARect">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TScrollingWinControl.CreateWnd">
        <short>
          <var>CreateWnd</var> - performs inherited <var>CreateWnd</var> then updates ScrollBars</short>
        <descr/>
        <errors/>
        <seealso>
          <link id="#LCL.Controls.TWinControl.CreateWnd">TWinControl.CreateWnd</link>
        </seealso>
      </element>
      <!-- function Visibility: protected -->
      <element name="TScrollingWinControl.GetClientScrollOffset">
        <short>
          <var>GetClientScrollOffset</var> - finds the position for scrollbars from the client, if any, otherwise sets default postiions</short>
        <descr/>
        <errors/>
        <seealso>
          <link id="#LCL.Controls.TControl.GetClientScrollOffset">TControl.GetClientScrollOffset</link>
        </seealso>
      </element>
      <!-- function result Visibility: default -->
      <element name="TScrollingWinControl.GetClientScrollOffset.Result">
        <short/>
      </element>
      <!-- function Visibility: protected -->
      <element name="TScrollingWinControl.GetLogicalClientRect">
        <short>
          <var>GetLogicalClientRect</var> - adjusts client rect to allow for size of scrollbars</short>
        <descr/>
        <errors/>
        <seealso>
          <link id="#LCL.Controls.TControl.GetLogicalClientRect">TControl.GetLogicalClientRect</link>
        </seealso>
      </element>
      <!-- function result Visibility: default -->
      <element name="TScrollingWinControl.GetLogicalClientRect.Result">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TScrollingWinControl.DoOnResize">
        <short>
          <var>DoOnResize</var> - performs inherited <var>DoOnResize</var> then updates scrollbars if needed</short>
        <descr/>
        <errors/>
        <seealso>
          <link id="#LCL.Controls.TControl.DoOnResize">TControl.DoOnResize</link>
        </seealso>
      </element>
      <!-- function Visibility: protected -->
      <element name="TScrollingWinControl.GetControlClassDefaultSize">
        <short>
          <var>GetControlClassDefaultSize</var> inserts its own defaults, overriding inherited values</short>
        <descr/>
        <errors/>
        <seealso>
          <link id="#LCL.Controls.TControl.GetControlClassDefaultSize">TControl.GetControlClassDefaultSize</link>
        </seealso>
      </element>
      <!-- function result Visibility: default -->
      <element name="TScrollingWinControl.GetControlClassDefaultSize.Result">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TScrollingWinControl.WMHScroll">
        <short>
          <var>WMHScroll</var> - system message method for horizontal scrolling</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScrollingWinControl.WMHScroll.Message">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TScrollingWinControl.WMVScroll">
        <short>
          <var>WMVScroll</var> - system message method for vertical scroling</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScrollingWinControl.WMVScroll.Message">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TScrollingWinControl.ScrollBy">
        <short>
          <var>ScrollBy</var> - amount by which to scroll</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScrollingWinControl.ScrollBy.DeltaX">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScrollingWinControl.ScrollBy.DeltaY">
        <short/>
      </element>
      <!-- function Visibility: protected -->
      <element name="TScrollingWinControl.ComputeScrollbars">
        <short>
          <var>ComputeScrollbars</var> - returns True if scroll bar positions need to be computed</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TScrollingWinControl.ComputeScrollbars.Result">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TScrollingWinControl.ScrollbarHandler">
        <short>
          <var>ScrollbarHandler</var> - method for handling scroll bars of specified kind at specified position</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScrollingWinControl.ScrollbarHandler.ScrollKind">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScrollingWinControl.ScrollbarHandler.OldPosition">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TScrollingWinControl.Loaded">
        <short>
          <var>Loaded</var> - calls inherited <var>Loaded</var> and updates scroll bars</short>
        <descr/>
        <errors/>
        <seealso>
          <link id="#LCL.Controls.TWinControl.Loaded">TWinControl.Loaded</link>
        </seealso>
      </element>
      <!-- constructor Visibility: public -->
      <element name="TScrollingWinControl.Create">
        <descr>This constructor can override the constructor of an ancestor class
</descr>
        <errors/>
        <seealso>
          <link id="#LCL.Controls.TCustomControl.Create">TCustomControl.Create</link>
        </seealso>
        <short>
          <var>Create</var> - constructor for <var>TScrollingWinControl</var>: performs inherited <var>Create</var> then creates and intiialises the scrollbars</short>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScrollingWinControl.Create.TheOwner">
        <short/>
      </element>
      <!-- destructor Visibility: public -->
      <element name="TScrollingWinControl.Destroy">
        <descr>Can override destructor of parent class
</descr>
        <errors/>
        <seealso>
          <link id="#LCL.Controls.TCustomControl.Destroy"/>
        </seealso>
        <short>
          <var>Destroy</var> - destructor for <var>TScrollingWinControl</var>: frees the horizontal and vertical scrollbars, then performs inherited <var>Destroy</var>
        </short>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TScrollingWinControl.UpdateScrollbars">
        <short>Update the position of the scroll indicatores in the scroll bars</short>
        <descr>Checks if the scroll bars are in process of being loaded or destroyed; <br/>
if so, or if there is no valid handle, exit. <br/>
If the indicators are valid, re-computes position etc</descr>
        <errors/>
        <seealso/>
      </element>
      <!-- function Visibility: public -->
      <element name="TScrollingWinControl.HasVisibleScrollbars">
        <short>Whether the scroll bars are visible</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TScrollingWinControl.HasVisibleScrollbars.Result">
        <short/>
      </element>
      <!-- property Visibility: published -->
      <element name="TScrollingWinControl.AutoScroll">
        <short>Does auto-scrolling apply?</short>
        <descr>Reads or writes a flag to determine auto-scrolling</descr>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TScrollingWinControl.HorzScrollBar">
        <short>The properties of the horizontal scroll bar</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TScrollingWinControl.VertScrollBar">
        <short>The properties of the vertical scroll bar</short>
        <descr/>
        <seealso/>
      </element>
      <!-- object Visibility: default -->
      <element name="TScrollBox">
        <short>Scroll Box: A box with scroll bars</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- constructor Visibility: public -->
      <element name="TScrollBox.Create" link="#LCL.Forms.TScrollingWinControl.Create">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScrollBox.Create.AOwner">
        <short/>
      </element>
      <!-- property Visibility: published -->
      <element name="TScrollBox.Align" link="#LCL.Controls.TControl.Align">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TScrollBox.Anchors" link="#LCL.Controls.TControl.Anchors">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TScrollBox.AutoSize" link="#LCL.Controls.TControl.AutoSize">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TScrollBox.BorderSpacing" link="#LCL.Controls.TControl.BorderSpacing">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TScrollBox.BiDiMode" link="#LCL.Controls.TControl.BiDiMode">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TScrollBox.BorderStyle" link="#LCL.Controls.TWinControl.BorderStyle">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TScrollBox.ChildSizing" link="#LCL.Controls.TWinControl.ChildSizing">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TScrollBox.Constraints" link="#LCL.Controls.TControl.Constraints">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TScrollBox.DragCursor" link="#LCL.Controls.TControl.DragCursor">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TScrollBox.DragKind" link="#LCL.Controls.TControl.DragKind">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TScrollBox.DragMode" link="#LCL.Controls.TControl.DragMode">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TScrollBox.Enabled" link="#LCL.Controls.TControl.Enabled">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TScrollBox.Color" link="#LCL.Controls.TControl.Color">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TScrollBox.Ctl3D" link="#LCL.Controls.TControl.Ctl3D">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TScrollBox.Font" link="#LCL.Controls.TControl.Font">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TScrollBox.ParentBiDiMode" link="#LCL.Controls.TControl.ParentBiDiMode">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TScrollBox.ParentColor" link="#LCL.Controls.TControl.ParentColor">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TScrollBox.ParentCtl3D" link="#LCL.Controls.TWinControl.ParentCtl3D">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TScrollBox.ParentFont" link="#LCL.Controls.TControl.ParentFont">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TScrollBox.ParentShowHint" link="#LCL.Controls.TControl.ParentShowHint">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TScrollBox.PopupMenu" link="#LCL.Controls.TControl.PopupMenu">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TScrollBox.ShowHint" link="#LCL.Controls.TControl.ShowHint">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TScrollBox.TabOrder" link="#LCL.Controls.TWinControl.TabOrder">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TScrollBox.TabStop" link="#LCL.Controls.TWinControl.TabStop">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TScrollBox.Visible" link="#LCL.Controls.TControl.Visible">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TScrollBox.OnClick" link="#LCL.Controls.TControl.OnClick">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TScrollBox.OnConstrainedResize" link="#LCL.Controls.TControl.OnConstrainedResize">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TScrollBox.OnDblClick" link="#LCL.Controls.TControl.OnDblClick">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TScrollBox.OnDragDrop" link="#LCL.Controls.TControl.OnDragDrop">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TScrollBox.OnDragOver" link="#LCL.Controls.TControl.OnDragOver">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TScrollBox.OnEndDrag" link="#LCL.Controls.TControl.OnEndDrag">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TScrollBox.OnEnter" link="#LCL.Controls.TWinControl.OnEnter">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TScrollBox.OnExit" link="#LCL.Controls.TWinControl.OnExit">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TScrollBox.OnMouseDown" link="#LCL.Controls.TControl.OnMouseDown">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TScrollBox.OnMouseMove" link="#LCL.Controls.TControl.OnMouseMove">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TScrollBox.OnMouseUp" link="#LCL.Controls.TControl.OnMouseUp">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TScrollBox.OnMouseWheel" link="#LCL.Controls.TControl.OnMouseWheel">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TScrollBox.OnMouseWheelDown" link="#LCL.Controls.TControl.OnMouseWheelDown">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TScrollBox.OnMouseWheelUp" link="#LCL.Controls.TControl.OnMouseWheelUp">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TScrollBox.OnResize" link="#LCL.Controls.TControl.OnResize">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TScrollBox.OnStartDrag" link="#LCL.Controls.TControl.OnStartDrag">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TScrollBox.OnPaint" link="#LCL.Controls.TCustomControl.OnPaint">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- object Visibility: default -->
      <element name="TCustomFrame">
        <short>
          <var>TCustomFrame</var> - the base type for <var>TFrame</var>
        </short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TCustomFrame.AddActionList">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomFrame.AddActionList.ActionList">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TCustomFrame.RemoveActionList">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomFrame.RemoveActionList.ActionList">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TCustomFrame.GetChildren">
        <short>
          <var>GetChildren</var> - calls inherited <var>GetChildren</var> then accepts ownership of all owned components that have no parent</short>
        <descr/>
        <errors/>
        <seealso>
          <link id="#rtl.Classes.TComponent.GetChildren">TComponent.GetChildren</link>
          <link id="#LCL.Controls.TWinControl.GetChildren">TWinControl.GetChildren</link>
        </seealso>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomFrame.GetChildren.Proc">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomFrame.GetChildren.Root">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TCustomFrame.Notification">
        <short>
          <var>Notification</var> calls inherited Notification then add or removes the component's action list (depending on what Operation specifies)</short>
        <descr/>
        <errors/>
        <seealso>
          <link id="#rtl.Classes.TComponent.Notification">TComponent.Notification</link>
          <link id="#LCL.Controls.TControl.Notification">TControl.Notification</link>
        </seealso>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomFrame.Notification.AComponent">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomFrame.Notification.Operation">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TCustomFrame.SetParent">
        <short>
          <var>SetParent</var> - calls inherited <var>Setparent</var> after validity checks, then updates the action lists </short>
        <descr/>
        <errors/>
        <seealso>
          <link id="#LCL.Controls.TControl.SetParent">TControl.SetParent</link>
        </seealso>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomFrame.SetParent.AParent">
        <short/>
      </element>
      <!-- function Visibility: protected -->
      <element name="TCustomFrame.GetControlClassDefaultSize">
        <short>
          <var>GetControlClassDefaultSize</var> - returns its own defaults for frame design, overriding the inherited values</short>
        <descr/>
        <errors/>
        <seealso>
          <link id="#LCL.Controls.TControl.GetControlClassDefaultSize">TControl.GetControlClassDefaultSize</link>
        </seealso>
      </element>
      <!-- function result Visibility: default -->
      <element name="TCustomFrame.GetControlClassDefaultSize.Result">
        <short/>
      </element>
      <!-- constructor Visibility: public -->
      <element name="TCustomFrame.Create">
        <short>
          <var>Create</var> - constructor for <var>TCustomFrame</var>: performs inherited <var>Create</var> then initialises styles, bounds etc</short>
        <descr/>
        <errors/>
        <seealso>
          <link id="#LCL.Forms.TScrollingWinControl.Create">TScrollingWinControl.Create</link>
        </seealso>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomFrame.Create.AOwner">
        <short/>
      </element>
      <!-- "class of" type Visibility: default -->
      <element name="TCustomFrameClass">
        <short>
          <var>TCustomFrameClass</var> - class of <var>TCustomFrame</var>
        </short>
        <descr/>
        <seealso/>
      </element>
      <!-- object Visibility: default -->
      <element name="TFrame">
        <short>
          <var>TFrame</var> - a container for all the other components on a form, or for a group of components within a form</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TFrame.Align" link="#LCL.Controls.TControl.Align">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TFrame.Anchors" link="#LCL.Controls.TControl.Anchors">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TFrame.AutoScroll" link="#LCL.Forms.TScrollingWinControl.AutoScroll">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TFrame.AutoSize" link="#LCL.Controls.TControl.AutoSize">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TFrame.Constraints" link="#LCL.Controls.TControl.Constraints">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TFrame.DockSite" link="#LCL.Controls.TWinControl.DockSite">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TFrame.DragCursor" link="#LCL.Controls.TControl.DragCursor">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TFrame.DragKind" link="#LCL.Controls.TControl.DragKind">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TFrame.DragMode" link="#LCL.Controls.TControl.DragMode">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TFrame.Enabled" link="#LCL.Controls.TControl.Enabled">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TFrame.Color" link="#LCL.Controls.TControl.Color">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TFrame.Ctl3D" link="#LCL.Controls.TControl.Ctl3D">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TFrame.Font" link="#LCL.Controls.TControl.Font">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TFrame.ParentColor" link="#LCL.Controls.TControl.ParentColor">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TFrame.ParentCtl3D" link="#LCL.Controls.TWinControl.ParentCtl3D">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TFrame.ParentFont" link="#LCL.Controls.TControl.ParentFont">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TFrame.ParentShowHint" link="#LCL.Controls.TControl.ParentShowHint">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TFrame.PopupMenu" link="#LCL.Controls.TControl.PopupMenu">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TFrame.ShowHint" link="#LCL.Controls.TControl.ShowHint">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TFrame.TabOrder" link="#LCL.Controls.TWinControl.TabOrder">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TFrame.TabStop" link="#LCL.Controls.TWinControl.TabStop">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TFrame.Visible" link="#LCL.Controls.TControl.Visible">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TFrame.OnClick" link="#LCL.Controls.TControl.OnClick">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TFrame.OnConstrainedResize" link="#LCL.Controls.TControl.OnConstrainedResize">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TFrame.OnContextPopup" link="#LCL.Controls.TControl.OnContextPopup">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TFrame.OnDblClick" link="#LCL.Controls.TControl.OnDblClick">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TFrame.OnDockDrop" link="#LCL.Controls.TWinControl.OnDockDrop">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TFrame.OnDockOver" link="#LCL.Controls.TWinControl.OnDockOver">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TFrame.OnDragDrop" link="#LCL.Controls.TControl.OnDragDrop">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TFrame.OnDragOver" link="#LCL.Controls.TControl.OnDragOver">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TFrame.OnEndDock" link="#LCL.Controls.TControl.OnEndDock">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TFrame.OnEndDrag" link="#LCL.Controls.TControl.OnEndDrag">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TFrame.OnEnter" link="#LCL.Controls.TWinControl.OnEnter">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TFrame.OnExit" link="#LCL.Controls.TWinControl.OnExit">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TFrame.OnGetSiteInfo" link="#LCL.Controls.TWinControl.OnGetSiteInfo">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TFrame.OnMouseDown" link="#LCL.Controls.TControl.OnMouseDown">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TFrame.OnMouseMove" link="#LCL.Controls.TControl.OnMouseMove">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TFrame.OnMouseUp" link="#LCL.Controls.TControl.OnMouseUp">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TFrame.OnMouseWheel" link="#LCL.Controls.TControl.OnMouseWheel">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TFrame.OnMouseWheelDown" link="#LCL.Controls.TControl.OnMouseWheelDown">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TFrame.OnMouseWheelUp" link="#LCL.Controls.TControl.OnMouseWheelUp">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TFrame.OnResize" link="#LCL.Controls.TControl.OnResize">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TFrame.OnStartDock" link="#LCL.Controls.TControl.OnStartDock">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TFrame.OnStartDrag" link="#LCL.Controls.TControl.OnStartDrag">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TFrame.OnUnDock" link="#LCL.Controls.TWinControl.OnUnDock">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- object Visibility: default -->
      <element name="TIDesigner">
        <short>
          <var>TIDesigner</var> - a class describing a Form Designer</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- enumeration type Visibility: default -->
      <element name="TBorderIcon">
        <short>
          <var>TBorderIcon</var> - enumerated type to specify which icon appears on the top border of the Form</short>
        <descr>biSystemMenu - The form has a System menu (Maybe not all windowmanager supports this)<br/>

biMinimize - The form has an minimize button<br/>

biMaximize - The form has a maximize button<br/>

biHelp - When you click this button a Question Cursor appears and the help routines are called if you click on an control
</descr>
        <seealso/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TBorderIcon.biSystemMenu">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TBorderIcon.biMinimize">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TBorderIcon.biMaximize">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TBorderIcon.biHelp">
        <short/>
      </element>
      <!-- set type Visibility: default -->
      <element name="TBorderIcons">
        <short>
          <var>TBorderIcons</var> - set of <var>TBorderIcon</var>; the group of icons to appear at the top of the form</short>
        <descr/>
        <seealso/>
      </element>
      <!-- procedure type Visibility: default -->
      <element name="TCloseEvent">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCloseEvent.Sender">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCloseEvent.CloseAction">
        <short/>
      </element>
      <!-- procedure type Visibility: default -->
      <element name="TCloseQueryEvent">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCloseQueryEvent.Sender">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCloseQueryEvent.CanClose">
        <short/>
      </element>
      <!-- function type Visibility: default -->
      <element name="THelpEvent">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="THelpEvent.Result">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="THelpEvent.Command">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="THelpEvent.Data">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="THelpEvent.CallHelp">
        <short/>
      </element>
      <!-- procedure type Visibility: default -->
      <element name="TDropFilesEvent">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TDropFilesEvent.Sender">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TDropFilesEvent.FileNames">
        <short/>
      </element>
      <!-- procedure type Visibility: default -->
      <element name="TShortCutEvent">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TShortCutEvent.Msg">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TShortCutEvent.Handled">
        <short/>
      </element>
      <!-- enumeration type Visibility: default -->
      <element name="TFormStateType">
        <short>
          <var>TFormStateType</var> - enumerated type to describe the state of a form; whether it is being created or destroyed, its visibility, whether Modal etc</short>
        <descr>
          <p>The valid states are:</p>
          <pre>fsCreating,  // initializing (form streaming)
    fsVisible,   // form should be shown
    fsShowing,
    fsModal,     // form is modal
    fsCreatedMDIChild,
    fsBorderStyleChanged,
    fsFormStyleChanged,
    fsFirstShow,  // form is shown for the first time
    fsDisableAutoSize  </pre>
        </descr>
        <seealso/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TFormStateType.fsCreating">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TFormStateType.fsVisible">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TFormStateType.fsShowing">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TFormStateType.fsModal">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TFormStateType.fsCreatedMDIChild">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TFormStateType.fsBorderStyleChanged">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TFormStateType.fsFormStyleChanged">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TFormStateType.fsFirstShow">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TFormStateType.fsDisableAutoSize">
        <short/>
      </element>
      <!-- set type Visibility: default -->
      <element name="TFormState">
        <short>
          <var>TFormState</var> - the set of form states that apply to this form</short>
        <descr/>
        <seealso/>
      </element>
      <!-- range type Visibility: default -->
      <element name="TModalResult">
        <short>
          <var>TModalResult</var> - the range of values that can be returned as a modal result</short>
        <descr>
          <var>TModalResult</var> represents the value returned by a modal dialog. Even though the type is defined as an integer, instead a few standard constants are used as return results in applications.</descr>
        <seealso>
          <link id="controls.mrNone"/>
          <link id="controls.mrOK"/>
          <link id="controls.mrCancel"/>
          <link id="controls.mrAbort"/>
          <link id="controls.mrRetry"/>
          <link id="controls.mrIgnore"/>
          <link id="controls.mrYes"/>
          <link id="controls.mrNo"/>
          <link id="controls.mrAll"/>
        </seealso>
      </element>
      <!-- pointer type Visibility: default -->
      <element name="PModalResult">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- enumeration type Visibility: default -->
      <element name="TFormHandlerType">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TFormHandlerType.fhtFirstShow">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TFormHandlerType.fhtClose">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TFormHandlerType.fhtCreate">
        <short/>
      </element>
      <!-- enumeration type Visibility: default -->
      <element name="TShowInTaskbar">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TShowInTaskbar.stDefault">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TShowInTaskbar.stAlways">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TShowInTaskbar.stNever">
        <short/>
      </element>
      <!-- object Visibility: default -->
      <element name="TCustomForm">
        <short>
          <var>TCustomForm </var>- the base type for <var>TForm</var>
        </short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TCustomForm.FActive">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TCustomForm.FActiveControl">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TCustomForm.FActiveDefaultControl">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TCustomForm.FAllowDropFiles">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TCustomForm.FBorderIcons">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TCustomForm.FDefaultControl">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TCustomForm.FCancelControl">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TCustomForm.FDesigner">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TCustomForm.FDummyTextHeight">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TCustomForm.FFormState">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TCustomForm.FFormStyle">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TCustomForm.FFormUpdateCount">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TCustomForm.FFormHandlers">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TCustomForm.FHelpFile">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TCustomForm.FIcon">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TCustomForm.FKeyPreview">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TCustomForm.FMenu">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TCustomForm.FModalResult">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TCustomForm.FOldBorderStyle">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TCustomForm.FOnActivate">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TCustomForm.FOnClose">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TCustomForm.FOnCloseQuery">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TCustomForm.FOnCreate">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TCustomForm.FOnDeactivate">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TCustomForm.FOnDestroy">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TCustomForm.FOnDropFiles">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TCustomForm.FOnHelp">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TCustomForm.FOnHide">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TCustomForm.FOnShortcut">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TCustomForm.FOnShow">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TCustomForm.FOnWindowStateChange">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TCustomForm.FPixelsPerInch">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TCustomForm.FPosition">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TCustomForm.FRestoredLeft">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TCustomForm.FRestoredTop">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TCustomForm.FRestoredWidth">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TCustomForm.FRestoredHeight">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TCustomForm.FShowInTaskbar">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TCustomForm.FWindowState">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- function Visibility: private -->
      <element name="TCustomForm.GetPixelsPerInch">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TCustomForm.GetPixelsPerInch.Result">
        <short/>
      </element>
      <!-- function Visibility: private -->
      <element name="TCustomForm.GetRestoredLeft">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TCustomForm.GetRestoredLeft.Result">
        <short/>
      </element>
      <!-- function Visibility: private -->
      <element name="TCustomForm.GetRestoredTop">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TCustomForm.GetRestoredTop.Result">
        <short/>
      </element>
      <!-- function Visibility: private -->
      <element name="TCustomForm.IsForm">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TCustomForm.IsForm.Result">
        <short/>
      </element>
      <!-- function Visibility: private -->
      <element name="TCustomForm.IsHelpFileStored">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TCustomForm.IsHelpFileStored.Result">
        <short/>
      </element>
      <!-- function Visibility: private -->
      <element name="TCustomForm.IsIconStored">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TCustomForm.IsIconStored.Result">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TCustomForm.CloseModal">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TCustomForm.IconChanged">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.IconChanged.Sender">
        <short/>
      </element>
      <!-- function Visibility: private -->
      <element name="TCustomForm.IsKeyPreviewStored">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TCustomForm.IsKeyPreviewStored.Result">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TCustomForm.SetActive">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.SetActive.AValue">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TCustomForm.SetActiveControl">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.SetActiveControl.AWinControl">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TCustomForm.SetActiveDefaultControl">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.SetActiveDefaultControl.AControl">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TCustomForm.SetAllowDropFiles">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.SetAllowDropFiles.AValue">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TCustomForm.SetBorderIcons">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.SetBorderIcons.NewIcons">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TCustomForm.SetFormBorderStyle">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.SetFormBorderStyle.NewStyle">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TCustomForm.SetCancelControl">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.SetCancelControl.NewControl">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TCustomForm.SetDefaultControl">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.SetDefaultControl.NewControl">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TCustomForm.SetDesigner">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.SetDesigner.Value">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TCustomForm.SetFormStyle">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.SetFormStyle.Value">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TCustomForm.SetIcon">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.SetIcon.AValue">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TCustomForm.SetMenu">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.SetMenu.Value">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TCustomForm.SetModalResult">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.SetModalResult.AValue">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TCustomForm.SetPosition">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.SetPosition.Value">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TCustomForm.SetShowInTaskbar">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.SetShowInTaskbar.Value">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TCustomForm.SetWindowFocus">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TCustomForm.SetWindowState">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.SetWindowState.Value">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TCustomForm.WMActivate">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.WMActivate.Message">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TCustomForm.WMCloseQuery">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.WMCloseQuery.message">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TCustomForm.WMDeactivate">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.WMDeactivate.Message">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TCustomForm.WMPaint">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.WMPaint.message">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TCustomForm.WMShowWindow">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.WMShowWindow.message">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TCustomForm.WMSize">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.WMSize.message">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TCustomForm.CMBiDiModeChanged">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.CMBiDiModeChanged.Message">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TCustomForm.AddHandler">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.AddHandler.HandlerType">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.AddHandler.Handler">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.AddHandler.AsLast">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TCustomForm.RemoveHandler">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.RemoveHandler.HandlerType">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.RemoveHandler.Handler">
        <short/>
      </element>
      <!-- function Visibility: private -->
      <element name="TCustomForm.FindDefaultForActiveControl">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TCustomForm.FindDefaultForActiveControl.Result">
        <short/>
      </element>
      <!-- variable Visibility: protected -->
      <element name="TCustomForm.FFormBorderStyle">
        <short>
          <var>FFormBorderStyle</var> - local variable to hold style of border</short>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: protected -->
      <element name="TCustomForm.FActionLists">
        <short>
          <var>FActionLists</var> - local variable holding lists of actions asociated with the Form</short>
        <descr/>
        <seealso/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TCustomForm.CMShowingChanged">
        <short>
          <var>CMShowingChanged</var> - system message method for showing if the form has changed</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.CMShowingChanged.Message">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TCustomForm.Activate">
        <short>
          <var>Activate</var> - method for rendering the Form active</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TCustomForm.ActiveChanged">
        <short>
          <var>ActiveChanged</var> - method for a form that is active and changed</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TCustomForm.BeginFormUpdate">
        <short>
          <var>BeginFormUpdate</var> - start updating the Form</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TCustomForm.CreateParams">
        <short>
          <var>CreateParams</var> calls inherited <var>CreateParams</var>, and specifically copies style from parent</short>
        <descr/>
        <errors/>
        <seealso>
          <link id="#LCL.Controls.TWinControl.CreateParams">TWinControl.CreateParams</link>
        </seealso>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.CreateParams.Params">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TCustomForm.CreateWnd">
        <short>
          <var>CreateWnd</var> calls inherited <var>CreateWnd, </var>signals if a handle is required and attaches a menu to the window if one does not yet exist; activates focus if visible</short>
        <descr/>
        <errors/>
        <seealso>
          <link id="#LCL.Controls.TWinControl.CreateWnd">TWinControl.CreateWnd</link>
          <link id="#LCL.Forms.TScrollingWinControl.CreateWnd">TScrollingWinControl.CreateWnd</link>
        </seealso>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TCustomForm.Deactivate">
        <short>
          <var>Deactivate</var> - method for rendering the Form inactive</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TCustomForm.DestroyWnd" link="#LCL.Controls.TWinControl.DestroyWnd">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TCustomForm.DoClose">
        <short>
          <var>DoClose</var> - close the Form using the specified <var>CloseAction</var>
        </short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.DoClose.CloseAction">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TCustomForm.DoCreate">
        <short>
          <var>DoCreate</var> - perform the Create action</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TCustomForm.DoDestroy">
        <short>
          <var>DoDestroy</var>- perform the Destroy action</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TCustomForm.DoHide">
        <short>
          <var>DoHide</var> - method for hiding a previously visible object</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TCustomForm.DoShow">
        <short>
          <var>DoShow</var> - method to redender visible a previously hidden form</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TCustomForm.EndFormUpdate">
        <short>
          <var>EndFormUpdate</var> - finish updating the Form</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TCustomForm.GetChildren">
        <short>
          <var>GetChildren</var> calls inherited <var>GetChildren</var> then takes ownership of all components, including those  without parents</short>
        <descr/>
        <errors/>
        <seealso>
          <link id="#rtl.Classes.TComponent.GetChildren">TComponent.GetChildren</link>
          <link id="#LCL.Controls.TWinControl.GetChildren">TWinControl.GetChildren</link>
        </seealso>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.GetChildren.Proc">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.GetChildren.Root">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TCustomForm.Loaded">
        <short>
          <var>Loaded</var> - calls inherited <var>Loaded</var>, makes this the active control and gives it focus</short>
        <descr/>
        <errors/>
        <seealso>
          <link id="#rtl.Classes.TComponent.Loaded">TComponent.Loaded</link>
          <link id="#LCL.Forms.TScrollingWinControl.Loaded">TScrollingWinControl.Loaded</link>
        </seealso>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TCustomForm.ChildHandlesCreated">
        <short>
          <var>ChildHandlesCreated</var> - method for use when handles have been created for descendants</short>
        <descr/>
        <errors/>
        <seealso>
          <link id="#LCL.Controls.TWinControl.ChildHandlesCreated">TWinControl.ChildHandlesCreated</link>
        </seealso>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TCustomForm.Notification">
        <short>
          <var>Notification</var> calls inherited Notification then add or removes the component's action list (depending on what Operation specifies)</short>
        <descr/>
        <errors/>
        <seealso>
          <link id="#rtl.Classes.TComponent.Notification">TComponent.Notification</link>
        </seealso>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.Notification.AComponent">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.Notification.Operation">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TCustomForm.PaintWindow" link="#LCL.Controls.TCustomControl.PaintWindow">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.PaintWindow.dc">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TCustomForm.RequestAlign" link="#LCL.Controls.TControl.RequestAlign">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TCustomForm.SetZOrder">
        <short>
          <var>SetZOrder</var> - set the Z order for the Form; if <var>Topmost </var>is True, Form is on top of all other objects</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.SetZOrder.Topmost">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TCustomForm.SetParent" link="#LCL.Controls.TControl.SetParent">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.SetParent.NewParent">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TCustomForm.UpdateShowing">
        <short>
          <var>UpdateShowing</var> - method to update the <var>Visible</var> property</short>
        <descr/>
        <errors/>
        <seealso>
          <link id="#LCL.Controls.TWinControl.UpdateShowing">TWinControl.UpdateShowing</link>
        </seealso>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TCustomForm.SetVisible" link="#LCL.Controls.TControl.SetVisible">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.SetVisible.Value">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TCustomForm.DoFirstShow">
        <short>
          <var>DoFirstShow</var> - perform the first Show action since creation of the Form</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TCustomForm.UpdateWindowState">
        <short>
          <var>UpdateWindowState</var> - update the state of the Window displaying the Form</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TCustomForm.VisibleChanging">
        <short>
          <var>VisibleChanging</var> - method for dealing with a Form whose Visible property is changing</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TCustomForm.WndProc">
        <short>
          <var>WndProc</var> - performs actions specific to the message then calls inherited <var>WndProc</var>
        </short>
        <descr>
          <p>
            <var>WndProc</var> - performs actions specific to the message then calls inherited <var>WndProc</var>
          </p>
          <p>Specific messages include:</p>
          <p>Activate, SetFocus. KillFocus; Exit, Enter; Window Position Changing; Draw Item</p>
        </descr>
        <errors/>
        <seealso>
          <link id="#LCL.Controls.TControl.WndProc">TControl.WndProc</link>
          <link id="#LCL.Controls.TWinControl.WndProc">TWinControl.WndProc</link>
        </seealso>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.WndProc.TheMessage">
        <short/>
      </element>
      <!-- function Visibility: protected -->
      <element name="TCustomForm.FormIsUpdating" link="#LCL.Controls.TControl.FormIsUpdating">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TCustomForm.FormIsUpdating.Result">
        <short/>
      </element>
      <!-- function Visibility: protected -->
      <element name="TCustomForm.VisibleIsStored">
        <short>
          <var>VisibleIsStored</var> - True if the Visible property has been stored</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TCustomForm.VisibleIsStored.Result">
        <short/>
      </element>
      <!-- function Visibility: protected -->
      <element name="TCustomForm.ColorIsStored" link="#LCL.Controls.TControl.ColorIsStored">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TCustomForm.ColorIsStored.Result">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TCustomForm.DoSendBoundsToInterface" link="#LCL.Controls.TWinControl.DoSendBoundsToInterface">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TCustomForm.DoAutoSize" link="#LCL.Controls.TControl.DoAutoSize">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TCustomForm.SetAutoSize" link="#LCL.Controls.TControl.SetAutoSize">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.SetAutoSize.Value">
        <short/>
      </element>
      <!-- function Visibility: protected -->
      <element name="TCustomForm.GetControlClassDefaultSize" link="#LCL.Controls.TControl.GetControlClassDefaultSize">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TCustomForm.GetControlClassDefaultSize.Result">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TCustomForm.DoDock" link="#LCL.Controls.TControl.DoDock">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.DoDock.NewDockSite">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.DoDock.ARect">
        <short/>
      </element>
      <!-- function Visibility: protected -->
      <element name="TCustomForm.GetFloating" link="#LCL.Controls.TControl.GetFloating">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TCustomForm.GetFloating.Result">
        <short/>
      </element>
      <!-- function Visibility: protected -->
      <element name="TCustomForm.GetDefaultDockCaption">
        <short>
          <var>GetDefaultDockCaption</var> - returns the default caption to be used for docking</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TCustomForm.GetDefaultDockCaption.Result">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TCustomForm.CMActionExecute">
        <short>
          <var>CMActionExecute</var> - system message method for executing action</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.CMActionExecute.Message">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TCustomForm.CMActionUpdate">
        <short>
          <var>CMActionUpdate</var> - system message method for updating action</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.CMActionUpdate.Message">
        <short/>
      </element>
      <!-- function Visibility: protected -->
      <element name="TCustomForm.DoExecuteAction">
        <short>Asks every visible control to Execute the specified action <var>ExeAction</var>.</short>
        <descr>
          <p>DoExecuteAction asks every visible control to Execute the specified action <var>ExeAction</var>. If some control executes it and returns true, then the traversal of visible components is stopped. All child controls (and its children etc) are queried too.</p>
          <p>For example you have</p>
          <code>TForm
   TPanel
     TButton
     TCheckBox
   TMemo</code>
          <p>then the following controls are queried in this order: TPanel, TButton, TCheckBox, TMemo.</p>
          <p>But first of all, the Form itself and the ActiveControl are asked to execute the given action.</p>
        </descr>
      </element>
      <!-- function result Visibility: default -->
      <element name="TCustomForm.DoExecuteAction.Result">
        <short>True, if any control handles the action.</short>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.DoExecuteAction.ExeAction">
        <short>Action to execute.</short>
      </element>
      <!-- function Visibility: protected -->
      <element name="TCustomForm.DoUpdateAction">
        <short>
          <var>DoUpdateAction</var> - asks all visible controls to update the specified action</short>
        <descr/>
        <errors/>
        <seealso>
          <link id="#LCL.Forms.TCustomForm.DoExecuteAction">DoExecuteAction</link>
        </seealso>
      </element>
      <!-- function result Visibility: default -->
      <element name="TCustomForm.DoUpdateAction.Result">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.DoUpdateAction.TheAction">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TCustomForm.UpdateActions">
        <short>
          <var>UpdateActions</var> - method for updating actions</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- constructor Visibility: public -->
      <element name="TCustomForm.Create">
        <short>
          <var>Create</var> - constructor for <var>TCustomForm</var>: checks for correct <var>ClassType</var>, looks for required resources then creates the Form</short>
        <descr>This constructor can override the constructor of an ancestor class
</descr>
        <errors/>
        <seealso>
          <link id="#LCL.Forms.TScrollingWinControl.Create">TScrollingWinControl.Create</link>
        </seealso>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.Create.AOwner">
        <short/>
      </element>
      <!-- constructor Visibility: public -->
      <element name="TCustomForm.CreateNew">
        <short>
          <var>CreateNew</var> - constructor for creating a completely new form</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.CreateNew.AOwner">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.CreateNew.Num">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TCustomForm.BeforeDestruction">
        <short>
          <var>BeforeDestruction</var> - method to be applied before Form is destroyed (usually involves clean-up)</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function Visibility: public -->
      <element name="TCustomForm.GetIconHandle">
        <short>Find the handle for the Icon</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TCustomForm.GetIconHandle.Result">
        <short/>
      </element>
      <!-- destructor Visibility: public -->
      <element name="TCustomForm.Destroy">
        <short>
          <var>Destroy</var> -  destructor for <var>TCustomForm</var>: frees all menus, icons, actionlists, screens and handlers, then performs inherited <var>Destroy</var>
        </short>
        <descr/>
        <errors/>
        <seealso>
          <link id="#LCL.Forms.TScrollingWinControl.Destroy">TScrollingWinControl.Destroy</link>
        </seealso>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TCustomForm.Close">
        <short>Close the form and release its resources</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function Visibility: public -->
      <element name="TCustomForm.CloseQuery">
        <short>Is the associated query to be closed?</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TCustomForm.CloseQuery.Result">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TCustomForm.Release">
        <short>Set free the resources of the form </short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TCustomForm.Hide" link="#LCL.Controls.TControl.Hide">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TCustomForm.Show" link="#LCL.Controls.TControl.Show">
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TCustomForm.ShowOnTop">
        <short>Shows this form as the top (nearest) item of any stack of windows or images.</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TCustomForm.EnsureVisible">
        <short>Ensure that this form is always visible, if necessary moving it to the top (front) of the stack of images</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.EnsureVisible.AMoveToTop">
        <short/>
      </element>
      <!-- function Visibility: public -->
      <element name="TCustomForm.NeedParentForAutoSize" link="#LCL.Controls.TControl.NeedParentForAutoSize">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TCustomForm.NeedParentForAutoSize.Result">
        <short/>
      </element>
      <!-- function Visibility: public -->
      <element name="TCustomForm.WantChildKey">
        <short>
          <var>WantChildKey</var> - returns True if the specified child control requires a key (Message)</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TCustomForm.WantChildKey.Result">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.WantChildKey.Child">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.WantChildKey.Message">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TCustomForm.DefocusControl">
        <short>
          <var>DefocusControl</var> - withdraws focus from the specified control, removing it if required</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.DefocusControl.Control">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.DefocusControl.Removing">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TCustomForm.SetFocus" link="#LCL.Controls.TWinControl.SetFocus">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function Visibility: public -->
      <element name="TCustomForm.SetFocusedControl">
        <short>
          <var>SetFocusedControl</var> - method for giving focus to specified control; returns True if successful</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TCustomForm.SetFocusedControl.Result">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.SetFocusedControl.Control">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TCustomForm.FocusControl">
        <short>
          <var>FocusControl</var> - method for giving focus to specified control</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.FocusControl.WinControl">
        <short/>
      </element>
      <!-- function Visibility: public -->
      <element name="TCustomForm.ShowModal">
        <short>Show this form as modal - ie control cannot be resumed by another form until the current form is closed</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TCustomForm.ShowModal.Result">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TCustomForm.SetRestoredBounds">
        <short>
          <var>SetRestoredBounds</var> - set the bounds defining the position of the restored control</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.SetRestoredBounds.ALeft">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.SetRestoredBounds.ATop">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.SetRestoredBounds.AWidth">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.SetRestoredBounds.AHeight">
        <short/>
      </element>
      <!-- function Visibility: public -->
      <element name="TCustomForm.GetRolesForControl">
        <short>
          <var>GetRolesForControl</var> - returns a set of roles (default, cancel) for the Form </short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TCustomForm.GetRolesForControl.Result">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.GetRolesForControl.AControl">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TCustomForm.RemoveAllHandlersOfObject" link="#LCL.LCLClasses.TLCLComponent.RemoveAllHandlersOfObject">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.RemoveAllHandlersOfObject.AnObject">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TCustomForm.AddHandlerFirstShow">
        <short>
          <var>AddHandlerFirstShow</var> - perform the action for adding a handler at the time of first showing</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.AddHandlerFirstShow.OnFirstShowHandler">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.AddHandlerFirstShow.AsLast">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TCustomForm.RemoveHandlerFirstShow">
        <short>
          <var>RemoveHandlerFirstShow</var> - perform the action for removing the handler on the first showing</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.RemoveHandlerFirstShow.OnFirstShowHandler">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TCustomForm.AddHandlerClose">
        <short>
          <var>AddHandlerClose</var> - adds a handler for closing Form</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.AddHandlerClose.OnCloseHandler">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.AddHandlerClose.AsLast">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TCustomForm.RemoveHandlerClose">
        <short>
          <var>RemoveHandlerClose</var> - removes handler for closing form</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.RemoveHandlerClose.OnCloseHandler">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TCustomForm.AddHandlerCreate">
        <short>
          <var>AddHandlerCreate</var> - performs the OnCreateHandler event</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.AddHandlerCreate.OnCreateHandler">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.AddHandlerCreate.AsLast">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TCustomForm.RemoveHandlerCreate">
        <short>
          <var>RemoveHandlerCreate</var> - removes the handler for the Create event</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.RemoveHandlerCreate.OnCreateHandler">
        <short/>
      </element>
      <!-- function Visibility: public -->
      <element name="TCustomForm.IsShortcut">
        <short>
          <var>IsShortcut</var> - if True, the specified Key and Message are active as a shortcut</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TCustomForm.IsShortcut.Result">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.IsShortcut.Message">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TCustomForm.IntfDropFiles">
        <short>
          <var>IntfDropFiles</var> - Invokes <var>OnDropFilesEvent</var> of the form. This function is called by the interface. </short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.IntfDropFiles.FileNames">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TCustomForm.IntfHelp">
        <short>
          <var>IntfHelp</var> - Show help for control or menu item. This function is called by the interface.</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.IntfHelp.AComponent">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TCustomForm.Dock" link="#LCL.Controls.TControl.Dock">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.Dock.NewDockSite">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomForm.Dock.ARect">
        <short/>
      </element>
      <!-- property Visibility: public -->
      <element name="TCustomForm.Active">
        <short>Is true when the form has the focus</short>
        <descr>Use active to check if the form has the focus</descr>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TCustomForm.ActiveControl">
        <short>Specifies the active control on the form</short>
        <descr>Use this to get or set the active control on this form</descr>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TCustomForm.ActiveDefaultControl">
        <short>Specifies the active default control on the Form</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TCustomForm.AllowDropFiles">
        <short>Specifies if files are allowed to be dropped on this form.</short>
        <descr>Set AllowDropFiles event to True to allow dropping files on this form. It is set to False by default.
</descr>
        <seealso>
          <link id="TCustomForm.OnDropFiles"/>
        </seealso>
      </element>
      <!-- property Visibility: public -->
      <element name="TCustomForm.BorderIcons">
        <short>Specifies which icons appear on the top of the form</short>
        <descr>Use bordericons flags to get or set the icons that appear on the top border of the form. <br/>

		By default we see down-triangle or other generic icon on the left, <br/>

		which activates a pop-up system menu allowing closure or re-sizing of the form, <br/>

		and on the right end we see the minimise and  re-size/maximise buttons, <br/>

		but of course these can be customised by the application programmer.</descr>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TCustomForm.BorderStyle">
        <short>The border style for this Form</short>
        <descr>
          <p>Use borderstyle to get or set the appearance of the form's border. </p>
          <p>By default it is a sizeable window, but it could, for example, be a dialog form or a tool window, or could be non-sizeable</p>
          <p>This property is slightly different (has a differert base type) from the <var>TCustomControl.BorderStyle</var>
          </p>
        </descr>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TCustomForm.CancelControl">
        <short>The control associated with the cancel action</short>
        <descr>
          <p>Determines the control associated with the Cancel action (exit from the control without changing anything).</p>
          <p>This is usually a button with the caption 'Cancel', but might be an 'Exit' button or anything else the application programmer decides.</p>
          <p>This control is selected either by explicitly clicking with the mouse, or by hitting the 'Esc' key</p>
        </descr>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TCustomForm.Caption" link="#LCL.Controls.TControl.Caption">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TCustomForm.Color" link="#LCL.Controls.TControl.Color">
        <descr>The form's colour; by default it is the same as the colour specified for button faces.
</descr>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TCustomForm.DefaultControl">
        <short>The control associated with the default action for this form</short>
        <descr>Reads or sets a flag determining the default control. <br/>

		This is typically a button such as 'Accept' which is highlighted in some way on-screen to indicate that this is the default action, and is selected either by hitting 'Return' or 'Enter' or by selecting that control with the mouse</descr>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TCustomForm.Designer">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TCustomForm.FormState">
        <short>Determines the state of the form</short>
        <descr>Reads or writes a flag to determine the form's state: <br/>


		is it being created, is this its first showing, is the border style being changed, etc. <br/>


		FormState is a set, so could take zero or more of possible values.</descr>
        <seealso>
          <link id="TFormState"/>
        </seealso>
      </element>
      <!-- property Visibility: public -->
      <element name="TCustomForm.FormStyle">
        <short>Determinates the style of the form</short>
        <descr>
          <p>Reads or writes flag to determine the style of the form.</p>
          <p>Default is 'normal', but could be MDIChild or MDINormal, could stay on top or could be a 'Splash' form.</p>
          <p>FormStyle is a set, so could take zero or more of these values.</p>
        </descr>
        <seealso>
          <link id="#lcl.Controls.TFormStyle"/>
        </seealso>
      </element>
      <!-- property Visibility: public -->
      <element name="TCustomForm.HelpFile">
        <short>Specifies the help file that is used by the form</short>
        <descr>Reads or writes a flag to determine identity of Help file, <br/>

		and to determine whether its name is stored.<br/>

		Property contains filename as a string.</descr>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TCustomForm.Icon">
        <short>The Icon associated with this Form (which may appear in menus, directories, ListBoxes etc)</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TCustomForm.KeyPreview">
        <short>
          <var>KeyPreview</var> - if True, Key Preview is possible</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TCustomForm.Menu">
        <short>Specifies a MainMenu for this form</short>
        <descr>Drop a TMainMenu on the form and select it here to show it on the form.<br/>
        </descr>
        <seealso>
          <link id="#lcl.Menus.TMainMenu"/>
        </seealso>
      </element>
      <!-- property Visibility: public -->
      <element name="TCustomForm.ModalResult">
        <short>Specifies the return value of an modal form</short>
        <descr>Reads or writes a flag to determine whether there is a modal resut. <br/>

		If the form is modal, returns an integer value.</descr>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TCustomForm.OnActivate">
        <short>Event handler for activation (opening) of the form</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TCustomForm.OnClose">
        <short>Event handler for closing the form</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TCustomForm.OnCloseQuery">
        <short>Event handler for closing the query associated with the form</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TCustomForm.OnCreate">
        <short>Event handler for creating the form</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TCustomForm.OnDeactivate">
        <short>Event handler for deactivating the form</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TCustomForm.OnDestroy">
        <short>Event handler when the form is being destroyed</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TCustomForm.OnDropFiles">
        <short>The event invoked when file is dropped on this form.</short>
        <descr>The OnDropFiles event is invoked when user drops one or multiple files on this form. You enable this feature by setting AllowDropFiles property.</descr>
        <seealso>
          <link id="TCustomForm.AllowDropFiles"/>
        </seealso>
      </element>
      <!-- property Visibility: public -->
      <element name="TCustomForm.OnHelp">
        <short>Event handler when Help is required</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TCustomForm.OnHide">
        <short>Event handler if form is being hidden</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TCustomForm.OnResize" link="#LCL.Controls.TControl.OnResize">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TCustomForm.OnShortcut">
        <short>Event handler if shortcut key is pressed</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TCustomForm.OnShow">
        <short>Event handler if form is to be shown</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TCustomForm.OnWindowStateChange">
        <short>Event handler for a change in the window state</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TCustomForm.PixelsPerInch">
        <short>The scaling of the form in absolute terms</short>
        <descr>
          <p>Reads or writes a flag to determine the scaling factor (a longinteger).</p>
          <p>Not normally stored locally</p>
        </descr>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TCustomForm.Position">
        <short>The position of the form on the screen</short>
        <descr>Reads or writes a flag to determine screen position of form. <br/>


		By default it is in the position that it was placed in the Form Designer</descr>
        <seealso>
          <link id="TPosition"/>
        </seealso>
      </element>
      <!-- property Visibility: public -->
      <element name="TCustomForm.RestoredLeft">
        <short>The position of the left edge of the form when it is restored (ie changes from minimised or maximised)</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TCustomForm.RestoredTop">
        <short>The position of the top edge of the form when it is restored (ie changes from minimised or maximised)</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TCustomForm.RestoredWidth">
        <short>The width of the form when it is restored (ie changes from minimised or maximised)</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TCustomForm.RestoredHeight">
        <short>The height of the form when it is restored (ie changes from minimised or maximised)</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TCustomForm.ShowInTaskBar">
        <short>Should the form be shown in the system Task Bar?</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TCustomForm.TextHeight">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TCustomForm.Visible" link="#LCL.Controls.TControl.Visible">
        <descr>Set or get this to set the form visible/hidden or get the status of the form
</descr>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TCustomForm.WindowState">
        <short>Represents how the form appears on the screen</short>
        <descr>Reads or write flag to determine state of the window on screen. <br/>


		Default is 'normal' (ie not minimised or maximised)</descr>
        <seealso>
          <link id="TWindowState"/>
        </seealso>
      </element>
      <!-- "class of" type Visibility: default -->
      <element name="TCustomFormClass">
        <short>
          <var>TCustomFormClass</var> - class of <var>TCustomForm</var>
        </short>
        <descr/>
        <seealso/>
      </element>
      <!-- object Visibility: default -->
      <element name="TForm">
        <short>
          <var>Form</var> - the fundamental visual object that appears in every application with a Graphical User Interface.</short>
        <descr>
          <p>Form - the fundamental visual object that appears in every GUI application.</p>
          <p>Most of the properties are inherited from the ancestors</p>
        </descr>
        <errors/>
        <seealso>
          <link id="TCustomForm"/>
          <link id="TScrollingWinControl"/>
          <link id="#lcl.Controls.TCustomControl">TCustomControl</link>
          <link id="#lcl.Controls.TWinControl"/>
          <link id="#lcl.Controls.TControl"/>
        </seealso>
      </element>
      <!-- variable Visibility: private -->
      <element name="TForm.FClientHandle">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TForm.CreateWnd" link="#LCL.Forms.TScrollingWinControl.CreateWnd">
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TForm.ClientHandle">
        <short>The operating system handle for the client</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TForm.DockManager" link="#LCL.Controls.TWinControl.DockManager">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.Action" link="#LCL.Controls.TControl.Action">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.ActiveControl" link="#LCL.Forms.TCustomForm.ActiveControl">
        <short/>
        <descr>Use active control to set or get the control that has the focus on this form
</descr>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.Align" link="#LCL.Controls.TControl.Align">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.AllowDropFiles" link="#LCL.Forms.TCustomForm.AllowDropFiles">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.AutoSize" link="#LCL.Controls.TControl.AutoSize">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.BiDiMode" link="#LCL.Controls.TControl.BiDiMode">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.BorderIcons" link="#LCL.Forms.TCustomForm.BorderIcons">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.BorderStyle" link="#LCL.Forms.TCustomForm.BorderStyle">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.Caption" link="#LCL.Controls.TControl.Caption">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.ChildSizing" link="#LCL.Controls.TWinControl.ChildSizing">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.ClientHeight" link="#LCL.Controls.TControl.ClientHeight">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.ClientWidth" link="#LCL.Controls.TControl.ClientWidth">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.Color" link="#LCL.Controls.TControl.Color">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.Constraints" link="#LCL.Controls.TControl.Constraints">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.DragKind" link="#LCL.Controls.TControl.DragKind">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.DragMode" link="#LCL.Controls.TControl.DragMode">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.DockSite" link="#LCL.Controls.TWinControl.DockSite">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.Enabled" link="#LCL.Controls.TControl.Enabled">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.Font" link="#LCL.Controls.TControl.Font">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.FormStyle" link="#LCL.Forms.TCustomForm.FormStyle">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.HelpFile" link="#LCL.Forms.TCustomForm.HelpFile">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.Icon" link="#LCL.Forms.TCustomForm.Icon">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.KeyPreview" link="#LCL.Forms.TCustomForm.KeyPreview">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.Menu" link="#LCL.Forms.TCustomForm.Menu">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.OnActivate" link="#LCL.Forms.TCustomForm.OnActivate">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.OnClick" link="#LCL.Controls.TControl.OnClick">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.OnClose" link="#LCL.Forms.TCustomForm.OnClose">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.OnCloseQuery" link="#LCL.Forms.TCustomForm.OnCloseQuery">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.OnChangeBounds" link="#LCL.Controls.TControl.OnChangeBounds">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.OnCreate" link="#LCL.Forms.TCustomForm.OnCreate">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.OnDblClick" link="#LCL.Controls.TControl.OnDblClick">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.OnDeactivate" link="#LCL.Forms.TCustomForm.OnDeactivate">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.OnDestroy" link="#LCL.Forms.TCustomForm.OnDestroy">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.OnDockDrop" link="#LCL.Controls.TWinControl.OnDockDrop">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.OnDockOver" link="#LCL.Controls.TWinControl.OnDockOver">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.OnDragDrop" link="#LCL.Controls.TControl.OnDragDrop">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.OnDragOver" link="#LCL.Controls.TControl.OnDragOver">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.OnEndDock" link="#LCL.Controls.TControl.OnEndDock">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.OnDropFiles" link="#LCL.Forms.TCustomForm.OnDropFiles">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.OnGetSiteInfo" link="#LCL.Controls.TWinControl.OnGetSiteInfo">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.OnHide" link="#LCL.Forms.TCustomForm.OnHide">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.OnKeyDown" link="#LCL.Controls.TWinControl.OnKeyDown">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.OnKeyPress" link="#LCL.Controls.TWinControl.OnKeyPress">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.OnKeyUp" link="#LCL.Controls.TWinControl.OnKeyUp">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.OnHelp" link="#LCL.Forms.TCustomForm.OnHelp">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.OnMouseDown" link="#LCL.Controls.TControl.OnMouseDown">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.OnMouseMove" link="#LCL.Controls.TControl.OnMouseMove">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.OnMouseUp" link="#LCL.Controls.TControl.OnMouseUp">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.OnPaint" link="#LCL.Controls.TCustomControl.OnPaint">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.OnResize" link="#LCL.Controls.TControl.OnResize">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.OnShortCut" link="#LCL.Forms.TCustomForm.OnShortcut">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.OnShow" link="#LCL.Forms.TCustomForm.OnShow">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.OnStartDock" link="#LCL.Controls.TControl.OnStartDock">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.OnUnDock" link="#LCL.Controls.TWinControl.OnUnDock">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.OnUTF8KeyPress" link="#LCL.Controls.TWinControl.OnUTF8KeyPress">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.ParentBiDiMode" link="#LCL.Controls.TControl.ParentBiDiMode">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.ParentFont" link="#LCL.Controls.TControl.ParentFont">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.PixelsPerInch" link="#LCL.Forms.TCustomForm.PixelsPerInch">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.PopupMenu" link="#LCL.Controls.TControl.PopupMenu">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.Position" link="#LCL.Forms.TCustomForm.Position">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.SessionProperties" link="#LCL.Controls.TControl.SessionProperties">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.ShowHint" link="#LCL.Controls.TControl.ShowHint">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.ShowInTaskBar" link="#LCL.Forms.TCustomForm.ShowInTaskBar">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.TextHeight">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.UseDockManager" link="#LCL.Controls.TWinControl.UseDockManager">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.Visible" link="#LCL.Controls.TControl.Visible">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.WindowState" link="#LCL.Forms.TCustomForm.WindowState">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TForm.OnWindowStateChange" link="#LCL.Forms.TCustomForm.OnWindowStateChange">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- "class of" type Visibility: default -->
      <element name="TFormClass">
        <short>
          <var>TFormClass</var> - class of <var>TForm</var>
        </short>
        <descr/>
        <seealso/>
      </element>
      <!-- object Visibility: default -->
      <element name="TCustomDockForm">
        <short>
          <var>TCustomDockForm</var> - Base class for docking forms</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TCustomDockForm.DoAddDockClient" link="#LCL.Controls.TWinControl.DoAddDockClient">
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomDockForm.DoAddDockClient.Client">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomDockForm.DoAddDockClient.ARect">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TCustomDockForm.DoRemoveDockClient" link="#LCL.Controls.TWinControl.DoRemoveDockClient">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomDockForm.DoRemoveDockClient.Client">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TCustomDockForm.GetSiteInfo" link="#LCL.Controls.TWinControl.GetSiteInfo">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomDockForm.GetSiteInfo.Client">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomDockForm.GetSiteInfo.InfluenceRect">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomDockForm.GetSiteInfo.MousePos">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomDockForm.GetSiteInfo.CanDock">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TCustomDockForm.Loaded" link="#LCL.Forms.TCustomForm.Loaded">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- constructor Visibility: public -->
      <element name="TCustomDockForm.Create">
        <short>
          <var>Create</var> - constructor for <var>TCustomDockForm</var>: performs <var>CreateNew</var> then initialises autoscroll and style properties</short>
        <descr/>
        <errors/>
        <seealso>
          <link id="#LCL.Forms.TCustomForm.Create">TCustomForm.Create</link>
        </seealso>
      </element>
      <!-- argument Visibility: default -->
      <element name="TCustomDockForm.Create.TheOwner">
        <short/>
      </element>
      <!-- property Visibility: public -->
      <element name="TCustomDockForm.AutoScroll" link="#LCL.Forms.TScrollingWinControl.AutoScroll">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TCustomDockForm.BorderStyle" link="#LCL.Forms.TCustomForm.BorderStyle">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TCustomDockForm.FormStyle" link="#LCL.Forms.TCustomForm.FormStyle">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TCustomDockForm.PixelsPerInch" link="#LCL.Forms.TCustomForm.PixelsPerInch">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- object Visibility: default -->
      <element name="THintWindow">
        <short>Hint Window - the popup box containing helpful information that appears when the mouse pointer hovers over an object</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="THintWindow.FActivating">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="THintWindow.FAutoHide">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="THintWindow.FAutoHideTimer">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="THintWindow.FHideInterval">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="THintWindow.SetAutoHide">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="THintWindow.SetAutoHide.Value">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="THintWindow.AutoHideHint">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="THintWindow.AutoHideHint.Sender">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="THintWindow.SetHideInterval">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="THintWindow.SetHideInterval.Value">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="THintWindow.Paint" link="#LCL.Controls.TCustomControl.Paint">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function Visibility: protected -->
      <element name="THintWindow.GetControlClassDefaultSize" link="#LCL.Controls.TControl.GetControlClassDefaultSize">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="THintWindow.GetControlClassDefaultSize.Result">
        <short/>
      </element>
      <!-- constructor Visibility: public -->
      <element name="THintWindow.Create">
        <short>
          <var>Create</var> - constructor for <var>THintWindow</var>: performs inherited <var>Create</var> then initialises many properties including timers, styles, position, font and colour</short>
        <descr/>
        <errors/>
        <seealso>
          <link id="#LCL.Forms.TCustomForm.Create">TCustomForm.Create</link>
        </seealso>
      </element>
      <!-- argument Visibility: default -->
      <element name="THintWindow.Create.AOwner">
        <short/>
      </element>
      <!-- destructor Visibility: public -->
      <element name="THintWindow.Destroy">
        <short>
          <var>Destroy</var> - destructor for <var>THintWindow</var>: frees timers then performs inherited <var>Destroy</var>
        </short>
        <descr/>
        <errors/>
        <seealso>
          <link id="#LCL.Forms.TCustomForm.Destroy">TCustomForm.Destroy</link>
        </seealso>
      </element>
      <!-- procedure Visibility: public -->
      <element name="THintWindow.ActivateHint">
        <short>Allow the hint message to be displayed in the specified rectangular space</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="THintWindow.ActivateHint.ARect">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="THintWindow.ActivateHint.AHint">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="THintWindow.ActivateHintData">
        <short>Allow the hint message to be displayed, with a pointer to further data</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="THintWindow.ActivateHintData.ARect">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="THintWindow.ActivateHintData.AHint">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="THintWindow.ActivateHintData.AData">
        <short/>
      </element>
      <!-- function Visibility: public -->
      <element name="THintWindow.CalcHintRect">
        <short>Work out the size of the rectangle required to display the specified hint message</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="THintWindow.CalcHintRect.Result">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="THintWindow.CalcHintRect.MaxWidth">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="THintWindow.CalcHintRect.AHint">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="THintWindow.CalcHintRect.AData">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="THintWindow.ReleaseHandle">
        <short>Release the handle for the hint message and return it to the system</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="THintWindow.AutoHide">
        <short>Does the hint disappear (get hidden) after a while?</short>
        <descr>If <var>AutoHide</var> is TRUE, the hint disappears afer an interval specified by <link id="THintWindow.HideInterval">HideInterval</link>
        </descr>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="THintWindow.HideInterval">
        <short>The time after which the displayed hint disappears</short>
        <descr/>
        <seealso/>
      </element>
      <!-- "class of" type Visibility: default -->
      <element name="THintWindowClass">
        <short>
          <var>THintWindowClass</var> - class of <var>THintWindow</var>
        </short>
        <descr/>
        <seealso/>
      </element>
      <!-- pointer type Visibility: default -->
      <element name="PCursorRec">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- record type Visibility: default -->
      <element name="TCursorRec">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: default -->
      <element name="TCursorRec.Next">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: default -->
      <element name="TCursorRec.Index">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: default -->
      <element name="TCursorRec.Handle">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- procedure type Visibility: default -->
      <element name="TScreenFormEvent">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScreenFormEvent.Sender">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScreenFormEvent.Form">
        <short/>
      </element>
      <!-- procedure type Visibility: default -->
      <element name="TScreenActiveFormChangedEvent">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScreenActiveFormChangedEvent.Sender">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScreenActiveFormChangedEvent.LastForm">
        <short/>
      </element>
      <!-- procedure type Visibility: default -->
      <element name="TScreenControlEvent">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScreenControlEvent.Sender">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScreenControlEvent.LastControl">
        <short/>
      </element>
      <!-- enumeration type Visibility: default -->
      <element name="TScreenNotification">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TScreenNotification.snFormAdded">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TScreenNotification.snRemoveForm">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TScreenNotification.snActiveControlChanged">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TScreenNotification.snActiveFormChanged">
        <short/>
      </element>
      <!-- object Visibility: default -->
      <element name="TScreen">
        <short>Screen - the visible area</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TScreen.FActiveControl">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TScreen.FActiveCustomForm">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TScreen.FActiveForm">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TScreen.FCursor">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TScreen.FCursorCount">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TScreen.FCursorMap">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TScreen.FCustomForms">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TScreen.FCustomFormsZOrdered">
        <short/>
        <descr>
          <short>Specifies which style the form border has</short>
        </descr>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TScreen.FDefaultCursor">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TScreen.FHintFont">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TScreen.FFocusedForm">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TScreen.FFonts">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TScreen.FFormList">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TScreen.FScreenHandlers">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TScreen.FLastActiveControl">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TScreen.FLastActiveCustomForm">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TScreen.FOnActiveControlChange">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TScreen.FOnActiveFormChange">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TScreen.FPixelsPerInch">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TScreen.FSaveFocusedList">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TScreen.DeleteCursor">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScreen.DeleteCursor.AIndex">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TScreen.DestroyCursors">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function Visibility: private -->
      <element name="TScreen.GetCursors">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TScreen.GetCursors.Result">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScreen.GetCursors.AIndex">
        <short/>
      </element>
      <!-- function Visibility: private -->
      <element name="TScreen.GetCustomFormCount">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TScreen.GetCustomFormCount.Result">
        <short/>
      </element>
      <!-- function Visibility: private -->
      <element name="TScreen.GetCustomFormZOrderCount">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TScreen.GetCustomFormZOrderCount.Result">
        <short/>
      </element>
      <!-- function Visibility: private -->
      <element name="TScreen.GetCustomForms">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TScreen.GetCustomForms.Result">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScreen.GetCustomForms.Index">
        <short/>
      </element>
      <!-- function Visibility: private -->
      <element name="TScreen.GetCustomFormsZOrdered">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TScreen.GetCustomFormsZOrdered.Result">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScreen.GetCustomFormsZOrdered.Index">
        <short/>
      </element>
      <!-- function Visibility: private -->
      <element name="TScreen.GetDesktopHeight">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TScreen.GetDesktopHeight.Result">
        <short/>
      </element>
      <!-- function Visibility: private -->
      <element name="TScreen.GetDesktopWidth">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TScreen.GetDesktopWidth.Result">
        <short/>
      </element>
      <!-- function Visibility: private -->
      <element name="TScreen.GetFonts">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TScreen.GetFonts.Result">
        <short/>
      </element>
      <!-- function Visibility: private -->
      <element name="TScreen.GetFormCount">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TScreen.GetFormCount.Result">
        <short/>
      </element>
      <!-- function Visibility: private -->
      <element name="TScreen.GetForms">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TScreen.GetForms.Result">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScreen.GetForms.IIndex">
        <short/>
      </element>
      <!-- function Visibility: private -->
      <element name="TScreen.GetHeight">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TScreen.GetHeight.Result">
        <short/>
      </element>
      <!-- function Visibility: private -->
      <element name="TScreen.GetWidth">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TScreen.GetWidth.Result">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TScreen.AddForm">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScreen.AddForm.AForm">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TScreen.RemoveForm">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScreen.RemoveForm.AForm">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TScreen.SetCursor">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScreen.SetCursor.AValue">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TScreen.SetCursors">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScreen.SetCursors.AIndex">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScreen.SetCursors.AValue">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TScreen.UpdateLastActive">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TScreen.AddHandler">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScreen.AddHandler.HandlerType">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScreen.AddHandler.Handler">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScreen.AddHandler.AsLast">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TScreen.RemoveHandler">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScreen.RemoveHandler.HandlerType">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScreen.RemoveHandler.Handler">
        <short/>
      </element>
      <!-- function Visibility: protected -->
      <element name="TScreen.GetHintFont">
        <short>
          <var>GetHintFont</var> - find the correct font for displaying Hints</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TScreen.GetHintFont.Result">
        <short/>
      </element>
      <!-- constructor Visibility: public -->
      <element name="TScreen.Create">
        <descr/>
        <errors/>
        <seealso>
          <link id="#rtl.Classes.TComponent.Create">TComponent.Create</link>
          <link id="#LCL.LCLClasses.TLCLComponent.Create">TLCLComponent.Create</link>
        </seealso>
        <short>
          <var>Create</var> - constructor for <var>TScreen</var>: performs inherited <var>Create</var> then creates and initialises lists of fonts, strings and forms</short>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScreen.Create.AOwner">
        <short/>
      </element>
      <!-- destructor Visibility: public -->
      <element name="TScreen.Destroy">
        <descr/>
        <errors/>
        <seealso>
          <link id="#rtl.Classes.TComponent.Destroy">TComponent.Destroy</link>
          <link id="#LCL.LCLClasses.TLCLComponent.Destroy">TLCLComponent.Destroy</link>
        </seealso>
        <short>
          <var>Destroy</var> - destructor for <var>TForm</var>: frees various lists then performs inherited <var>Destroy</var>
        </short>
      </element>
      <!-- function Visibility: public -->
      <element name="TScreen.CustomFormIndex">
        <short>The Index number of a Custom Form on the screen</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TScreen.CustomFormIndex.Result">
        <short>The Index number of the Custom Form, stored as an integer</short>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScreen.CustomFormIndex.AForm">
        <short>The Custom Form to which the Index refers</short>
      </element>
      <!-- function Visibility: public -->
      <element name="TScreen.FormIndex">
        <short>The index number of a Form on the Screen</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TScreen.FormIndex.Result">
        <short>The index number of the Form, stored as an integer</short>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScreen.FormIndex.AForm">
        <short>The Form to which the Index refers</short>
      </element>
      <!-- function Visibility: public -->
      <element name="TScreen.CustomFormZIndex">
        <short>
          <var>CustomFormZIndex</var> - the index value of the form  in the Z dimension (Front to Back)</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TScreen.CustomFormZIndex.Result">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScreen.CustomFormZIndex.AForm">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TScreen.MoveFormToFocusFront">
        <short>
          <var>MoveFormToFocusFront</var> - move the specified form to the front of the focus</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScreen.MoveFormToFocusFront.ACustomForm">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TScreen.MoveFormToZFront">
        <short>
          <var>MoveFormToZFront</var> - move form to front in the Z-plane (does not specify whether focused)</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScreen.MoveFormToZFront.ACustomForm">
        <short/>
      </element>
      <!-- function Visibility: public -->
      <element name="TScreen.GetCurrentModalForm">
        <short>
          <var>GetCurrentModalForm</var> - returns the current Modal form on the current screen (ie a form that is awaiting a user response)</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TScreen.GetCurrentModalForm.Result">
        <short/>
      </element>
      <!-- function Visibility: public -->
      <element name="TScreen.GetCurrentModalFormZIndex">
        <short>
          <var>GetCurrentModalFormZIndex</var> - returns the Z-plane index of the current modal form</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TScreen.GetCurrentModalFormZIndex.Result">
        <short/>
      </element>
      <!-- function Visibility: public -->
      <element name="TScreen.CustomFormBelongsToActiveGroup">
        <short>
          <var>CustomFormBelongsToActiveGroup</var> - returns True if the specified form belongs to the active group</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TScreen.CustomFormBelongsToActiveGroup.Result">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScreen.CustomFormBelongsToActiveGroup.AForm">
        <short/>
      </element>
      <!-- function Visibility: public -->
      <element name="TScreen.FindForm">
        <short>
          <var>FindForm</var> - returns the form with the specified name</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TScreen.FindForm.Result">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScreen.FindForm.FormName">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TScreen.UpdateScreen">
        <short>Method for updating screen</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TScreen.AddHandlerFormAdded">
        <short>
          <var>AddHandlerFormAdded</var> - method for adding a form-adding handler</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScreen.AddHandlerFormAdded.OnFormAdded">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScreen.AddHandlerFormAdded.AsLast">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TScreen.RemoveHandlerFormAdded">
        <short>
          <var>RemoveHandlerFormAdded</var> - method for removing a form-adding handler</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScreen.RemoveHandlerFormAdded.OnFormAdded">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TScreen.AddHandlerRemoveForm">
        <short>
          <var>AddHandlerRemoveForm</var> - method for adding a form-removing handler</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScreen.AddHandlerRemoveForm.OnRemoveForm">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScreen.AddHandlerRemoveForm.AsLast">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TScreen.RemoveHandlerRemoveForm">
        <short>
          <var>RemoveHandlerRemoveForm</var> - method for removing a form-removing handler</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScreen.RemoveHandlerRemoveForm.OnRemoveForm">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TScreen.AddHandlerActiveControlChanged">
        <short>
          <var>AddHandlerActiveControlChanged</var> - method for adding a handler for a change in the active control</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScreen.AddHandlerActiveControlChanged.OnActiveControlChanged">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScreen.AddHandlerActiveControlChanged.AsLast">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TScreen.RemoveHandlerActiveControlChanged">
        <short>
          <var>RemoveHandlerActiveControlChanged</var> - method for removing a handler for a change in the active control</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScreen.RemoveHandlerActiveControlChanged.OnActiveControlChanged">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TScreen.AddHandlerActiveFormChanged">
        <short>
          <var>AddHandlerActiveFormChanged</var> - method for adding a handler for a change in active form</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScreen.AddHandlerActiveFormChanged.OnActiveFormChanged">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScreen.AddHandlerActiveFormChanged.AsLast">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TScreen.RemoveHandlerActiveFormChanged">
        <short>
          <var>RemoveHandlerActiveFormChanged</var> - method for removing a handler for a change in active form</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScreen.RemoveHandlerActiveFormChanged.OnActiveFormChanged">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TScreen.RemoveAllHandlersOfObject" link="#LCL.LCLClasses.TLCLComponent.RemoveAllHandlersOfObject">
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScreen.RemoveAllHandlersOfObject.AnObject">
        <short/>
      </element>
      <!-- property Visibility: public -->
      <element name="TScreen.ActiveControl">
        <short>The identity of the active control on this screen</short>
        <descr>Reads a flag to determine the active control</descr>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TScreen.ActiveCustomForm">
        <short>The identity of the active Custom Form on this screen</short>
        <descr>Reads a flag to determine the active Custom Form</descr>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TScreen.ActiveForm">
        <short>The identity of the active Form on this Screen</short>
        <descr>Reads a flag to determine the active Form</descr>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TScreen.Cursor">
        <short>The cursor currently being used in this screen</short>
        <descr>Reads or writes a flag to determine the cursor. <br/>


		This can take any integer value, but there are several pre-determined cursor styles <br/>


		listed as constants in 'Controls', <br/>


		and these should be used to define the cursor for the current screen</descr>
        <seealso>
          <link id="Controls.crDefault"/>
        </seealso>
      </element>
      <!-- property Visibility: public -->
      <element name="TScreen.Cursors">
        <short>The indexed list of available cursors for this screen</short>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScreen.Cursors.Index">
        <short/>
      </element>
      <!-- property Visibility: public -->
      <element name="TScreen.CustomFormCount">
        <short>The number of Custom Forms on this screen</short>
        <descr>Reads flag to determine number of Custom Forms (integer)</descr>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TScreen.CustomForms">
        <short>The list of Custom Forms on the screen</short>
        <descr/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScreen.CustomForms.Index">
        <short/>
      </element>
      <!-- property Visibility: public -->
      <element name="TScreen.CustomFormZOrderCount">
        <short>
          <var>CustomFormZOrderCount</var> - the number of forms arranged in Z-plane order (ie Front to Back)</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TScreen.CustomFormsZOrdered">
        <short>
          <var>CustomFormsZOrdered</var> - the forms arranged in Z-plane order (ie Front to Back)</short>
        <descr/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScreen.CustomFormsZOrdered.Index">
        <short/>
      </element>
      <!-- property Visibility: public -->
      <element name="TScreen.DesktopHeight">
        <short>The total available height of the desktop in which the screen is to be placed</short>
      </element>
      <!-- property Visibility: public -->
      <element name="TScreen.DesktopWidth">
        <short>The total available width of the desktop in which the screen is to be placed</short>
      </element>
      <!-- property Visibility: public -->
      <element name="TScreen.FocusedForm">
        <short>
          <var>FocusedForm</var> - the form that holds Focus</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TScreen.FormCount">
        <short>The number of Forms on this screen</short>
        <descr>Reads a flag to determine the number of Forms (integer)</descr>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TScreen.Forms">
        <short>The list of Forms in this Screen</short>
        <descr/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TScreen.Forms.Index">
        <short>Index number of a Form, stored as an integer</short>
      </element>
      <!-- property Visibility: public -->
      <element name="TScreen.Fonts">
        <short>The fonts to be used in this screen</short>
        <descr>Reads a flag to determine the fonts to be used; their names are stored as a list of strings</descr>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TScreen.Height">
        <short>The height of the screen</short>
        <descr>Reads a flag to determine screen height; stored as an integer</descr>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TScreen.HintFont">
        <short>The font to be used to display hints</short>
        <descr>Reads a flag to determine the font to be used (font name stored as a string)</descr>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TScreen.Width">
        <short>The width of the screen</short>
        <descr>Reads flag to determine screen width, stored as an integer</descr>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TScreen.OnActiveControlChange">
        <short>Event handler for change in the active control</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TScreen.OnActiveFormChange">
        <short>Event handler for a change in the active form on the screen</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TScreen.PixelsPerInch">
        <short>Scaling factor for displaying graphic information on the screen</short>
        <descr>Reads a flag to determine number of pixels per inch (integer)</descr>
        <seealso/>
      </element>
      <!-- procedure type Visibility: default -->
      <element name="TQueryEndSessionEvent">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TQueryEndSessionEvent.Cancel">
        <short/>
      </element>
      <!-- procedure type Visibility: default -->
      <element name="TExceptionEvent">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TExceptionEvent.Sender">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TExceptionEvent.E">
        <short/>
      </element>
      <!-- procedure type Visibility: default -->
      <element name="TIdleEvent">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TIdleEvent.Sender">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TIdleEvent.Done">
        <short/>
      </element>
      <!-- procedure type Visibility: default -->
      <element name="TOnUserInputEvent">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TOnUserInputEvent.Sender">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TOnUserInputEvent.Msg">
        <short/>
      </element>
      <!-- procedure type Visibility: default -->
      <element name="TDataEvent">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TDataEvent.Data">
        <short/>
      </element>
      <!-- record type Visibility: default -->
      <element name="TCMHintShow">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: default -->
      <element name="TCMHintShow.Msg">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: default -->
      <element name="TCMHintShow.Reserved">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: default -->
      <element name="TCMHintShow.HintInfo">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: default -->
      <element name="TCMHintShow.Result">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- record type Visibility: default -->
      <element name="TCMHintShowPause">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: default -->
      <element name="TCMHintShowPause.Msg">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: default -->
      <element name="TCMHintShowPause.WasActive">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: default -->
      <element name="TCMHintShowPause.Pause">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: default -->
      <element name="TCMHintShowPause.Result">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- enumeration type Visibility: default -->
      <element name="TAppHintTimerType">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TAppHintTimerType.ahttNone">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TAppHintTimerType.ahttShowHint">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TAppHintTimerType.ahttHideHint">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TAppHintTimerType.ahttReshowHint">
        <short/>
      </element>
      <!-- procedure type Visibility: default -->
      <element name="TShowHintEvent">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TShowHintEvent.HintStr">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TShowHintEvent.CanShow">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TShowHintEvent.HintInfo">
        <short/>
      </element>
      <!-- record type Visibility: default -->
      <element name="THintInfoAtMouse">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: default -->
      <element name="THintInfoAtMouse.MousePos">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: default -->
      <element name="THintInfoAtMouse.Control">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: default -->
      <element name="THintInfoAtMouse.ControlHasHint">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- enumeration type Visibility: default -->
      <element name="TApplicationFlag">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TApplicationFlag.AppWaiting">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TApplicationFlag.AppIdleEndSent">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TApplicationFlag.AppHandlingException">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TApplicationFlag.AppNoExceptionMessages">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TApplicationFlag.AppActive">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TApplicationFlag.AppDestroying">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TApplicationFlag.AppDoNotCallAsyncQueue">
        <short/>
      </element>
      <!-- set type Visibility: default -->
      <element name="TApplicationFlags">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- enumeration type Visibility: default -->
      <element name="TApplicationNavigationOption">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TApplicationNavigationOption.anoTabToSelectNext">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TApplicationNavigationOption.anoReturnForDefaultControl">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TApplicationNavigationOption.anoEscapeForCancelControl">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TApplicationNavigationOption.anoF1ForHelp">
        <short/>
      </element>
      <!-- set type Visibility: default -->
      <element name="TApplicationNavigationOptions">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- enumeration type Visibility: default -->
      <element name="TApplicationHandlerType">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TApplicationHandlerType.ahtIdle">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TApplicationHandlerType.ahtIdleEnd">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TApplicationHandlerType.ahtKeyDownBefore">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TApplicationHandlerType.ahtKeyDownAfter">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TApplicationHandlerType.ahtActivate">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TApplicationHandlerType.ahtDeactivate">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TApplicationHandlerType.ahtUserInput">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TApplicationHandlerType.ahtException">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TApplicationHandlerType.ahtEndSession">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TApplicationHandlerType.ahtQueryEndSession">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TApplicationHandlerType.ahtMinimize">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TApplicationHandlerType.ahtRestore">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TApplicationHandlerType.ahtDropFiles">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TApplicationHandlerType.ahtHelp">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TApplicationHandlerType.ahtHint">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TApplicationHandlerType.ahtShowHint">
        <short/>
      </element>
      <!-- pointer type Visibility: default -->
      <element name="PAsyncCallQueueItem">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- record type Visibility: default -->
      <element name="TAsyncCallQueueItem">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: default -->
      <element name="TAsyncCallQueueItem.Method">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: default -->
      <element name="TAsyncCallQueueItem.Data">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: default -->
      <element name="TAsyncCallQueueItem.NextItem">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- enumeration type Visibility: default -->
      <element name="TApplicationType">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TApplicationType.atDefault">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TApplicationType.atDesktop">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TApplicationType.atHandheld">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TApplicationType.atPDA">
        <short/>
      </element>
      <!-- enumeration value Visibility: default -->
      <element name="TApplicationType.atSmartphone">
        <short/>
      </element>
      <!-- object Visibility: default -->
      <element name="TApplication">
        <short>
          <var>TApplication</var> - the whole current program, described as an object</short>
        <descr>
          <p>
            <var>TApplication</var> - the whole current program, described as an object.</p>
          <p>Includes the useful function <var>MessageBox</var>, a simple dialog intended for displaying error messages internally, but available as an alternative to the various Message Dialogs</p>
        </descr>
        <errors/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplication.FApplicationHandlers">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplication.FApplicationType">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplication.FCaptureExceptions">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplication.FComponentsToRelease">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplication.FCreatingForm">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplication.FFindGlobalComponentEnabled">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplication.FFlags">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplication.FHint">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplication.FHintColor">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplication.FHintControl">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplication.FHintHidePause">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplication.FHintHidePausePerChar">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplication.FHintPause">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplication.FHintShortCuts">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplication.FHintShortPause">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplication.FHintTimer">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplication.FHintTimerType">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplication.FHintWindow">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplication.FIcon">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplication.FIdleLockCount">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplication.FFormList">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplication.FLastKeyDownSender">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplication.FLastKeyDownKey">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplication.FLastKeyDownShift">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplication.FMainForm">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplication.FMouseControl">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplication.FNavigation">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplication.FOldExceptProc">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplication.FOldExitProc">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplication.FOnActionExecute">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplication.FOnActionUpdate">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplication.FOnActivate">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplication.FOnDeactivate">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplication.FOnDestroy">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplication.FOnDropFiles">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplication.FOnHelp">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplication.FOnHint">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplication.FOnIdle">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplication.FOnIdleEnd">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplication.FOnEndSession">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplication.FOnQueryEndSession">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplication.FOnMinimize">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplication.FOnRestore">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplication.FOnShortcut">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplication.FOnShowHint">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplication.FOnUserInput">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplication.FAsyncCallQueue">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplication.FAsyncCallQueueLast">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplication.FShowHint">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplication.FShowMainForm">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplication.FLastMousePos">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplication.FLastMouseControl">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplication.FLastMouseControlValid">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TApplication.DoOnIdleEnd">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function Visibility: private -->
      <element name="TApplication.GetActive">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TApplication.GetActive.Result">
        <short/>
      </element>
      <!-- function Visibility: private -->
      <element name="TApplication.GetCurrentHelpFile">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TApplication.GetCurrentHelpFile.Result">
        <short/>
      </element>
      <!-- function Visibility: private -->
      <element name="TApplication.GetExename">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TApplication.GetExename.Result">
        <short/>
      </element>
      <!-- function Visibility: private -->
      <element name="TApplication.GetIconHandle">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TApplication.GetIconHandle.Result">
        <short/>
      </element>
      <!-- function Visibility: private -->
      <element name="TApplication.GetTitle">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TApplication.GetTitle.Result">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TApplication.IconChanged">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.IconChanged.Sender">
        <short/>
      </element>
      <!-- function Visibility: private -->
      <element name="TApplication.InvokeHelp">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TApplication.InvokeHelp.Result">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.InvokeHelp.Command">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.InvokeHelp.Data">
        <short/>
      </element>
      <!-- function Visibility: private -->
      <element name="TApplication.GetControlAtMouse">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TApplication.GetControlAtMouse.Result">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TApplication.SetFlags">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.SetFlags.AValue">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TApplication.SetNavigation">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.SetNavigation.AValue">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TApplication.UpdateMouseControl">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.UpdateMouseControl.NewMouseControl">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TApplication.MouseIdle">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.MouseIdle.CurrentControl">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TApplication.SetCaptureExceptions">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.SetCaptureExceptions.AValue">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TApplication.SetHint">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.SetHint.AValue">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TApplication.SetHintColor">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.SetHintColor.AValue">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TApplication.SetIcon">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.SetIcon.AValue">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TApplication.SetShowHint">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.SetShowHint.AValue">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TApplication.StopHintTimer">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function Visibility: private -->
      <element name="TApplication.ValidateHelpSystem">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TApplication.ValidateHelpSystem.Result">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TApplication.WndProc">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.WndProc.AMessage">
        <short/>
      </element>
      <!-- function Visibility: private -->
      <element name="TApplication.DispatchAction">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TApplication.DispatchAction.Result">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.DispatchAction.Msg">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.DispatchAction.Action">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TApplication.AddHandler">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.AddHandler.HandlerType">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.AddHandler.Handler">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.AddHandler.AsLast">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TApplication.RemoveHandler">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.RemoveHandler.HandlerType">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.RemoveHandler.Handler">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TApplication.RunLoop">
        <short>Make the application run in a loop, ie it starts again when it has finished</short>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TApplication.Activate">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TApplication.Deactivate">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function Visibility: protected -->
      <element name="TApplication.GetConsoleApplication">
        <short>
          <var>GetConsoleApplication</var> - returns True if this is a Console application (ie text-mode, non-GUI)</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TApplication.GetConsoleApplication.Result">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TApplication.NotifyIdleHandler">
        <short>
          <var>NotifyIdleHandler</var> - method for sending message to Idle handler (sends True if process is done)</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.NotifyIdleHandler.Done">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TApplication.NotifyIdleEndHandler">
        <short>
          <var>NotifyIdleEndHandler</var> - method for sending message to handler for end of idle state</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TApplication.NotifyActivateHandler">
        <short>
          <var>NotifyActivateHandler</var> - method for sending message to handler for activation</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TApplication.NotifyDeactivateHandler">
        <short>
          <var>NotifyDeactivateHandler</var> - method for sending message to handler for deactivation</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function Visibility: protected -->
      <element name="TApplication.IsHintMsg">
        <short>
          <var>IsHintMsg</var> - returns True if specified message is a valid Hint</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TApplication.IsHintMsg.Result">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.IsHintMsg.Msg">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TApplication.DoOnMouseMove">
        <short>
          <var>DoOnMouseMove</var> - method for the OnMouseMove event</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TApplication.ShowHintWindow">
        <short>
          <var>ShowHintWindow</var> - method for showing a hint window</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.ShowHintWindow.Info">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TApplication.OnHintTimer">
        <short>
          <var>OnHintTimer</var> - event handler for timing the duration of hints</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.OnHintTimer.Sender">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TApplication.SetTitle">
        <short>
          <var>SetTitle</var> - method for writing the specified title string to local store</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.SetTitle.AValue">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TApplication.StartHintTimer">
        <short>
          <var>StartHintTimer</var> - method for starting the timer for display of a hint message</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.StartHintTimer.Interval">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.StartHintTimer.TimerType">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TApplication.UpdateVisible">
        <short>
          <var>UpdateVisible</var> - update all visible components</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TApplication.DoIdleActions">
        <short>
          <var>DoIdleActions</var> - perform the actions that remain idle</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TApplication.MenuPopupHandler">
        <short>
          <var>MenuPopupHandler</var> - method for dealing with menu popups</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.MenuPopupHandler.Sender">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TApplication.ProcessAsyncCallQueue">
        <short>
          <var>ProcessAsyncCallQueue</var> - method to process a queue of asynchronous calls</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TApplication.FreeComponent">
        <short>
          <var>FreeComponent</var> - method for freeing a component</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.FreeComponent.Data">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TApplication.DoBeforeFinalization">
        <short>
          <var>DoBeforeFinalization</var> - the things to be done before finalisation of the application</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- constructor Visibility: public -->
      <element name="TApplication.Create">
        <descr>This instance of the constructor performs most of the setting up of the environment for the application. The instances of Create that occur in some of the ancestor classes are place holders rather than actual instructions for constructing the object
</descr>
        <errors/>
        <seealso>
          <link id="#fcl.CustApp.TCustomApplication.Create">TCustomApplication.Create</link>
        </seealso>
        <short>
          <var>Create</var> - constructor for <var>TApplication</var>: initialises a large number of local variables and properties, then calls inherited <var>Create</var>
        </short>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.Create.AOwner">
        <short>The Owner object that invoked this instance of TApplication</short>
      </element>
      <!-- destructor Visibility: public -->
      <element name="TApplication.Destroy">
        <descr/>
        <errors/>
        <seealso>
          <link id="#fcl.CustApp.TCustomApplication.Destroy">TCustomApplication.Destroy</link>
        </seealso>
        <short>
          <var>Destroy</var> - destructor for <var>TApplication</var>: frees various handles and flags, then cals inherited <var>Destroy</var>
        </short>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.ControlDestroyed">
        <short>Method for dealing with a control that has been destroyed</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.ControlDestroyed.AControl">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.BringToFront">
        <short>
          <var>BringToFront</var> - Use the selected widget set's method to bring the application's form(s) to the front</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.CreateForm">
        <short>Create Form or any other kind of component</short>
        <descr>Note: The name is confusing and only kept for Delphi compatibility. <br/>

It can actually create any kind of component<br/>
          <br/>

Creates a Component instance, sets the pointer to the component variable and loads the component. <br/>

If it is a form it will be added to the application's forms list</descr>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.CreateForm.InstanceClass">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.CreateForm.Reference">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.UpdateMainForm">
        <short>
          <var>UpdateMainForm</var> - update the Application's main form</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.UpdateMainForm.AForm">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.QueueAsyncCall">
        <short>Insert a given asynchronous call into the queue</short>
        <descr/>
        <errors/>
        <seealso/>
        <example file="forms/tapplication_queueasynccall.pas"/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.QueueAsyncCall.AMethod">
        <short>The method to be used for the asynchronous call</short>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.QueueAsyncCall.Data">
        <short>The data structure used by the asynchronous call method</short>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.ReleaseComponent">
        <short>
          <var>ReleaseComponent</var> - method to release the specified component</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.ReleaseComponent.AComponent">
        <short/>
      </element>
      <!-- function Visibility: public -->
      <element name="TApplication.ExecuteAction">
        <descr>This is a function that should be supplied by the application programmer, to override the placeholders declared in ancestor classes
</descr>
        <errors/>
        <seealso>
          <link id="#rtl.Classes.TComponent.ExecuteAction">TComponent.ExecuteAction</link>
        </seealso>
        <short>
          <var>ExecuteAction</var> - calls the <var>OnActionExecute</var> event hndler if it is assigned</short>
      </element>
      <!-- function result Visibility: default -->
      <element name="TApplication.ExecuteAction.Result">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.ExecuteAction.ExeAction">
        <short/>
      </element>
      <!-- function Visibility: public -->
      <element name="TApplication.UpdateAction">
        <short>
          <var>UpdateAction</var> - calls the OnUpdateAction event handler if it is assigned</short>
        <descr/>
        <errors/>
        <seealso>
          <link id="#rtl.Classes.TComponent.UpdateAction">TComponent.UpdateAction</link>
        </seealso>
      </element>
      <!-- function result Visibility: default -->
      <element name="TApplication.UpdateAction.Result">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.UpdateAction.TheAction">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.HandleException">
        <descr>Individual exception handler methods should be supplied by the application programmer, to override place-holder entries declared in ancestor classes.<br/>

This method checks whether the application is required to halt if an exception occurs, or invokes the appropriate handler. <br/>


It also writes details of the exception to the appropriate place for debugging.
</descr>
        <errors/>
        <seealso>
          <link id="#fcl.CustApp.TCustomApplication.HandleException">TCustomApplication.HandleException</link>
        </seealso>
        <short>
          <var>HandleException</var> method for handling an exception; attempts to maintain program execution if possible, otherwise exits gracefully</short>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.HandleException.Sender">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.HandleMessage">
        <short>Process all events according to the method defined for the widget set</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function Visibility: public -->
      <element name="TApplication.HelpContext">
        <short>
          <var>HelpContext</var> - returns True if there is a specified context-dependent help message associated with the application, with an optionally specified position</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TApplication.HelpContext.Result">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.HelpContext.Sender">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.HelpContext.Position">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.HelpContext.Context">
        <short/>
      </element>
      <!-- function Visibility: public -->
      <element name="TApplication.HelpKeyword">
        <short>
          <var>HelpKeyword</var> - returns True if there is a specified help keyword associated with the application, with an optionally specified position</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TApplication.HelpKeyword.Result">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.HelpKeyword.Sender">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.HelpKeyword.Position">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.HelpKeyword.Keyword">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.ShowHelpForObject">
        <short>
          <var>ShowHelpForObject</var> - method for displaying help messages</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.ShowHelpForObject.Sender">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.HideAllFormsWithStayOnTop">
        <short>
          <var>HideAllFormsWithStayOnTop</var> - hide all forms, but keep the curent top form on top</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function Visibility: public -->
      <element name="TApplication.IsWaiting">
        <short>
          <var>IsWaiting</var> - returns True if the application is awainting an event</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TApplication.IsWaiting.Result">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.CancelHint">
        <short>Cancels a request for a hint, if there is no hint timer or no hint to display</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.HideHint">
        <short>Don't display the hint</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.HintMouseMessage">
        <short>
          <var>HintMouseMessage</var> - method to find the hint for the control at the mouse position</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.HintMouseMessage.Control">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.HintMouseMessage.AMessage">
        <short/>
      </element>
      <!-- property Visibility: public -->
      <element name="TApplication.Icon">
        <short>The icon to be associated with this application</short>
        <descr/>
        <seealso/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.Initialize">
        <descr>Finds the appropriate widget set, reads the application's icon (if any) from the Lazarus Resource file, initialises the screen, and leaves it ready for processing.
</descr>
        <errors/>
        <seealso>
          <link id="#fcl.CustApp.TCustomApplication.Initialize">TCustomApplication.Initialize</link>
        </seealso>
        <short>
          <var>Initialize</var> - calls inherited Initialize, then initialises widget set, loads icons from Laz resources and updates screen</short>
      </element>
      <!-- function Visibility: public -->
      <element name="TApplication.MessageBox">
        <short>
          <var>Message Box</var>: a useful function to display a message.</short>
        <descr>
          <p>
            <var>MessageBox</var>: a useful function to display a message.</p>
          <p>The function is used internally to display messages during the handling of <var>Exceptions</var>
, but is also available to application programmers as an alternative to some of the message dialogs found in <var>Dialogs</var>
          </p>
          <p>The argument <var>Flags</var> is a long integer constructed by adding together various constants to define the contents and behaviour of the box, for example:</p>
          <p>MB_ABORTRETRYIGNORE + MR_ICONQUESTION will cause the application to display a query (?) icon in a box with three buttons: </p>
          <p>ABORT RETRY IGNORE.</p>
          <p>The following button constants are available:</p>
          <p>MB_OK</p>
          <p>MB_OKCANCEL</p>
          <p>MB_ABORTRETRYIGNORE</p>
          <p>MB_YESNOCANCEL</p>
          <p>MB_YESNO</p>
          <p>MB_RETRYCANCEL</p>
          <p>And the following icon constants:</p>
          <p>MB_ICONHAND</p>
          <p>MB_ICONQUESTION</p>
          <p>MB_ICONEXCLAMATION</p>
          <p>MB_ICONASTERICK</p>
          <p>MB_ICONWARNING = MB_ICONEXCLAMATION</p>
          <p>MB_ICONERROR = MB_ICONHAND</p>
          <p>MB_ICONSTOP = MB_ICONHAND</p>
          <p>MB_ICONINFORMATION = MB_ICONASTERICK</p>
          <p>These constants are declared on the LCLType unit.</p>
          <p>The function returns an integer value corresponding to the button that was pressed; its value can be determined by reference to the constants [IDOK..IDHELP]</p>
          <p>It can be invoked like a procedure call (ie as a 'MessageBox()' statement rather than as a 'Variable := MessageBox()' function call)</p>
        </descr>
        <errors/>
        <seealso>
          <link id="#lcl.Dialogs.MessageDlg">MessageDlg</link>
        </seealso>
        <example file="dialogs/displaymessagebox.pas"/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TApplication.MessageBox.Result">
        <short>Result</short>
        <descr>Result: integer value returned by the function to signify which box was selected<br/>
          <br/>

Can be one of the following values:<br/>
          <br/>

 IDOK<br/>

 IDCANCEL<br/>

 IDABORT<br/>

 IDRETRY<br/>

 IDIGNORE<br/>

 IDYES<br/>

 IDNO<br/>

 IDCLOSE<br/>

 IDHELP	
		</descr>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.MessageBox.Text">
        <short>Text: the string that is displayed as a prompt or instruction in the Box</short>
        <descr/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.MessageBox.Caption">
        <short>Caption: the string label at the top of the message box</short>
        <descr/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.MessageBox.Flags">
        <short>Flags - a long integer constructed by adding together various constants to define the contents and behaviour of the box</short>
        <descr>Flags: longint - an integer constructed by adding together various constants to define the contents and behaviour of the box, for example<br/>
 
		MB_ABORTRETRYIGNORE + MR_ICONQUESTION will cause the application to display a query (?) icon in a box with three buttons: <br/>
ABORT RETRY IGNORE.<br/>
          <br/>

The following button constants are available:<br/>
          <br/>

 MB_OK<br/>

 MB_OKCANCEL<br/>

 MB_ABORTRETRYIGNORE<br/>

 MB_YESNOCANCEL<br/>

 MB_YESNO<br/>

 MB_RETRYCANCEL<br/>
          <br/>

And the following icon constants:<br/>
          <br/>

 MB_ICONHAND<br/>

 MB_ICONQUESTION<br/>

 MB_ICONEXCLAMATION<br/>

 MB_ICONASTERICK<br/>

 MB_ICONWARNING = MB_ICONEXCLAMATION<br/>

 MB_ICONERROR = MB_ICONHAND<br/>

 MB_ICONSTOP = MB_ICONHAND<br/>

 MB_ICONINFORMATION = MB_ICONASTERICK<br/>
          <br/>

These constants are declared on the LCLType unit.
        </descr>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.Minimize">
        <short>Minimise the form using the widget set's method</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.Restore">
        <short>Restore the application's form to the size it was before minimisation or maximisation</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.Notification">
        <short>
          <var>Notification</var> if Operation is Remove, then sets any Component to nil, otherwise calls inherited <var>Notification</var>
        </short>
        <descr/>
        <errors/>
        <seealso>
          <link id="#rtl.Classes.TComponent.Notification">TComponent.Notification</link>
        </seealso>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.Notification.AComponent">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.Notification.Operation">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.ProcessMessages">
        <short>
          <var>ProcessMessages</var> - method for processing system messages</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.Idle">
        <short>
          <var>Idle</var> - method for rendering the Application Idle if <var>Wait</var> is True</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.Idle.Wait">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.Run" link="#fcl.CustApp.TCustomApplication.Run">
        <descr>This method should be supplied by the application programmer, and should be the main process control procedure for the application
</descr>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.ShowException" link="#fcl.CustApp.TCustomApplication.ShowException">
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.ShowException.E">
        <short>The exception that is to be displayed</short>
        <seealso>
          <link id="#rtl.sysutils.exception"/>
        </seealso>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.Terminate" link="#fcl.CustApp.TCustomApplication.Terminate">
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.DisableIdleHandler">
        <short>
          <var>DisableIdleHandler</var> - turn off the Idle handler</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.EnableIdleHandler">
        <short>
          <var>EnableIdleHandler</var> - turn on the Idle handler</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.NotifyUserInputHandler">
        <short>
          <var>NotifyUserInputHandler</var> - send message t handler for user input</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.NotifyUserInputHandler.Msg">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.NotifyKeyDownBeforeHandler">
        <short>
          <var>NotifyKeyDownBeforeHandler</var> - send message to handler for the condition where a key has been previously pressed (eg a Shift, Control or Alt key(</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.NotifyKeyDownBeforeHandler.Sender">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.NotifyKeyDownBeforeHandler.Key">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.NotifyKeyDownBeforeHandler.Shift">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.NotifyKeyDownHandler">
        <short>
          <var>NotifyKeyDownHandler</var> - sends message to handler for a key pressed down</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.NotifyKeyDownHandler.Sender">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.NotifyKeyDownHandler.Key">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.NotifyKeyDownHandler.Shift">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.ControlKeyDown">
        <short>
          <var>ControlKeyDown</var> - method for dealing with the Control Key being pressed down</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.ControlKeyDown.Sender">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.ControlKeyDown.Key">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.ControlKeyDown.Shift">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.ControlKeyUp">
        <short>
          <var>ControlKeyUp</var> - method for dealing with a released Control key</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.ControlKeyUp.Sender">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.ControlKeyUp.Key">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.ControlKeyUp.Shift">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.AddOnIdleHandler">
        <short>
          <var>AddOnIdleHandler</var> - method for adding a handler for the Idle state</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.AddOnIdleHandler.Handler">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.AddOnIdleHandler.AsLast">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.RemoveOnIdleHandler">
        <short>
          <var>RemoveOnIdleHandler</var> - method for removing a handler for the Idle state</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.RemoveOnIdleHandler.Handler">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.AddOnIdleEndHandler">
        <short>
          <var>AddOnIdleEndHandler</var> - method to add a handler for the end of the Idle state</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.AddOnIdleEndHandler.Handler">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.AddOnIdleEndHandler.AsLast">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.RemoveOnIdleEndHandler">
        <short>
          <var>RemoveOnIdleEndHandler</var> - method for removing handler for the end of the Idle state</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.RemoveOnIdleEndHandler.Handler">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.AddOnUserInputHandler">
        <short>
          <var>AddOnUserInputHandler</var> - method for adding a handler for user input</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.AddOnUserInputHandler.Handler">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.AddOnUserInputHandler.AsLast">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.RemoveOnUserInputHandler">
        <short>
          <var>RemoveOnUserInputHandler</var> - method for removing handler for user input</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.RemoveOnUserInputHandler.Handler">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.AddOnKeyDownBeforeHandler">
        <short>
          <var>AddOnKeyDownBeforeHandler</var> - method for adding handler for the state where a key (eg Ctrl, Shift, Alt) has been already pressed</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.AddOnKeyDownBeforeHandler.Handler">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.AddOnKeyDownBeforeHandler.AsLast">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.RemoveOnKeyDownBeforeHandler">
        <short>
          <var>RemoveOnKeyDownBeforeHandler</var> - method for removing handler for the state where a key (eg Ctrl, Shift, Alt) has been already pressed</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.RemoveOnKeyDownBeforeHandler.Handler">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.AddOnKeyDownHandler">
        <short>
          <var>AddOnKeyDownHandler</var> - method for adding a handler for the Key Down state</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.AddOnKeyDownHandler.Handler">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.AddOnKeyDownHandler.AsLast">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.RemoveOnKeyDownHandler">
        <short>
          <var>RemoveOnKeyDownHandler</var> - method for removing handler for the Key Down state</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.RemoveOnKeyDownHandler.Handler">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.AddOnActivateHandler">
        <short>
          <var>AddOnActivateHandler</var> - method for adding a handler for activation</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.AddOnActivateHandler.Handler">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.AddOnActivateHandler.AsLast">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.RemoveOnActivateHandler">
        <short>
          <var>RemoveOnActivateHandler</var> - method for removing handler for activation</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.RemoveOnActivateHandler.Handler">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.AddOnDeactivateHandler">
        <short>
          <var>AddOnDeactivateHandler</var> - method for adding handler for deactivation</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.AddOnDeactivateHandler.Handler">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.AddOnDeactivateHandler.AsLast">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.RemoveOnDeactivateHandler">
        <short>
          <var>RemoveOnDeactivateHandler</var> - method for removing deactivation handler</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.RemoveOnDeactivateHandler.Handler">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.AddOnExceptionHandler">
        <short>
          <var>AddOnExceptionHandler</var> - method for adding exception handler</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.AddOnExceptionHandler.Handler">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.AddOnExceptionHandler.AsLast">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.RemoveOnExceptionHandler">
        <short>
          <var>RemoveOnExceptionHandler</var> - method for removing exception handler</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.RemoveOnExceptionHandler.Handler">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.AddOnEndSessionHandler">
        <short>
          <var>AddOnEndSessionHandler</var> - method for adding handler for end of session</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.AddOnEndSessionHandler.Handler">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.AddOnEndSessionHandler.AsLast">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.RemoveOnEndSessionHandler">
        <short>
          <var>RemoveOnEndSessionHandler</var> - method for removing handler for end of session</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.RemoveOnEndSessionHandler.Handler">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.AddOnQueryEndSessionHandler">
        <short>
          <var>AddOnQueryEndSessionHandler</var> - method for adding handler for a query at the end of a session</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.AddOnQueryEndSessionHandler.Handler">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.AddOnQueryEndSessionHandler.AsLast">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.RemoveOnQueryEndSessionHandler">
        <short>
          <var>RemoveOnQueryEndSessionHandler</var> - method for removing handler for a query at the end of a session</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.RemoveOnQueryEndSessionHandler.Handler">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.AddOnMinimizeHandler">
        <short>
          <var>AddOnMinimizeHandler</var> - method for adding handler for minimising component</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.AddOnMinimizeHandler.Handler">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.AddOnMinimizeHandler.AsLast">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.RemoveOnMinimizeHandler">
        <short>
          <var>RemoveOnMinimizeHandler</var> - method to remove handler for maximising component</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.RemoveOnMinimizeHandler.Handler">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.AddOnRestoreHandler">
        <short>
          <var>AddOnRestoreHandler</var> - method to add handler for Restore component</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.AddOnRestoreHandler.Handler">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.AddOnRestoreHandler.AsLast">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.RemoveOnRestoreHandler">
        <short>
          <var>RemoveOnRestoreHandler</var> - method to remove restore handler</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.RemoveOnRestoreHandler.Handler">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.AddOnDropFilesHandler">
        <short>
          <var>AddOnDropFilesHandler</var> - method to add handler for dropped files</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.AddOnDropFilesHandler.Handler">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.AddOnDropFilesHandler.AsLast">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.RemoveOnDropFilesHandler">
        <short>
          <var>RemoveOnDropFilesHandler</var> - method for removing drop files handler</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.RemoveOnDropFilesHandler.Handler">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.AddOnHelpHandler">
        <short>
          <var>AddOnHelpHandler</var> - method to add Help handler</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.AddOnHelpHandler.Handler">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.AddOnHelpHandler.AsLast">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.RemoveOnHelpHandler">
        <short>
          <var>RemoveOnHelpHandler</var> - method to remove Help handler</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.RemoveOnHelpHandler.Handler">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.AddOnHintHandler">
        <short>
          <var>AddOnHintHandler</var> - method to add handler for Hints</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.AddOnHintHandler.Handler">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.AddOnHintHandler.AsLast">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.RemoveOnHintHandler">
        <short>
          <var>RemoveOnHintHandler</var> - method to remove Hint handler</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.RemoveOnHintHandler.Handler">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.AddOnShowHintHandler">
        <short>
          <var>AddOnShowHintHandler</var> - method to add handler for showing Hints</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.AddOnShowHintHandler.Handler">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.AddOnShowHintHandler.AsLast">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.RemoveOnShowHintHandler">
        <short>
          <var>RemoveOnShowHintHandler</var> - method for removing handler for showing Hints</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.RemoveOnShowHintHandler.Handler">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.RemoveAllHandlersOfObject">
        <short>
          <var>RemoveAllHandlersOfObject</var> - method to remove all handlers of an object</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.RemoveAllHandlersOfObject.AnObject">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.DoBeforeMouseMessage">
        <short>
          <var>DoBeforeMouseMessage</var> - things to be done before a mouse message is processed</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.DoBeforeMouseMessage.CurMouseControl">
        <short/>
      </element>
      <!-- function Visibility: public -->
      <element name="TApplication.IsShortcut">
        <short>
          <var>IsShortcut</var> - returns True if specified Keyi s a shortcut</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TApplication.IsShortcut.Result">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.IsShortcut.Message">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.IntfQueryEndSession">
        <short>
          <var>IntfQueryEndSession</var> - called by the interface when there is a query at the end of a session</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.IntfQueryEndSession.Cancel">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.IntfEndSession">
        <short>
          <var>IntfEndSession</var> - called by the interface at the end of a session</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.IntfAppMinimize">
        <short>
          <var>IntfAppMinimize</var> - called by the interface if an application is minimised</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.IntfAppRestore">
        <short>
          <var>IntfAppRestore</var> - called by the interface when an application is being restored</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.IntfDropFiles">
        <short>
          <var>IntfDropFiles</var> - called by the interface for dropping files</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.IntfDropFiles.FileNames">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.DoEscapeKey">
        <short>
          <var>DoEscapeKey</var> - method for processing the Escape key</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.DoEscapeKey.AControl">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.DoEscapeKey.Key">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.DoEscapeKey.Shift">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.DoReturnKey">
        <short>
          <var>DoReturnKey</var> - method for processing the Return (Enter) key</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.DoReturnKey.AControl">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.DoReturnKey.Key">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.DoReturnKey.Shift">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TApplication.DoTabKey">
        <short>
          <var>DoTabKey</var> - method for processing the Tab key</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.DoTabKey.AControl">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.DoTabKey.Key">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplication.DoTabKey.Shift">
        <short/>
      </element>
      <!-- property Visibility: public -->
      <element name="TApplication.Active">
        <short>
          <var>Active</var> - returns True if this is an active Application</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TApplication.CaptureExceptions">
        <short>
          <var>CaptureExceptions</var> -  If exceptions have occurred, find out what they are, ready for processing</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TApplication.FindGlobalComponentEnabled">
        <short>
          <var>FindGlobalComponentEnabled</var> - returns True if the Find Global Component state is enabled</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TApplication.Flags">
        <short>
          <var>Flags</var> - the list of flags for this application</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TApplication.Hint">
        <short>The hint associated with the main application</short>
        <descr>A hint is a small pop-up mesage that appears briefly while the mouse hovers over a specified area of the screen. It usually displays useful information about how to use an object or what data should be entered, etc<br/>
          <br/>

Reads or writes a flag to determine the hint associated with the application</descr>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TApplication.HintColor">
        <short>The colour used to display the hint</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TApplication.HintHidePause">
        <short>The delay period after mouse entry before the hint becomes visible</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TApplication.HintHidePausePerChar">
        <short>
          <var>HintHidePausePerChar</var> - the pause period per character for hiding a hint</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TApplication.HintPause">
        <short>
          <var>HintPause</var> - The length of time for which the hint is displayed</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TApplication.HintShortCuts">
        <short>
          <var>HintShortCuts</var> - If True, there are hints for short cut keys </short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TApplication.HintShortPause">
        <short>
          <var>HintShortPause</var> - the pause before a shortcut hint is displayed</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TApplication.Navigation">
        <short>Determine how the form is to be navigated</short>
        <descr>Reads or writes a flag to determine the navigation method: <br/>

Is <b>Tab</b>
 used to move to next control? <br/>

Does <b>Enter</b>
 or <b>Ret</b>
 activate the default action? <br/>

Does <b>Esc</b>
 perform the cancel action? <br/>

Does <b>F1</b>
 activate a Help system?<br/>
          <br/>

Navigation Options is a set, so can take zero or more of the available values</descr>
        <seealso>
          <link id="TApplicationNavigationOptions"/>
        </seealso>
      </element>
      <!-- property Visibility: public -->
      <element name="TApplication.MainForm">
        <short>The Main Form used by the application for process control and for data input/output</short>
        <descr>Reads a flag to get particulars of the main form</descr>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TApplication.OnActionExecute">
        <short>
          <var>OnActionExecute</var> - event handler for executing the application's main action</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TApplication.OnActionUpdate">
        <short>
          <var>OnActionUpdate</var> - event handler for updating the application's main action</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TApplication.OnActivate">
        <short>
          <var>OnActivate</var> - Event handler for activation of the application</short>
      </element>
      <!-- property Visibility: public -->
      <element name="TApplication.OnDeactivate">
        <short>
          <var>OnDeactivate</var> - Event handler for deactivation of the application</short>
      </element>
      <!-- property Visibility: public -->
      <element name="TApplication.OnIdle">
        <short>
          <var>OnIdle</var> - event handler for the Idle state</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TApplication.OnIdleEnd">
        <short>
          <var>OnIdleEnd</var> - event handler for the end of the Idle state</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TApplication.OnEndSession">
        <short>
          <var>OnEndSession</var> - Event handler for ending a session of the application</short>
      </element>
      <!-- property Visibility: public -->
      <element name="TApplication.OnQueryEndSession">
        <short>
          <var>OnQueryEndSession</var> - event handler for processing a query at the end of a session</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TApplication.OnMinimize">
        <short>
          <var>OnMinimize</var> - Event handler for minimising the application's form</short>
      </element>
      <!-- property Visibility: public -->
      <element name="TApplication.OnRestore">
        <short>
          <var>OnRestore</var> - Event handler for restoring the application's form from minimised or maximised condition</short>
      </element>
      <!-- property Visibility: public -->
      <element name="TApplication.OnDropFiles">
        <short>
          <var>OnDropFiles</var> - The event invoked when file is dropped on one of the application forms.</short>
        <descr>The OnDropFiles event is invoked when user drops one or multiple files on one of the application forms. You must enable this feature by setting AllowDropFiles property of form.
</descr>
        <seealso>
          <link id="TCustomForm.OnDropFiles"/>
          <link id="TCustomForm.AllowDropFiles"/>
        </seealso>
      </element>
      <!-- property Visibility: public -->
      <element name="TApplication.OnHelp">
        <short>
          <var>OnHelp</var> - Event handler when help is required</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TApplication.OnHint">
        <short>
          <var>OnHint</var> - Event handler when a hint is required</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TApplication.OnShortcut">
        <short>
          <var>OnShortcut</var> - Event handler when a shortcut key is pressed</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TApplication.OnShowHint">
        <short>
          <var>OnShowHint</var> - Event handler for showing a hint</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TApplication.OnUserInput">
        <short>
          <var>OnUserInput</var> - Event handler when user input is required or is occurring</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TApplication.OnDestroy">
        <short>
          <var>OnDestroy</var> - Event handler for destruction of the application</short>
      </element>
      <!-- property Visibility: public -->
      <element name="TApplication.ShowHint">
        <short>
          <var>ShowHint</var> - Is a hint required to be shown?</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TApplication.ShowMainForm">
        <short>
          <var>ShowMainForm</var> - Is the main form for the application to be shown? Default TRUE</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TApplication.Title" link="#fcl.CustApp.TCustomApplication.Title"/>
      <!-- property Visibility: public -->
      <element name="TApplication.ApplicationType">
        <short>
          <var>ApplicationType</var> - The type of the application (ie the sort of device for which it is intended)</short>
        <descr>
          <p>The type of the application:</p>
          <p>Default, Desktop, Handheld, PDA, Smartphone</p>
        </descr>
        <seealso/>
      </element>
      <!-- object Visibility: default -->
      <element name="TApplicationProperties">
        <short>
          <var>TApplicationProperties</var>: The properties of the current application</short>
        <descr>
          <p>TApplication Properties can be set as a local default set of properties to be used for any new instance fo TApplication</p>
        </descr>
        <errors/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplicationProperties.FCaptureExceptions">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplicationProperties.FHelpFile">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplicationProperties.FHint">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplicationProperties.FHintColor">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplicationProperties.FHintHidePause">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplicationProperties.FHintPause">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplicationProperties.FHintShortCuts">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplicationProperties.FHintShortPause">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplicationProperties.FOnDropFiles">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplicationProperties.FShowHint">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplicationProperties.FShowMainForm">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplicationProperties.FTitle">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplicationProperties.FOnException">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplicationProperties.FOnIdle">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplicationProperties.FOnIdleEnd">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplicationProperties.FOnHelp">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplicationProperties.FOnHint">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplicationProperties.FOnShowHint">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplicationProperties.FOnUserInput">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplicationProperties.FOnEndSession">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplicationProperties.FOnQueryEndSession">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplicationProperties.FOnMinimize">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TApplicationProperties.FOnRestore">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TApplicationProperties.SetShowMainForm">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplicationProperties.SetShowMainForm.AValue">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TApplicationProperties.SetCaptureExceptions">
        <short>
          <var>SetCaptureExceptions</var> - specifies whether exceptions are to be captured</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplicationProperties.SetCaptureExceptions.AValue">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TApplicationProperties.SetHelpFile">
        <short>
          <var>SetHelpFile</var> - specifies which file is to be used for Help messages</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplicationProperties.SetHelpFile.AValue">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TApplicationProperties.SetHint">
        <short>
          <var>SetHint</var> - specifies the text for a Hint</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplicationProperties.SetHint.AValue">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TApplicationProperties.SetHintColor">
        <short>
          <var>SetHintColor</var> - specifies the colour for displaying hints</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplicationProperties.SetHintColor.AValue">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TApplicationProperties.SetHintHidePause">
        <short>
          <var>SetHintHidePause</var> - specifies the length of pause before a hint becomes hidden</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplicationProperties.SetHintHidePause.AValue">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TApplicationProperties.SetHintPause">
        <short>
          <var>SetHintPause</var> - specifies the length of pause before a hint is displayed</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplicationProperties.SetHintPause.AValue">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TApplicationProperties.SetHintShortCuts">
        <short>
          <var>SetHintShortCuts</var> - specifies whether hints are to be displayed for Shortcut keys</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplicationProperties.SetHintShortCuts.AValue">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TApplicationProperties.SetHintShortPause">
        <short>
          <var>SetHintShortPause</var> - specifies the length of pause before a shortcut key hint is displayed</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplicationProperties.SetHintShortPause.AValue">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TApplicationProperties.SetShowHint">
        <short>
          <var>SetShowHint</var> - specifies whether hints are to be displayed</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplicationProperties.SetShowHint.AValue">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TApplicationProperties.SetTitle">
        <short>
          <var>SetTitle</var> - specifies the title for the Form</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplicationProperties.SetTitle.AValue">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TApplicationProperties.SetOnException">
        <short>
          <var>SetOnException</var> - specifies the event handler for exceptions</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplicationProperties.SetOnException.AValue">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TApplicationProperties.SetOnIdle">
        <short>
          <var>SetOnIdle</var> - specifies the handler for Idle events</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplicationProperties.SetOnIdle.AValue">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TApplicationProperties.SetOnIdleEnd">
        <short>
          <var>SetOnIdleEnd</var> - specifies the handler to notify the end of an idle period</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplicationProperties.SetOnIdleEnd.AValue">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TApplicationProperties.SetOnEndSession">
        <short>
          <var>SetOnEndSession</var> - specifies the event handler to notify the end of a session</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplicationProperties.SetOnEndSession.AValue">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TApplicationProperties.SetOnQueryEndSession">
        <short>
          <var>SetOnQueryEndSession</var> - specify the event handler for a query at the end of a session</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplicationProperties.SetOnQueryEndSession.AValue">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TApplicationProperties.SetOnMinimize">
        <short>
          <var>SetOnMinimize</var> - specify the event handler for minimising the application form</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplicationProperties.SetOnMinimize.AValue">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TApplicationProperties.SetOnRestore">
        <short>
          <var>SetOnRestore</var> - specify the event handler for restoring the application's form</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplicationProperties.SetOnRestore.AValue">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TApplicationProperties.SetOnDropFiles">
        <short>
          <var>SetOnDropFiles</var> - specify the event handler for dropping files</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplicationProperties.SetOnDropFiles.AValue">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TApplicationProperties.SetOnHelp">
        <short>
          <var>SetOnHelp</var> - specify the event handler for help requests</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplicationProperties.SetOnHelp.AValue">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TApplicationProperties.SetOnHint">
        <short>
          <var>SetOnHint</var> - specify the event handler for a request to show hints</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplicationProperties.SetOnHint.AValue">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TApplicationProperties.SetOnShowHint">
        <short>
          <var>SetOnShowHint</var> - specify the event handler for showing hints</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplicationProperties.SetOnShowHint.AValue">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TApplicationProperties.SetOnUserInput">
        <short>
          <var>SetOnUserInput</var> - specify the event handler for dealing with User input</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplicationProperties.SetOnUserInput.AValue">
        <short/>
      </element>
      <!-- constructor Visibility: public -->
      <element name="TApplicationProperties.Create">
        <short>
          <var>Create</var> - constructor for TApplicationProperties: calls inherited <var>Create</var>, then sets some defaults if new application is being designed, or loads local values from existing application </short>
        <descr/>
        <errors/>
        <seealso>
          <link id="#rtl.Classes.TComponent.Create">TComponent.Create</link>
          <link id="#LCL.LCLClasses.TLCLComponent.Create">TLCLComponent.Create</link>
        </seealso>
      </element>
      <!-- argument Visibility: default -->
      <element name="TApplicationProperties.Create.AOwner">
        <short/>
      </element>
      <!-- destructor Visibility: public -->
      <element name="TApplicationProperties.Destroy">
        <short>
          <var>Destroy</var> - destructor for TApplicationProperties: removes a number of handlers then calls inherited <var>Destroy</var>
        </short>
        <descr/>
        <errors/>
        <seealso>
          <link id="#rtl.Classes.TComponent.Destroy">TComponent.Destroy</link>
          <link id="#LCL.LCLClasses.TLCLComponent.Destroy">TLCLComponent.Destroy</link>
        </seealso>
      </element>
      <!-- property Visibility: published -->
      <element name="TApplicationProperties.CaptureExceptions">
        <short>
          <var>CaptureExceptions</var> - Determine whether exceptions are being captured</short>
        <descr>Boolean property (true if exceptions are being captured); reads or writes flag to see if they are being captured
</descr>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TApplicationProperties.HelpFile">
        <short>
          <var>HelpFile</var> - Determines which file to use for Help</short>
        <descr>Reads or writes flag to determine name of Help file - name is stored as a string
</descr>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TApplicationProperties.Hint">
        <short>
          <var>Hint</var> - Determines Hint to be used</short>
        <descr>Reads or writes flag to determine Hint - stored as a string
</descr>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TApplicationProperties.HintColor">
        <short>
          <var>HintColor</var> - Colour to be used when displaying Hint</short>
        <descr>Reads or writes flag to determine Hint colour (stored as a TColor integer)
</descr>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TApplicationProperties.HintHidePause">
        <short>
          <var>HintHidePause</var> - the length of pause before a hint becomes hidden</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TApplicationProperties.HintPause">
        <short>
          <var>HintPause</var> - the length of pause before a hint is displayed</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TApplicationProperties.HintShortCuts">
        <short>
          <var>HintShortCuts</var> - the hints for shortcut keys (present if True)</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TApplicationProperties.HintShortPause">
        <short>
          <var>HintShortPause</var> - the length of pause before a shortcut hint is displayed</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TApplicationProperties.ShowHint">
        <short>
          <var>ShowHint</var> - Determines whether a hint is to be displayed</short>
        <descr>Read or write flag to determine whether to display hint (stored as boolean, True if hint is to be displayed)
</descr>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TApplicationProperties.ShowMainForm">
        <short>
          <var>ShowMainForm</var> - Determines whether main form is to be displayed</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TApplicationProperties.Title">
        <short>
          <var>Title</var> to be shown in Application's top Border</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TApplicationProperties.OnException">
        <short>
          <var>OnException</var> - Event handler for exceptions</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TApplicationProperties.OnIdle">
        <short>
          <var>OnIdle</var> - event handler for the Idle state</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TApplicationProperties.OnIdleEnd">
        <short>
          <var>OnIdleEnd</var> - event handler for the end of the Idle state</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TApplicationProperties.OnEndSession">
        <short>
          <var>OnEndSession</var> - Event handler for the end of the session</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TApplicationProperties.OnQueryEndSession">
        <short>
          <var>OnQueryEndSession</var> - Event handler for a query at the end of a  session</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TApplicationProperties.OnMinimize">
        <short>
          <var>OnMinimize</var> - Event handler for minimising the form</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TApplicationProperties.OnRestore">
        <short>
          <var>OnRestore</var> - Event handler for restoring a form which has been minimised or maximised</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TApplicationProperties.OnDropFiles">
        <short>
          <var>OnDropFiles</var> - Event handler when files are dropped on the form</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TApplicationProperties.OnHelp">
        <short>
          <var>OnHelp</var> - Event handler when help is needed</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TApplicationProperties.OnHint">
        <short>
          <var>OnHint</var> - Event handler when a hint is needed</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TApplicationProperties.OnShowHint">
        <short>
          <var>OnShowHint</var> - Event handler for showing a hint</short>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TApplicationProperties.OnUserInput">
        <short>
          <var>OnUserInput</var> - Event handler when user input is received</short>
        <descr/>
        <seealso/>
      </element>
      <!-- function Visibility: public -->
      <element name="TIDesigner.IsDesignMsg">
        <short>
          <var>IsDesignMsg</var> - receives a message from Sender, and returns True if it is a design message</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TIDesigner.IsDesignMsg.Result">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TIDesigner.IsDesignMsg.Sender">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TIDesigner.IsDesignMsg.Message">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TIDesigner.Modified">
        <short>Method when design is <var>Modified</var>
        </short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TIDesigner.Notification">
        <short>
          <var>Notification</var> that the suppied Operation has been applied to the specified Component</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TIDesigner.Notification.AComponent">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TIDesigner.Notification.Operation">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TIDesigner.PaintGrid">
        <short>
          <var>PaintGrid</var> - method for painting the grid in the designer</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TIDesigner.ValidateRename">
        <short>
          <var>ValidateRename</var> - method to validate the Rename process</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TIDesigner.ValidateRename.AComponent">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TIDesigner.ValidateRename.CurName">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TIDesigner.ValidateRename.NewName">
        <short/>
      </element>
      <!-- function Visibility: public -->
      <element name="TIDesigner.GetShiftState">
        <short>
          <var>GetShiftState</var> - returns the value of the shift state (whether shifted, Cntl key, Alt key etc)</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TIDesigner.GetShiftState.Result">
        <short/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TIDesigner.SelectOnlyThisComponent">
        <short>
          <var>SelectOnlyThisComponent</var> - method to select only the currrent component in the designer</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TIDesigner.SelectOnlyThisComponent.AComponent">
        <short/>
      </element>
      <!-- function Visibility: public -->
      <element name="TIDesigner.UniqueName">
        <short>
          <var>UniqueName</var> - returns a Unique name for the designer, using the BaseName as a starting point</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TIDesigner.UniqueName.Result">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TIDesigner.UniqueName.BaseName">
        <short/>
      </element>
      <!-- object Visibility: default -->
      <element name="TFormPropertyStorage">
        <short>
          <var>TFormPropertyStorage</var> - class for storage of a Form's properties</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TFormPropertyStorage.FormFirstShow">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TFormPropertyStorage.FormFirstShow.Sender">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TFormPropertyStorage.FormClose">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TFormPropertyStorage.FormClose.Sender">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TFormPropertyStorage.FormClose.CloseAction">
        <short/>
      </element>
      <!-- constructor Visibility: public -->
      <element name="TFormPropertyStorage.Create" link="#rtl.Classes.TComponent.Create">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TFormPropertyStorage.Create.TheOwner">
        <short/>
      </element>
      <!-- destructor Visibility: public -->
      <element name="TFormPropertyStorage.Destroy" link="#rtl.Classes.TComponent.Destroy">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- object Visibility: default -->
      <element name="TDataModule">
        <short>Data Module</short>
        <descr>Data Module:   for interfacing to the database</descr>
        <errors/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TDataModule.FDesignSize">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TDataModule.FDesignOffset">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TDataModule.FOnCreate">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TDataModule.FOnDestroy">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: private -->
      <element name="TDataModule.FOldCreateOrder">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- function Visibility: private -->
      <element name="TDataModule.OldCreateOrderIsStored">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TDataModule.OldCreateOrderIsStored.Result">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TDataModule.ReadHeight">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TDataModule.ReadHeight.Reader">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TDataModule.ReadHorizontalOffset">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TDataModule.ReadHorizontalOffset.Reader">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TDataModule.ReadVerticalOffset">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TDataModule.ReadVerticalOffset.Reader">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TDataModule.ReadWidth">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TDataModule.ReadWidth.Reader">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TDataModule.WriteWidth">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TDataModule.WriteWidth.Writer">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TDataModule.WriteHorizontalOffset">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TDataModule.WriteHorizontalOffset.Writer">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TDataModule.WriteVerticalOffset">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TDataModule.WriteVerticalOffset.Writer">
        <short/>
      </element>
      <!-- procedure Visibility: private -->
      <element name="TDataModule.WriteHeight">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TDataModule.WriteHeight.Writer">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TDataModule.DoCreate">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TDataModule.DoDestroy">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TDataModule.DefineProperties">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TDataModule.DefineProperties.Filer">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TDataModule.GetChildren">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TDataModule.GetChildren.Proc">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TDataModule.GetChildren.Root">
        <short/>
      </element>
      <!-- function Visibility: protected -->
      <element name="TDataModule.HandleCreateException">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TDataModule.HandleCreateException.Result">
        <short/>
      </element>
      <!-- procedure Visibility: protected -->
      <element name="TDataModule.ReadState">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TDataModule.ReadState.Reader">
        <short/>
      </element>
      <!-- constructor Visibility: public -->
      <element name="TDataModule.Create">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TDataModule.Create.TheOwner">
        <short/>
      </element>
      <!-- constructor Visibility: public -->
      <element name="TDataModule.CreateNew">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TDataModule.CreateNew.TheOwner">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TDataModule.CreateNew.CreateMode">
        <short/>
      </element>
      <!-- destructor Visibility: public -->
      <element name="TDataModule.Destroy">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TDataModule.AfterConstruction">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: public -->
      <element name="TDataModule.BeforeDestruction">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TDataModule.DesignOffset">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: public -->
      <element name="TDataModule.DesignSize">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TDataModule.OnCreate">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TDataModule.OnDestroy">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- property Visibility: published -->
      <element name="TDataModule.OldCreateOrder">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- constant Visibility: default -->
      <element name="AddDataModule">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="DataModule">
        <short/>
      </element>
      <!-- constant Visibility: default -->
      <element name="RemoveDataModule">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- constant Visibility: default -->
      <element name="ApplicationHandleException">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="Sender">
        <short/>
      </element>
      <!-- constant Visibility: default -->
      <element name="ApplicationShowException">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="E">
        <short/>
      </element>
      <!-- function Visibility: default -->
      <element name="KeysToShiftState">
        <short>
          <var>KeysToShiftState</var> - converts an actual physical key code to a shift state (ie Shift, Ctrl, Alt etc)</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="KeysToShiftState.Result">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="KeysToShiftState.Keys">
        <short/>
      </element>
      <!-- function Visibility: default -->
      <element name="KeyDataToShiftState">
        <short>
          <var>KeyDataToShiftState</var> - converts Key data to a shift state</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="KeyDataToShiftState.Result">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="KeyDataToShiftState.KeyData">
        <short/>
      </element>
      <!-- function Visibility: default -->
      <element name="WindowStateToStr">
        <short>
          <var>WindowStateToStr</var> - converts a Window state to a string</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="WindowStateToStr.Result">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="WindowStateToStr.State">
        <short/>
      </element>
      <!-- function Visibility: default -->
      <element name="StrToWindowState">
        <short>
          <var>StrToWindowState</var> - converts a string to a Window state</short>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="StrToWindowState.Result">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="StrToWindowState.Name">
        <short/>
      </element>
      <!-- alias type Visibility: default -->
      <element name="TFocusState">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- function Visibility: default -->
      <element name="SaveFocusState">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="SaveFocusState.Result">
        <short/>
      </element>
      <!-- procedure Visibility: default -->
      <element name="RestoreFocusState">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="RestoreFocusState.FocusState">
        <short/>
      </element>
      <!-- function type Visibility: default -->
      <element name="TGetDesignerFormEvent">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TGetDesignerFormEvent.Result">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TGetDesignerFormEvent.AComponent">
        <short/>
      </element>
      <!-- variable Visibility: default -->
      <element name="OnGetDesignerForm">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- function Visibility: default -->
      <element name="GetParentForm">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="GetParentForm.Result">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="GetParentForm.Control">
        <short/>
      </element>
      <!-- function Visibility: default -->
      <element name="GetFirstParentForm">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="GetFirstParentForm.Result">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="GetFirstParentForm.Control">
        <short/>
      </element>
      <!-- function Visibility: default -->
      <element name="GetDesignerForm">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="GetDesignerForm.Result">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="GetDesignerForm.AComponent">
        <short/>
      </element>
      <!-- function Visibility: default -->
      <element name="FindRootDesigner">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="FindRootDesigner.Result">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="FindRootDesigner.AComponent">
        <short/>
      </element>
      <!-- function Visibility: default -->
      <element name="IsAccel">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="IsAccel.Result">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="IsAccel.VK">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="IsAccel.Str">
        <short/>
      </element>
      <!-- procedure Visibility: default -->
      <element name="NotifyApplicationUserInput">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="NotifyApplicationUserInput.Msg">
        <short/>
      </element>
      <!-- function Visibility: default -->
      <element name="GetShortHint">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="GetShortHint.Result">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="GetShortHint.Hint">
        <short/>
      </element>
      <!-- function Visibility: default -->
      <element name="GetLongHint">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="GetLongHint.Result">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="GetLongHint.Hint">
        <short/>
      </element>
      <!-- variable Visibility: default -->
      <element name="Application">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: default -->
      <element name="Screen">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: default -->
      <element name="ExceptionObject">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- variable Visibility: default -->
      <element name="HintWindowClass">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- function type Visibility: default -->
      <element name="TMessageBoxFunction">
        <short>
          <var>TMessageBoxFunction</var> - the function to be used by a message box: specifies Text and Flags, and returns an integer value</short>
        <descr/>
        <seealso/>
      </element>
      <!-- function result Visibility: default -->
      <element name="TMessageBoxFunction.Result">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TMessageBoxFunction.Text">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TMessageBoxFunction.Caption">
        <short/>
      </element>
      <!-- argument Visibility: default -->
      <element name="TMessageBoxFunction.Flags">
        <short/>
      </element>
      <!-- variable Visibility: default -->
      <element name="MessageBoxFunction">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- constant Visibility: default -->
      <element name="DefaultBorderIcons">
        <short/>
        <descr/>
        <seealso/>
      </element>
      <!-- procedure Visibility: default -->
      <element name="CreateWidgetset">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- argument Visibility: default -->
      <element name="CreateWidgetset.AWidgetsetClass">
        <short/>
      </element>
      <!-- procedure Visibility: default -->
      <element name="FreeWidgetSet">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <!-- procedure Visibility: default -->
      <element name="Register">
        <short/>
        <descr/>
        <errors/>
        <seealso/>
      </element>
      <element name="TForm.LCLVersion">
        <short>The version of the LCL as string. Used to distinguish form streams of different versions.</short>
      </element>
      <element name="TForm.Loaded" link="#LCL.Forms.TCustomForm.Loaded">
        <seealso>
          <link id="#rtl.Classes.TComponent.Loaded">TComponent.Loaded</link>
        </seealso>
      </element>
      <element name="TForm.Create" link="#LCL.Forms.TCustomForm.Create"/>
      <element name="TScreen.DataModuleCount">
        <short>The number of data modules on the screen</short>
      </element>
      <element name="TScreen.DataModules">
        <short>The list of Data Modules </short>
      </element>
      <element name="TScrollBox.AutoScroll" link="#LCL.Forms.TScrollingWinControl.AutoScroll"/>
      <element name="TScrollBox.DockSite" link="#LCL.Controls.TWinControl.DockSite"/>
      <element name="TScrollBox.OnDockDrop" link="#LCL.Controls.TWinControl.OnDockDrop"/>
      <element name="TScrollBox.OnDockOver" link="#LCL.Controls.TWinControl.OnDockOver"/>
      <element name="TScrollBox.OnEndDock" link="#LCL.Controls.TControl.OnEndDock"/>
      <element name="TScrollBox.OnGetSiteInfo" link="#LCL.Controls.TWinControl.OnGetSiteInfo"/>
      <element name="TScrollBox.OnStartDock" link="#LCL.Controls.TControl.OnStartDock"/>
      <element name="TScrollBox.OnUnDock" link="#LCL.Controls.TWinControl.OnUnDock"/>
      <element name="TCustomFrame.DefineProperties">
        <short>
          <var>DefineProperties</var>- calculates low and high values for frame design from ancestor class</short>
        <seealso>
          <link id="#rtl.Classes.TComponent.DefineProperties">TComponent.DefineProperties</link>
          <link id="#LCL.Controls.TControl.DefineProperties">TControl.DefineProperties</link>
        </seealso>
      </element>
      <element name="TFrame.LCLVersionIsStored"/>
      <element name="TFrame.Create" link="#LCL.Forms.TCustomFrame.Create"/>
      <element name="TFrame.ClientHeight" link="#LCL.Controls.TControl.ClientHeight"/>
      <element name="TFrame.ClientWidth" link="#LCL.Controls.TControl.ClientWidth"/>
      <element name="TFrame.LCLVersion" link="#LCL.LCLVersion.lcl_version"/>
      <element name="TCustomForm.BigIconHandle">
        <short>
          <var>BigIconHandle</var> - returns system Handle for large Icon</short>
      </element>
      <element name="TCustomForm.SmallIconHandle">
        <short>
          <var>SmallIconHandle</var> - returns system Handle for small Icon</short>
      </element>
      <element name="TCustomForm.GetFormImage">
        <short>
          <var>GetFormImage</var> - gets a Bitmap image for the Form</short>
      </element>
      <element name="TForm.AutoScroll" link="#LCL.Forms.TScrollingWinControl.AutoScroll"/>
      <element name="TForm.OnMouseWheel" link="#LCL.Controls.TControl.OnMouseWheel"/>
      <element name="TForm.OnMouseWheelDown" link="#LCL.Controls.TControl.OnMouseWheelDown"/>
      <element name="TForm.OnMouseWheelUp" link="#LCL.Controls.TControl.OnMouseWheelUp"/>
      <element name="TForm.OnShowHint" link="#LCL.Controls.TControl.OnShowHint"/>
      <element name="TScreen.FindDataModule">
        <short>
          <var>FindDataModule</var> - returns the Data Module with the specified name</short>
      </element>
      <element name="TApplication.GetParams">
        <short>
          <var>GetParams</var> - find the application's parameters (typically by parsing the command line that invoked the application)</short>
      </element>
      <element name="TApplication.BigIconHandle">
        <short>
          <var>BigIconHandle</var> - system Handle for large Icon</short>
      </element>
      <element name="TApplication.SmallIconHandle">
        <short>
          <var>SmallIconHandle</var> - system handle for small Icon</short>
      </element>
      <element name="TCustomForm.ParentFont" link="#LCL.Controls.TControl.ParentFont"/>
      <element name="TApplication.BidiMode">
        <short>
          <var>BidiMode</var> - whether bi-directional mode is available</short>
      </element>
      <element name="TCustomForm.DoShowWindow">
        <short>
          <var>DoShowWindow</var> automatically choose a control to focus</short>
      </element>
      <element name="TCustomForm.AdjustClientRect">
        <short>
          <var>AdjustClientRect</var> - adjusts window size to accommodate borders</short>
        <seealso>
          <link id="#LCL.Controls.TWinControl.AdjustClientRect">TWinControl.AdjustClientRect</link>
        </seealso>
      </element>
      <element name="THintWindow.DoShowWindow" link="#LCL.Forms.TCustomForm.DoShowWindow"/>
      <element name="TScreen.DisableForms">
        <short>
          <var>DisableForms</var> - disable all forms except <var>SkipForm</var>. If <var>DisabledList</var> is available then add forms to that list and return it, otherwise return new list. Used to show forms and other dialogs modal        </short>
      </element>
      <element name="TScreen.EnableForms">
        <short>
          <var>EnableForms</var> - enable all forms from <var>AFormList</var> and destroy list. Used to restore state after <var>DisableForms</var>
        </short>
      </element>
      <element name="TApplication.DoArrowKey">
        <short>
          <var>DoArrowKey</var> - method for processing an arrow key</short>
      </element>
      <element name="TScrollingWinControl.WSRegisterClass" link="#LCL.LCLClasses.TLCLComponent.WSRegisterClass"/>
      <element name="TScrollBox.WSRegisterClass" link="#LCL.LCLClasses.TLCLComponent.WSRegisterClass"/>
      <element name="TCustomFrame.WSRegisterClass" link="#LCL.LCLClasses.TLCLComponent.WSRegisterClass"/>
      <element name="TCustomForm.WSRegisterClass" link="#LCL.LCLClasses.TLCLComponent.WSRegisterClass"/>
      <element name="THintWindow.WSRegisterClass" link="#LCL.LCLClasses.TLCLComponent.WSRegisterClass"/>
    </module>
    <!-- Forms -->
  </package>
</fpdoc-descriptions>
