VCL中如何实现Align属性？

Question

很多VCL组件都有Align属性，用来方便应用程序界面的编辑。
现在以TWinControl为基类生成一个组件，在该组件中如何实现Align属性？

Answer 1

TControl
都有了ALIGN，不用你写了

Answer 2

Delphi Help
 VCL Reference
TWinControl PropertiesIn TWinControl                           AlignDisabled
BevelEdges
BevelInner
BevelKind
BevelOuter
BevelWidth
                            BorderWidth
Brush
ClientOrigin
ClientRect
ControlCount
Controls
                            Ctl3D
DefWndProc
DockClientCount
DockClients
DockManager
DockSite
                           DoubleBuffered
Handle
ImeMode
ImeName
ParentCtl3D
ParentBackground
                           ParentWindow
Showing
TabOrder
TabStop
UseDockManager
VisibleDockClientCount
                           WindowHandleDerived from TControl                           Action
Align             <-----------直接继承就可以用
Anchors
BiDiMode
BoundsRect
ClientHeight
ClientWidth
                            Constraints
ControlState
ControlStyle
Cursor
DockOrientation
Enabled
Floating
                            FloatingDockSiteClass
Height
HelpContext
HelpKeyword
HelpType
Hint
                           HostDockSite
Left
LRDockWidth
Name
Parent
ShowHint
TBDockHeight
                           Top
UndockHeight
UndockWidth
Visible
Width
WindowProcDerived from TComponent                            ComObject
ComponentCount
ComponentIndex
Components
ComponentState
ComponentStyle
                           DesignInfo
Owner
Tag
VCLComObject

Answer 3

Public or Pulished the Align Property.

Answer 4

http://www.delphibbs.com/keylife/iblog_show.asp?xid=2547
看看这个帖子