Defines a structure used for mouse wheel control messages.
Source position: controls.pp line 102
type TCMMouseWheel = record |
||
MSg: Cardinal; |
|
Cardinal value with the CM_MOUSEWHEEL identifier for the mouse wheel message. |
ShiftState: TShiftState; |
|
State of the modifier for keys and mouse buttons. |
Unused: Byte; |
|
Inserted for alignment only. |
WheelDelta: SmallInt; |
||
case Integer of |
||
0: ( |
||
XPos: SmallInt; |
|
Mouse X position as a SmallInt value. |
YPos: SmallInt; |
|
Mouse Y position as a SmallInt value. |
); |
||
1: ( |
||
Pos: TSmallPoint; |
|
Mouse position as a TSmallPoint value. |
Result: LRESULT; |
|
Result for the mouse wheel message. Zero (0) indicates the message was handled. |
); |
||
end; |
Holds mouse wheel details that include:
CT Web help |
CodeTyphon Studio |