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

# TMouse

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

Some properties of the Mouse.

## Declaration

Source position: controls.pp line 2256

`type TMouse = class`
`public`
`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` |  | Some properties of the Mouse.
`TObject`

## Description

Contains information about current mouse position, whether messages are captured by an object, whether it is dragging an object, and how far the mouse must move before a control starts dragging.

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