Quantcast
Channel: VBForums - Visual Basic 6 and Earlier
Viewing all articles
Browse latest Browse all 21238

[RESOLVED] Can't set Owner-Drawn Button MousePointer as HandPointer

$
0
0
I had studied all kinds of Owner-Drawn ActiveX Button control like JCButton,LavolopButton,CandyButton on PSC.com, but none of them got Mouse Icon work properly.If I set MousePointer as handpointer, the icon was flashing (Arrow and Hand) when mouse moving around. What is the solution?

Owner-drawn button uc normally did like:

Private Enum CURSOR_RESOURCE
OCR_NORMAL = 32512&
OCR_IBEAM = 32513&
OCR_WAIT = 32514&
OCR_CROSS = 32515&
OCR_UP = 32516&
OCR_SIZE = 32640&
OCR_ICON = 32641&
OCR_SIZENWSE = 32642&
OCR_SIZENESW = 32643&
OCR_SIZEWE = 32644&
OCR_SIZENS = 32645&
OCR_SIZEALL = 32646&
OCR_ICOCUR = 32647&
OCR_NO = 32648&
OCR_HAND = 32649&
OCR_APPSTARTING = 32650&
End Enum

Private Sub UserControl_MouseMove(Button As Integer, Shift As Integer, x As Single, y As Single)

SetCursor LoadCursor(0, OCR_HAND)

'..
End Sub

Private Sub UserControl_MouseDown(Button As Integer, Shift As Integer, x As Single, y As Single)

SetCursor LoadCursor(0, OCR_HAND )
'..
End Sub

Private Sub UserControl_MouseUp(Button As Integer, Shift As Integer, x As Single, y As Single)

SetCursor LoadCursor(0, OCR_HAND )
'..
End Sub

Private Sub UserControl_DblClick()

SetCursor LoadCursor(0, OCR_HAND )
'..
End Sub

Viewing all articles
Browse latest Browse all 21238

Trending Articles



<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>