VB - Select and Use an Animated Cursor

[MartinLiss]

The attached project demonstrates how to select and use animated cursors.

[Protocol]

Nice stuff....but I got a problem when I clicked the stop button...
It permanently changes the cursor....

Is there anyway to set it so that only the specified form will display that cursor, and not the entire windows gui?

[MartinLiss]

Just do this

Private Sub Form_Unload(Cancel As Integer)

RestoreLastCursor

End Sub

[Protocol]

Sorry to disappoint you....but VB doesn't call the Form Unload procedure when the Stop button is clicked... :D

[crptcblade]

Then don't do that. ;)

If you close the program properly, the unload event will fire.

[Protocol]

Originally posted by crptcblade
Then don't do that. ;)

If you close the program properly, the unload event will fire.
lmao...I can't help myself...sometimes I just click the blue square subconsciously.... :(

But let's just say, for instance, that you implement the code into your program and compile it and what not and for some strange reason the process terminates (whether by OS or by Task Manager, etc.) then the user will get stuck with the cursor of your choice...

:confused:

[chslgm545]

Dear Sir,

I used your Project which u posted in the above thread Cursor.Zip, i run the Project and selected some other cursor like hand symbol and exit the program, the problem is i am not able to get back my default cursor again. through out the window & outside vb or any where it showing the HandPicture as the mouse pointer, Can u please help me. bring back the mouse to its original position.

Thank you,
Chock.

[MartinLiss]

At this point you'll need to reboot. Make sure your program always executes the RestoreLastCursor routine when you exit.

[chslgm545]

Hi,

Unfortunately i miss to add the "RestoreLastCursor" function in the Form_Unload event. what's the procedure to bring it back again, i can only restart the machine, other than this, i can't do anything, because, its in the Network.

thank you,
Chock.

[chslgm545]

Hai,

I got the problem solved by placing the "RestoreLastCursor" function in the Unload event.

Thank you,
Chock:)

[MartinLiss]

Originally posted by chslgm545
Hai,

I got the problem solved by placing the "RestoreLastCursor" function in the Unload event.

Thank you,
Chock:) See my post I made on 12-25-2003 01:39 PM above :)

[Senacharim]

Have used the animated cursor module to great effect (very cool!)

Trying to figure a way to have a "mouse-over" affect, wherein it does the animated cursor when over a certain object--and at no other time.

Thanx...

[MartinLiss]

That should be pretty easy. Set the form's keypreview property to True. Then figure out where the control is on the form via scalewidth, scaleheight and the control's dimensions and then in the form's MouseMove event turn the cursor on when it's over the control and off when it's not.