TMouse
Capture
CursorPos
ro
IsDragging
ro
WheelScrollLines
DragImmediate
DragThreshold