how to change the label by moving the mouse

[scila1996]

Hi All 

- I have 1 simple as following GUIDE

code

#include <GUIConstants.au3>

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("AForm1", 187, 131, 193, 115)
$Icon1 = GUICtrlCreateIcon("C:\Windows\System32\notepad.exe", 0, 80, 24, 32, 32, BitOR($SS_NOTIFY,$WS_GROUP))
GUICtrlSetCursor ($Icon1, 0)
$Label1 = GUICtrlCreateLabel("Windows 7", 64, 72, 57, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit

    EndSwitch
WEnd

if the mouse is moved to the notepad icon 

 

---> Change Label

 

Windows 7 ---> Notepad

 

Thank All

[JohnOne]

You could try setting an event for $GUI_EVENT_MOUSEMOVE and handling somehow so it does not keep occuring. I'm unsure if AutoIt has $GUI_EVENT_MOUSEOVER or $GUI_EVENT_MOUSEHOVER.

Of course it would mean you have to use Opt(guioneventmode) instead of GuiGetMsg()

[scila1996]

You could try setting an event for $GUI_EVENT_MOUSEMOVE and handling somehow so it does not keep occuring. I'm unsure if AutoIt has $GUI_EVENT_MOUSEOVER or $GUI_EVENT_MOUSEHOVER.

Of course it would mean you have to use Opt(guioneventmode) instead of GuiGetMsg()

 

I usually opt to use ("GuiOnEventMode", 1) 

 

1 Can you tell me some examples using the syntax

 

$GUI_EVENT_MOUSEMOVE

Edited February 17, 2014 by scila1996

[Melba23]

scila1996,

Perhaps something like this might be suitable:

#include <GUIConstantsEx.au3>

Opt("GuiOnEventMode", 1)

$Form1 = GUICreate("AForm1", 187, 131, 193, 115)
GUISetOnEvent($GUI_EVENT_CLOSE, "_Exit")

$Icon1 = GUICtrlCreateIcon("C:\Windows\System32\notepad.exe", 0, 80, 24, 32, 32)
GUICtrlSetCursor ($Icon1, 0)
$Label1 = GUICtrlCreateLabel("Windows 7", 64, 72, 57, 17)
GUISetState()

While 1
    Sleep(10)
    $aCInfo = GUIGetCursorInfo($Form1)
    If $aCInfo[4] = $Icon1 And GUICtrlRead($Label1) = "Windows 7" Then
        GUICtrlSetData($Label1, "Notepad")
    ElseIf $aCInfo[4] <> $Icon1 And GUICtrlRead($Label1) = "Notepad" Then
        GUICtrlSetData($Label1, "Windows 7")
    EndIf
WEnd

Func _Exit()
    Exit
EndFunc

M23

[scila1996]

Thank 

Melba23