TCustomSplitter.MouseDown procedure
Initiates the splitter movement operation.
Declaration
procedure MouseDown(Button: TMouseButton; Shift: TShiftState;
X: Integer; Y: Integer); overrideArguments
Button | Button examined in the method. |
Shift | Modifier for the mouse button. |
X | Horizontal coordinate for the mouse event. |
Y | Vertical coordinate for the mouse event. |
Description
MouseDown is overridden in
TCustomSplitter. It calls
the inherited method, and ensures that the absolute mouse position is used
when the left mouse button is depressed; The X and Y arguments are not valid
during a resize operation.
Calls GetCursorPos to capture the mouse position, and calls StartSplitterMove to initiate the splitter movement operation.
See also
An experiment, built from development snapshots. Not the official Free Pascal or Lazarus documentation.