Vcl.Controls.TCursor
Delphi
CM_UNDOCKCLIENT = CM_BASE + 57;
CM_FLOAT = CM_BASE + 58;
{$ENDIF}
Properties
| Type | Visibility | Source | Unit | Parent |
|---|---|---|---|---|
| type | public | Vcl.Controls.pas | Vcl.Controls | Vcl.Controls |
Description
TCursor identifies the cursor type.
TCursor defines the type of mouse cursor. A variable of type TCursor can have one of the following values:
| Cursor Constant, Value | Image | Description |
|---|---|---|
|
crDefault, 0 |
None |
Default cursor: thick arrow pointing up and left |
|
crArrow, -2 |
|
Same as the default cursor |
|
crCross, -3 |
|
Fine cross-shaped cursor used in graphic applications for precise positioning |
|
crIBeam, -4 |
|
Text insert cursor in the form of a thin capital |
|
crSizeNESW, -6 |
|
Resizing cursor from North-East to South-West resizing |
|
crSizeNS, -7 |
|
Vertical resizing cursor |
|
crSizeNWSE, -8 |
|
Resizing cursor from North-West to South-East resizing |
|
crSizeWE, -9 |
|
Horizontal resizing cursor |
|
crUpArrow, -10 |
|
Thin upward pointing cursor |
|
crHourGlass, -11 |
|
Hour glass cursor to indicate a busy process |
|
crDrag, -12 |
|
Drag cursor for single items being dragged |
|
crNoDrop, -13 |
|
White cross in a white circle indicating that a drag operation is hovering over an invalid drop target. |
|
crHSplit, -14 |
|
Cursor shown when the mouse is over a horizontal splitter. |
|
crVSplit, -15 |
|
Cursor shown when the mouse is over a vertical splitter. |
|
crMultiDrag, -16 |
|
Drag cursor for multiple items being dragged |
|
crSQLWait, -17 |
|
Hour glass cursor to indicate a busy SQL database operation |
|
crNo, -18 |
|
Black cross in a black circle indicating invalid mouse target location |
|
crAppStart, -19 |
|
Hour glass and standard pointer combination cursor shown at application startup |
|
crHelp, -20 |
|
Question mark and standard pointer operation |
|
crHandPoint, -21 |
|
An upward pointing hand cursor. This is normally used to identify a selectable item, such as a web page link. |
|
crSizeAll, -22 |
|
Cursor for resizing up, down, left, and right |
Use the TScreen Cursor property to set the cursor type to one of the TCursor values.