The problem with your current code is, that you're assigning a picture by GuiControl all the time you're moving the mouse. That's what is causing the flickering.
The problem is within this section:
Code:
;Mouse cursor doesn't hover BMP picture control
Else
{
GuiControl,, bmp_RBU, RedButtonU.bmp
}
As you see, everytime you're moving the mouse, it sends a WM_MOUSEMOVE message. So it's assigning your unhovered button all the time. When you study the URL code of HandleMessage you can see this URL_hover variable. It's there because of this issue.
If you check the code, you'll see that URL_hover will be assigned "true" as long the mouse hovers the URL control. If it doesn't hover the URL anymore, the code jumps to the else block.
Within the else block is it checked if URL_hover is true. If so, it's doing some cleanup work and finally assigns URL_hover= (empty string).
Next MouseMove it doesn't hover the URL control, the check for URL_hover within the Else block fails. In this way, the function doesn't do anything.
So, you have to introduce a BMP_hover variable within your function to do the same thing for your BMP control. As you haven't posted your full code, I played a little bit with it. Therefore it's untested and more of a wild guess.
Code:
HandleMessage(p_w, p_l, p_m, p_hw)
{
global WM_SETCURSOR, WM_MOUSEMOVE,
static URL_hover, BMP_hover, h_cursor_hand, h_old_cursor, CtrlType, LastCtrl
If (p_m = WM_SETCURSOR)
{
If URL_hover
Return, true
}
Else If (p_m = WM_MOUSEMOVE)
{
;Mouse cursor hovers BMP picture control
StringLeft, CtrlType, A_GuiControl, 3
If (CtrlType = "bmp")
{
GuiControl,, bmp_RBU, RedButtonH.bmp
BMP_hover := true
}
;Mouse cursor hovers URL text control
StringLeft, CtrlType, A_GuiControl, 3
If (CtrlType = "URL")
{
If URL_hover=
{
Gui, Font, bold underline
GuiControl, Font, %A_GuiControl%
LastCtrl = %A_GuiControl%
h_cursor_hand := DllCall("LoadCursor", "uint", 0, "uint", 32649)
URL_hover := true
}
h_old_cursor := DllCall("SetCursor", "uint", h_cursor_hand)
}
Else If (CtrlType = "bmp")
{
GuiControl,, bmp_RBU, RedButtonH.bmp
}
; Mouse cursor doesn't hover URL or BMP control
Else
{
If URL_hover
{
Gui, Font, norm cWhite bold
GuiControl, Font, %LastCtrl%
DllCall("SetCursor", "uint", h_old_cursor)
URL_hover=
}
If BMP_Hover
{
GuiControl,, bmp_RBU, RedButtonU.bmp
BMP_hover=
}
}
}
}
________________________
Cheers AGU
Login
Register
FAQ
Search
(means Thanks)
