[Overview][Constants][Types][Classes][Procedures and functions][Variables][Index] Reference for unit 'Buttons' (#lcl)

TCustomSpeedButton.MouseDown

Performs actions needed for a mouse down event on the control.

Declaration

Source position: buttons.pp line 377

protected procedure TCustomSpeedButton.MouseDown(

  Button: TMouseButton;

  Shift: TShiftState;

  X: Integer;

  Y: Integer

); override;

Arguments

Button

  

Button for the mouse event.

Shift

  

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

X

  

Horizontal coordinate for the mouse pointer.

Y

  

Vertical coordinate for the mouse pointer.

Description

MouseDown is an overridden method in TCustomSpeedButton. It calls the inherited MouseDown method on entry to signal the OnEditingDone event for the active control on the Parent form. It also updates the DragManager coordinates when a drag operation is already active.

No additional actions are performed in the method at design-time.

If the Left mouse button was pressed when the control is Enabled, Down is set to True (when needed) and the Action for the control is unchecked. An internal flag for a pending drag operation in MouseMove is set prior to exiting from the method.

See also

TControl.MouseDown

  

Handles a mouse down event for the control.


Version 3.2 Generated 2024-02-25 Home