Sign in Join
FPDoc Onlineexperiment

TCustomSplitter.MouseMove procedure

Member of TCustomSplitterprotectedIn unit ExtCtrls

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

Declaration

pascal
procedure MouseMove(Shift: TShiftState; X: Integer; Y: Integer)
 ; override

Arguments

Shift

Shift, Ctrl, or Alt modified for the mouse event.

X

Horizontal coordinate for the mouse event.

Y

Vertical coordinate for the mouse event.

Description

MouseMove is an overridden method in TCustomSplitter. It calls the inherited method on entry to update the DragManager and signal the OnMouseMove event handler (when assigned).

It extends the ancestor method by calculating the offset needed to move the splitter relative to its anchor control. MouseMove calls the MoveSplitter method to apply the calculated offset to the Alignment edge for the splitter and resize the anchored control.

See also

An experiment, built from development snapshots. Not the official Free Pascal or Lazarus documentation.