Solved

Color Cursors

Posted on 2000-05-02
8
447 Views
Last Modified: 2008-02-20
Why do my 16 color cursors appear B&W in VB6?  Is it at all possible to display a custom cursor in color?  I know if I use an icon I can get color, but icons do not support a hotspot.
0
Comment
Question by:Erick37
  • 4
  • 3
8 Comments
 
LVL 15

Accepted Solution

by:
ameba earned 100 total points
ID: 2769941
see: Animated Cursor Demo Source Code
http://www.nease.net/~zealsoft/download/
0
 
LVL 4

Expert Comment

by:amit_panjwani
ID: 2769945
try using platform SDK , There us have iconn editor + hotspot editor
0
 
LVL 15

Expert Comment

by:ameba
ID: 2770002
0
 
LVL 32

Author Comment

by:Erick37
ID: 2770290
So the bottom line is that VB does directly support anything but monochrome cursors?  

Why the heck does ImageEdit (shipped with VB5) allow the creation of 16 color cur files?
0
Is Your Active Directory as Secure as You Think?

More than 75% of all records are compromised because of the loss or theft of a privileged credential. Experts have been exploring Active Directory infrastructure to identify key threats and establish best practices for keeping data safe. Attend this month’s webinar to learn more.

 
LVL 15

Expert Comment

by:ameba
ID: 2770318
I think it works on some systems (MS Plus?).

So, you'll have to include your nice .Cur files to your setup and use few APIs.
Or perhaps use .res file and cursor resources, but I don't have the code for this now.
0
 
LVL 32

Author Comment

by:Erick37
ID: 2770355
I'm using Win98, and I see that other apps use 16 color cursors, Winamp for example.

Currently I am using the cursors stored in a resource file, and loading them using LoadResPicture.

I will try using the API now.
0
 
LVL 32

Author Comment

by:Erick37
ID: 2773540
OK, problem solved.  As it turns out, all I needed to do was to compile the project into an executable.  Then the cursor resources appeared in color.  In the VB IDE, they showed as B&W.

I used the resource tools in VS6 to create the cursors.

I will give ameba the pts, because I was trying the LoadCursor API when I discovered this problem.  The API's returned 0 when in IDE, so I made the executable.  Then I realized SetCursor worked, and so did LoadResPicture and MouseIcon = ...

Thanks for all the help.
0
 
LVL 15

Expert Comment

by:ameba
ID: 2773882
I'm glad you found the solution.
Thanks for the points.
0

Featured Post

Is Your Active Directory as Secure as You Think?

More than 75% of all records are compromised because of the loss or theft of a privileged credential. Experts have been exploring Active Directory infrastructure to identify key threats and establish best practices for keeping data safe. Attend this month’s webinar to learn more.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

Title # Comments Views Activity
Excel object stays open 19 71
Determine Range to Select 5 43
Add and format columns in vb6 7 47
Macro Excel - Multiple If conditions 2 65
Introduction While answering a recent question (http://www.experts-exchange.com/Q_27402310.html) in the VB classic zone, I wrote some VB code in the (Office) VBA environment, rather than fire up my older PC.  I didn't post completely correct code o…
Most everyone who has done any programming in VB6 knows that you can do something in code like Debug.Print MyVar and that when the program runs from the IDE, the value of MyVar will be displayed in the Immediate Window. Less well known is Debug.Asse…
As developers, we are not limited to the functions provided by the VBA language. In addition, we can call the functions that are part of the Windows operating system. These functions are part of the Windows API (Application Programming Interface). U…
Get people started with the utilization of class modules. Class modules can be a powerful tool in Microsoft Access. They allow you to create self-contained objects that encapsulate functionality. They can easily hide the complexity of a process from…

864 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

22 Experts available now in Live!

Get 1:1 Help Now