Animated cursor: Displaying one

Hello, i have done the part of showing an animated cursor, by using the
SetSystemCursor command, and the LoadCursorFromFile command, But when i move
my mouse to the center of the screen, the mousecursor changes into an sizer
because i uses SetSystemCursor to hang the animated cursor to the OCR_NORMAL
mouse (the default arrow) but when i use screen.cursor, the cursor only
stay's that state in the client area, is there a way to fix it (i could
using an activex, written in VB) but i want to know how to do it in Delphi!

Greetings, Gilles