How to change system mouse cursor in Delphi

It's very simple. Just drop TSystemMouse component onto your form. This components has the array-type SystemCursors and DefaultCursors properties. Just set new cursor and copy default value to restore default.

cmpSystemMouse.SystemCursors[scNormal]:=LoadCursor(HInstance,'YourCursorResourceName');

with cmpSystemMouse do
  SystemCursors[scNormal]:=DefaultCursors[scNormal];

Call RestoreDefaultCursors to restore all the cursors.

cmpSystemMouse.RestoreDefaultCursors;
See also
System Mouse
Components for Delphi / C++ Builder
Howtos for Programmers