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

TControl.WMXButtonDown

Handles a LM_XBUTTONDOWN (extra mouse button down) message for the control.

Declaration

Source position: controls.pp line 1353

protected procedure TControl.WMXButtonDown(

  var Message: TLMXButtonDown

); message;

Arguments

Message

  

Message examined and optionally handled in the method.

Description

Checks the Keys member in Message to determine whether the first or second extra mouse button is represented in the structure. No actions are performed in the method if Keys does not represent the mbExtra1 or mbExtra2 mouse button.

Sets MouseCapture to True when enabled in the ControlStyle property and the mouse button is included in CaptureMouseButtons.

Calls the private DoMouseDown method to perform the mouse button event for the control, and to signal its OnMouseDown event handler (when assigned). No mouse down actions are performed when standard events are ignored by including csNoStdEvents in the ControlStyle property.

See also

TControl.ControlStyle

  

Style flags, specifying whether the control responds to mouse clicks, can be re-sized, has particular actions, etc.

TControl.MouseCapture

  

True when mouse messages are currently captured by this control.

TControl.CaptureMouseButtons

  

Which mouse button(s) to be used for capture? Default is the left button.

TControl.MouseDown

  

Handler for MouseDown events.

TControl.OnMouseDown

  

Event handler for mouse button going down.

TMouseButton

  

Enumeration of recognized mouse buttons.

The latest version of this document can be found at lazarus-ccr.sourceforge.net.