Question

怎么制作这样一种鼠标指针

就是鼠标放在没有程序可以点的地方呈现一种样子，放在有程序可以点的地方呈现另一种样子，就像冒险岛（MapleStory）里的鼠标一样，不放在NPC身上时是一个静止的小手，放在NPC身上时是一个指头会动的小手，有别于不会动的.cur和只会一个劲儿动的.ani 希望大家作答有点专业水平

Answer 1

第一《设置鼠标样子的话你可以去。控制面板》打印机和其他硬件》鼠标》鼠标属性下面的指针就可以了！找个你喜欢的样子点确定就好了！
第二《换个主题也行的。到桌面》右键属性》下面你换个主题你鼠标的样子也会换的！
祝你找到喜欢的

Answer 2

Private Sub Form_Load()
Image1.MousePointer = 99
Image1.MouseIcon = LoadPicture("e:\1.ico")
End Sub

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Image1.MouseIcon = LoadPicture("e:\1.ico")
Timer1.Enabled = False
End Sub

Private Sub Image1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Timer1.Enabled = True
Timer1.Interval = 1500
End Sub
Private Sub Timer1_Timer()
Dim i As Integer
If i = 0 Then
Image1.MouseIcon = LoadPicture("e:\1.ico"): i = i + 1
ElseIf i = 1 Then
Image1.MouseIcon = LoadPicture("e:\2.ico"): i = i + 1
ElseIf i = 2 Then
Image1.MouseIcon = LoadPicture("e:\3.ico"): i = i + 1
Else
i = 0
End If
End Sub
最好自己找一个可以动的 ICO 文件，用Timer控件会影响程序的性能！

Answer 3

VC的
icon=IDC_HAND;
case WM_SETCURSOR:

if (hBtn == (HWND)wParam)

{

SetCursor(LoadCursor(NULL, icon));

return 1;

}

return DefWindowProc(hWnd, message, wParam, lParam);

break;

一般,只要修改icon的值就可以了