[RESOLVED] Windows Hand Cursor / Icon

[shmengy]

I had been searching for the famous hand cursor / icon that shows up in windows whenever there is a hyperlink etc... I found several other icons on the internet but not the windows hand cursor / icon. In the end I finally found it. I have attached it to this post for others to use.

[RhinoBull]

Here is the way without the actual image:

Option Explicit
 
Private Const IDC_HAND = 32649&
Private Const IDC_ARROW = 32512&
 
Private Declare Function LoadCursor Lib "user32" _
        Alias "LoadCursorA" _
        (ByVal hInstance As Long, _
        ByVal lpCursorName As Long) As Long
 
Private Declare Function SetCursor Lib "user32" _
        (ByVal hCursor As Long) As Long
 
Private Sub Label1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
    SetCursor LoadCursor(0, IDC_HAND)
End Sub

[Keithuk]

This is the hand.ico that comes with VB6.