鼠标指针形状
Screen.Cursor :=
改变大小
Result := crSizeNWSE //斜下
Result := crSizeNS // 上下
Result := crSizeNESW 斜上
Result := crSizeWE; //左右
crHandPoint
鼠标指针形状
Screen.Cursor :=
改变大小
Result := crSizeNWSE //斜下
Result := crSizeNS // 上下
Result := crSizeNESW 斜上
Result := crSizeWE; //左右
crHandPoint