Cursor

How do I load a custom cursor so when the mouse goes over an object it changes and is displayed? I spose you do it using the '.MousePointer' command, but how?

Thanks,

-Git

In the form properties..or any control properties, you select Icon...change it to whatever you like. And MousePointer to Custom-99. Or using code...

Code:

---

Picture1.Icon = "C:\Icons\Icon.ico"
Picture1.MousePointer = Custom

---

[Edited by Matthew Gates on 07-15-2000 at 10:11 AM]

I tried, but Image's don't have a '.Icon' property.

Is there any way to get around this ?

First, the MousePointer should be set to vbCustom. If the Image is not an Icon you can use the ExtractIcon method to work around it.

Make an Form with an ImageList and a CommandButton. Load a Bitmap or Icon into the ImageList and put the following code into your CommandButton.

Code:

---

Me.MousePointer = vbCustom
Set Me.MouseIcon = ImageList1.ListImages(1).ExtractIcon

---

[Edited by Megatron on 07-15-2000 at 10:29 AM]