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

# TGraphicControl.CMCursorChanged

Handles the CM_CURSORCHANGED message for the control.

## Declaration

Source position: controls.pp line 2458

`protected procedure TGraphicControl.CMCursorChanged(`
`var Message: TLMessage`
`); message;`

## Description

CMCursorChanged is an overridden method in TGraphicControl. It ensures that the control is Visible before the temporary cursor shape is changed.

Visible must be set to True, and the Parent control (with the window handle) must be assigned before the control can be displayed. No actions are performed in the method if Visible is False, or Parent is Nil.

In addition, the mouse must be over the control to apply the cursor shape using SetTempCursor and the value in the Cursor property.

## See also

TControl.CMCursorChanged |  | Handles the CM_CURSORCHANGED message for the control.
TControl.Visible |  | Allows the control, and all of its children, to be displayed or hidden.
TControl.Parent |  | The control within which the control is shown.
TControl.Cursor |  | Contains the shape for the mouse pointer when the mouse is over the control.
TControl.SetTempCursor |  | Changes the cursor shape temporarily, preserving the original TControl.Cursor