TCustomSplitter

type TCustomSplitter = class(TCustomControl)

protected

  procedure CMEnabledChanged(); message;

Handles the CM_ENABLEDCHANGED message.

  class procedure WSRegisterClass; override;

Registers this component class with the current WidgetSet.

  function AdaptAnchors();

Adjust anchor settings to reflect the value in the Align property.

  function CheckNewSize(); virtual;

Ensures the new size is acceptable for the aligned control on the splitter.

  function CheckOffset(); virtual;

Signals the OnCanOffset event handler to determine the offset used when aligning the control, and the success or failure of the calculation.

  function FindAlignControl;

FindAlignControl returns the main alignment control for the splitter.

  function FindAlignOtherControl;

FindAlignOtherControl returns the other (secondary) alignment control for the splitter.

  procedure MouseDown(); override;

Initiates the splitter movement operation.

  procedure MouseEnter; override;

Starts mouse capture and tracking for the control.

  procedure MouseLeave; override;

Perform actions when the mouse pointer exits the control.

  procedure MouseMove(); override;

Applies a Shift+Drag operation for the splitter as a relative offset to the anchored control.

  procedure MouseUp(); override;

Handles a mouse up event for the splitter control.

  procedure Paint; override;

Draws the splitter control.

  procedure SetAlign(); override;

Sets the value for the Align property.

  procedure SetAnchors(); override;

Sets the value for the Anchors property.

  procedure SetResizeAnchor(); virtual;

Sets the value for the ResizeAnchor property.

  procedure SetResizeControl(); virtual;

Sets the value for the ResizeControl property.

  procedure StartSplitterMove();

Method used to start a move operation for the splitter using the mouse position in MouseXY.

  procedure StopSplitterMove();

Performs actions when splitter movement is stopped at the specified mouse position.

  procedure UpdateCursor; virtual;

Updates the cursor shape to reflect the ResizeAnchor for the splitter.

public

  constructor Create(); override;

Constructor for the class instance.

  procedure AnchorSplitter();

AnchorSplitter anchors the splitter to AControl using the specified Kind of anchor.

  property ResizeControl: TControl; [rw]

Contains the aligned control that is resized when the splitter is moved.

  function GetOtherResizeControl;

Gets the adjacent anchored control that is resized when the splitter is moved.

  procedure MoveSplitter(); virtual;

Moves the splitter by an amount specified in Offset.

  procedure SetSplitterPosition();

Changes the position for the splitter to the specified NewPosition.

  function GetSplitterPosition;

GetSplitterPosition returns the current position of the splitter.

  property Align: TAlign;

Specifies the aligned edge for the splitter within its Parent and relative to ResizeControl.

  property AutoSnap: Boolean; [rw]

AutoSnap automatically moves the splitter to the zero position when split size becomes smaller than the value in MinSize.

  property Beveled: Boolean; [rw]

Indicates whether the edges of the splitter bar are beveled.

  property Cursor: TCursor;

The shape for the mouse pointer when the control is dragged.

  property MinSize: Integer; [rw]

Minimum size for either of the anchored controls on opposing sides of the splitter.

  property OnCanOffset: TCanOffsetEvent; [rw]

Event handler signalled to calculate the offset when the splitter is dragged, and to accept or reject the offset value.

  property OnCanResize: TCanResizeEvent; [rw]

Event handler signalled to determine if the splitter control can be resized / dragged / moved.

  property OnMoved: TNotifyEvent; [rw]

Event handler signalled when the splitter has been dragged / moved.

  property ResizeAnchor: TAnchorKind; [rw]

Indicates the orientation and alignment for the splitter control.

  property ResizeStyle: TResizeStyle; [rw]

Display style used when the splitter control is moved.

end;

TCustomSplitter

TCustomSplitter is the base type for TSplitter.

TCustomControl

The base class for windowed controls which paint themselves.

TWinControl

Implements a windowed control which can contain other child controls.

TControl

The base class for visible controls.

TLCLComponent

The base class for LCL components which have an associated widget.

TComponent,IUnknown,IInterfaceComponentReference

TPersistent,IFPObserved

TObject

TSplitter

TSplitter is a vertical or horizontal bar placed on a panel or form to separate sub-panels functionally.