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

# TMouse

[Properties (by Name)] [Methods (by Name)] [Events (by Name)]

TMouse - some properties of the current Mouse

## Declaration

Source position: controls.pp line 2182

`type TMouse = class`
`public`
`constructor Create;` |  | Create - constructor for TMouse: calls inherited Create
`destructor Destroy; override;` |  | Destroy - destructor for TMouse: calls inherited Destroy
`property Capture: HWND; [rw]` |  | System handle for the captured object
`property CursorPos: TPoint; [rw]` |  | The screen position of the cursor
`property IsDragging: Boolean; [r]` |  | Is the mouse being used to drag an object?
`property WheelScrollLines: Integer; [r]` |  | WheelScrollLines - the number of lines the the scroll wheel has traversed
`property DragImmediate: Boolean; [rw]` |  | Does the object get dragged as soon as the mouse moves?
`property DragThreshold: Integer; [rw]` |  | The least distance the mouse must move before the captured object is moved
`end;`

## Inheritance

`TMouse` |  | TMouse - some properties of the current Mouse
`TObject`

## Description

Contains information about current mouse position, whether it has captured an object, whether it is dragging the object, and how far the mouse is allowed to move before the captured object is made to move.

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