This one should be easy for you lot...
I've got a label sitting on top of a picture box. I want things to execute some code when I click on it, but the event just doesn't happen (i've tried click, mousedown, mouseup...)
It's probably something to do with this code which lets me drag my window around by clicking anywhere on it:
Some other labels on the form will recieve clicks, but the one in question just drags the form around when I click on it.Code:Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hWnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long Private Declare Function ReleaseCapture Lib "user32" () As Long Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) ReleaseCapture SendMessage Me.hWnd, &HA1, 2, 0& End Sub
Any ideas??
Thanks!




Reply With Quote