Mouse click only in specific area of the screen allowed

[beamtenversteher]

Hi,

based on this topic https://www.autoitscript.com/forum/topic/207507-mouse_primarydblclk_event-moved/

i would like to know how i create a function which gives me the possibility to specify a area on the screen where the mouse click will take an effect.

In my case coordinates for top left (980,168)  and bottom right (1700, 1270) are given - in this area the double mouse click script should work - in all other areas not.... 

[Nine]

_MouseTrap (see help file)

[SOLVE-SMART]

Hi @beamtenversteher,

if the suggestion of @Nine is what you're looking for (I am not fully sure), then please don't forget to release the mouse by _MouseTrap() before you end your script 😉 .

Best regards
Sven

________________
Stay innovative!

[ad777]

@beamtenversteher

Disable DB Mouse Click event:

_MouseSetOnEvent($MOUSE_PRIMARYDOWN_EVENT, "_MouseDBEvent")
_MouseSetOnEvent($MOUSE_PRIMARYDOWN_EVENT, "_MouseDBEvent", $hGUI)

Enable DB Mouse Click event:

_MouseSetOnEvent($MOUSE_PRIMARYDBLCLK_EVENT)
_MouseSetOnEvent($MOUSE_PRIMARYDOWN_EVENT)

DIsable/Enable DB Mouse Click event:

While 1
    $Left = 980
    $Top = 168
    $Right = 1270
    $Bottom = 1700
    If MouseGetPos(0) > $Left And MouseGetPos(0) < $Right And MouseGetPos(1) > $Top And MouseGetPos(1) < $Bottom Then
        _MouseSetOnEvent($MOUSE_PRIMARYDBLCLK_EVENT)
        _MouseSetOnEvent($MOUSE_PRIMARYDOWN_EVENT)
    Else
        _MouseSetOnEvent($MOUSE_PRIMARYDOWN_EVENT, "_MouseDBEvent")
        _MouseSetOnEvent($MOUSE_PRIMARYDOWN_EVENT, "_MouseDBEvent", $hGUI)
    EndIf
WEnd

 

Edited February 10, 2022 by ad777

[beamtenversteher]

many thx!!!

if i understand u correctly it should looks like 

Quote

expandcollapse popup

#include <GUIConstantsEx.au3>
#include "MouseOnEvent.au3"

HotKeySet("{ESC}", "_Quit")

_BlockDBClick()



Func _BlockDBClick()
   Local $hGUI = GUICreate("")
    GUISetState(@SW_HIDE, -1)
        _MouseSetOnEvent($MOUSE_PRIMARYDBLCLK_EVENT)
        _MouseSetOnEvent($MOUSE_PRIMARYDOWN_EVENT)

While 1
    $Left = 400
    $Top = 220
    $Right = 1300
    $Bottom = 900
    If MouseGetPos(1) > $Left And MouseGetPos(1) < $Right And MouseGetPos(0) > $Top And MouseGetPos(0) < $Bottom Then
        _MouseSetOnEvent($MOUSE_PRIMARYDBLCLK_EVENT)
        _MouseSetOnEvent($MOUSE_PRIMARYDOWN_EVENT)
    Else
        _MouseSetOnEvent($MOUSE_PRIMARYDOWN_EVENT, "_MouseDBEvent")
        _MouseSetOnEvent($MOUSE_PRIMARYDOWN_EVENT, "_MouseDBEvent", $hGUI)
    EndIf
WEnd

EndFunc   ;==>_BlockDBClick
Func _MouseDBEvent()
    Send("u") ;;send u
    ;;;;do stuff
    Return $MOE_BLOCKDEFPROC ;Block
EndFunc   ;==>_MouseDBEvent
Func _Quit()
    Exit
EndFunc   ;==>_Quit

 

that in between the coordinates the script works as expected and outside not doulbe click will be done/possible?

ive switches 0 to 1 and vice versa but the result is not that precise. sometimes the click outside the box (of the coordinates the send of the key still works.

Maybe a bit more save would be if in the area of the coordinates the script is running and out side like no script is working (what means that no key should be sent) 

r

[ad777]

@beamtenversteher

you mean just like reverse(out side no send) like this:

expandcollapse popup

#include <GUIConstantsEx.au3>
#include "MouseOnEvent.au3"
#include <Misc.au3>

HotKeySet("{ESC}", "_Quit")

_BlockDBClick()



Func _BlockDBClick()
    Global $hGUI = GUICreate("")
    GUISetState(@SW_HIDE, -1)
    _MouseSetOnEvent($MOUSE_PRIMARYDBLCLK_EVENT)
    _MouseSetOnEvent($MOUSE_PRIMARYDOWN_EVENT)
    While 1
        $Left = 400
        $Top = 220
        $Right = 1300
        $Bottom = 900
        If MouseGetPos(0) > $Left And MouseGetPos(0) < $Right And MouseGetPos(1) > $Top And MouseGetPos(1) < $Bottom Then
            _MouseSetOnEvent($MOUSE_PRIMARYDOWN_EVENT, "_MouseDBEvent")
            _MouseSetOnEvent($MOUSE_PRIMARYDOWN_EVENT, "_MouseDBEvent", $hGUI)
        Else
            _MouseSetOnEvent($MOUSE_PRIMARYDBLCLK_EVENT)
            _MouseSetOnEvent($MOUSE_PRIMARYDOWN_EVENT)

        EndIf
        Switch GUIGetMsg()
            Case $GUI_EVENT_CLOSE
                ExitLoop
        EndSwitch
        ;Sleep(10)
    WEnd

EndFunc   ;==>_BlockDBClick
Func _MouseDBEvent()
    Send("u") ;;send Win+r
    ;;;;do stuff
    Return $MOE_BLOCKDEFPROC ;Block
EndFunc   ;==>_MouseDBEvent
Func _Quit()
    Exit
EndFunc   ;==>_Quit

 

 

[beamtenversteher]

yes....only switch deactivated with activated 🙂 thx