TCursor
Назначение
Тип для хранения внешнего вида курсора мыши.
Описание
Свойство может принимать следующие значения:
crAppStart
crArrow
crCross
crDefault
crDrag
crHandPoint
crHelp
crHourGlass
crHSplit
crIBeam
crMultiDrag
crNo
crNoDrop
crSizeAll
crSizeNESW
crSizeNS
crSizeNWSE
crSizeWE
crSQLWait
crUpArrow
crVSplit
Пример
Form1.Cursor := crHandPoint;