Cursor shape change ....

I want to get my own cursor shape.
Sure, VB supports custom type(user-made).
But it is limited by region(within only its control).
I want to use it regardless of region(on the full windows).
==
I tried somthing.
LoadCursorFromFile, SetCursor, ShowCursor..
Above APIs are able to help use my own type cursor.
BUT !!
If MouseMove Event is occurred, the shape is returned to
normal type by a certain reason(I don't know why shape changes).

Let me know how I use my own cursor for a long time.

Thank U !
LVL 1
can9999Asked:
Who is Participating?

[Product update] Infrastructure Analysis Tool is now available with Business Accounts.Learn More

x
I wear a lot of hats...

"The solutions and answers provided on Experts Exchange have been extremely helpful to me over the last few years. I wear a lot of hats - Developer, Database Administrator, Help Desk, etc., so I know a lot of things but not a lot about one thing. Experts Exchange gives me answers from people who do know a lot about one thing, in a easy to use platform." -Todd S.

dirtdartCommented:
To change the cursor for every window, use SetSystemCursor.

Declare Function SetSystemCursor Lib "user32" Alias "SetSystemCursor" (ByVal hcur As Long, ByVal id As Long) As Long

hcur is a handle to a cursor.  You can retrieve it with LoadCursor, but be aware that this won't work for animated cursors.  To load them, you will have to use LoadIcon.

id is the ID of the cursor that you are replacing.  For example, if you are changing from the normal cursor to your custom corsor, the id would be OCR_NORMAL.  The other cursors are listed in the Win32Api.txt under OCR_
0

Experts Exchange Solution brought to you by

Your issues matter to us.

Facing a tech roadblock? Get the help and guidance you need from experienced professionals who care. Ask your question anytime, anywhere, with no hassle.

Start your 7-day free trial
It's more than this solution.Get answers and train to solve all your tech problems - anytime, anywhere.Try it for free Edge Out The Competitionfor your dream job with proven skills and certifications.Get started today Stand Outas the employee with proven skills.Start learning today for free Move Your Career Forwardwith certification training in the latest technologies.Start your trial today
Visual Basic Classic

From novice to tech pro — start learning today.