ControlClick possible with no controlid info?

[MuffettsMan]

Is it simply not possiible to ControlClick mouseclicks to windows that don't have any control info (per the win info tool) i guess i should count my blessings because for some amazing reason ControlSend works just fine however i can't get ControlClick to work using the same logic...

so the real question is if its possible to ControlSend does that mean click should be possible as well or is using controlclick more touchy?

Win Info tool ouput is as follows:

>>>> Window <<<<

Title: World of Warcraft

Class: GxWindowClassD3d

Position: 0, 0

Size: 1280, 800

Style: 0x94000000

ExStyle: 0x00040000

Handle: 0x002607DA

>>>> Control <<<<

Class:

Instance:

ClassnameNN:

ID:

Text:

Position:

Size:

ControlClick Coords:

Style:

ExStyle:

Handle: 0x0001008A

most alarming there is not controlclick cords noted when moving within the window... however it does work perfectly with controlsend.... using logic like:

$WoWClient2 = WinList ("World of Warcraft")
ControlSend ($WoWClient2[1][1],"","","{w Down}")

i guess i just don't want to give up hope on controlclick going back to manually clicking on each window would be so.... crude

[nairada]

expandcollapse popup

;===============================================================================
;
; Function Name:  _MouseClickPlus()
; Version added:  0.1
; Description:    Sends a click to window, not entirely accurate, but works
;                 minimized.
; Parameter(s):   $Window     =  Title of the window to send click to
;                 $Button     =  "left" or "right" mouse button
;                 $X          =  X coordinate
;                 $Y          =  Y coordinate
;                 $Clicks     =  Number of clicks to send
; Remarks:        You MUST be in "MouseCoordMode" 0 to use this without bugs.
; Author(s):      Insolence <insolence_9@yahoo.com>
;
;===============================================================================
Func _MouseClickPlus($Window, $Button = "left", $X = "", $Y = "", $Clicks = 1)
  Local $MK_LBUTTON       =  0x0001
  Local $WM_LBUTTONDOWN   =  0x0201
  Local $WM_LBUTTONUP     =  0x0202
 
  Local $MK_RBUTTON       =  0x0002  
  Local $WM_RBUTTONDOWN   =  0x0204
  Local $WM_RBUTTONUP     =  0x0205

  Local $WM_MOUSEMOVE     =  0x0200
 
  Local $i                = 0
 
  Select
  Case $Button = "left"
     $Button     =  $MK_LBUTTON
     $ButtonDown =  $WM_LBUTTONDOWN
     $ButtonUp   =  $WM_LBUTTONUP
  Case $Button = "right"
     $Button     =  $MK_RBUTTON
     $ButtonDown =  $WM_RBUTTONDOWN
     $ButtonUp   =  $WM_RBUTTONUP
  EndSelect
 
  If $X = "" OR $Y = "" Then
     $MouseCoord = MouseGetPos()
     $X = $MouseCoord[0]
     $Y = $MouseCoord[1]
  EndIf
 
  For $i = 1 to $Clicks
     DllCall("user32.dll", "int", "SendMessage", _
        "hwnd",  WinGetHandle( $Window ), _
        "int",   $WM_MOUSEMOVE, _
        "int",   0, _
        "long",  _MakeLong($X, $Y))
       
     DllCall("user32.dll", "int", "SendMessage", _
        "hwnd",  WinGetHandle( $Window ), _
        "int",   $ButtonDown, _
        "int",   $Button, _
        "long",  _MakeLong($X, $Y))
       
     DllCall("user32.dll", "int", "SendMessage", _
        "hwnd",  WinGetHandle( $Window ), _
        "int",   $ButtonUp, _
        "int",   $Button, _
        "long",  _MakeLong($X, $Y))
  Next
EndFunc

Func _MakeLong($LoWord,$HiWord)
  Return BitOR($HiWord * 0x10000, BitAND($LoWord, 0xFFFF))
EndFunc

Have you seen/tried this before?

[MuffettsMan]

thanks nairada looks promising - i can't use just window title alone because there are 4 windows with the exact same name that i'm trying to send to... though from my limited exp it seems that you often can use the HWND instead of the title and that would be unique enough.

got a 2yr old crawling all over me atm so can't test but it at least gives me more hope!

thanks again.

[MuffettsMan]

something like this? if so no dice

expandcollapse popup

#include <Array.au3>

Global $WoWClient2[3][3]
; Sets the way coords are used in the mouse functions, 
; either absolute coords or coords relative to the current active window:
; 0 = relative coords to the active window

Opt("MouseCoordMode", 0)        ;1=absolute, 0=relative, 2=client
Run("C:\Program Files\WoW\Wow.exe")
sleep(10000)

dim $Clicks
dim $X
dim $Y
dim $Window
dim $Button

$WoWClient2 = WinList ("World of Warcraft")

$Window = "World of Warcraft"
$Button = "left"
$X = "650"
$Y = "560"
$Clicks = 1
; 650 , 560
ControlSend ($WoWClient2[1][1],"","","ds9872")
_MouseClickPlus($Window, $Button, $X, $Y, $Clicks)
;===============================================================================
;
; Function Name:  _MouseClickPlus()
; Version added:  0.1
; Description:    Sends a click to window, not entirely accurate, but works
;                 minimized.
; Parameter(s):   $Window     =  Title of the window to send click to
;                 $Button     =  "left" or "right" mouse button
;                 $X          =  X coordinate
;                 $Y          =  Y coordinate
;                 $Clicks     =  Number of clicks to send
; Remarks:        You MUST be in "MouseCoordMode" 0 to use this without bugs.
; Author(s):      Insolence <insolence_9@yahoo.com>
;
;===============================================================================
Func _MouseClickPlus($Window, $Button, $X, $Y, $Clicks)
  Local $MK_LBUTTON       =  0x0001
  Local $WM_LBUTTONDOWN   =  0x0201
  Local $WM_LBUTTONUP     =  0x0202
 
  Local $MK_RBUTTON       =  0x0002  
  Local $WM_RBUTTONDOWN   =  0x0204
  Local $WM_RBUTTONUP     =  0x0205

  Local $WM_MOUSEMOVE     =  0x0200
 
  Local $i                = 0
 
  Select
  Case $Button = "left"
     $Button     =  $MK_LBUTTON
     $ButtonDown =  $WM_LBUTTONDOWN
     $ButtonUp   =  $WM_LBUTTONUP
  Case $Button = "right"
     $Button     =  $MK_RBUTTON
     $ButtonDown =  $WM_RBUTTONDOWN
     $ButtonUp   =  $WM_RBUTTONUP
  EndSelect
 
  If $X = "" OR $Y = "" Then
     $MouseCoord = MouseGetPos()
     $X = $MouseCoord[0]
     $Y = $MouseCoord[1]
  EndIf
 
  For $i = 1 to $Clicks
     DllCall("user32.dll", "int", "SendMessage", _
        "hwnd",  WinGetHandle( $Window ), _
        "int",   $WM_MOUSEMOVE, _
        "int",   0, _
        "long",  _MakeLong($X, $Y))
       
     DllCall("user32.dll", "int", "SendMessage", _
        "hwnd",  WinGetHandle( $Window ), _
        "int",   $ButtonDown, _
        "int",   $Button, _
        "long",  _MakeLong($X, $Y))
       
     DllCall("user32.dll", "int", "SendMessage", _
        "hwnd",  WinGetHandle( $Window ), _
        "int",   $ButtonUp, _
        "int",   $Button, _
        "long",  _MakeLong($X, $Y))
  Next
EndFunc

Func _MakeLong($LoWord,$HiWord)
  Return BitOR($HiWord * 0x10000, BitAND($LoWord, 0xFFFF))
EndFunc

[VeeDub]

@zhenyalix

This post might be worth a look

[brad3260]

any idea how to make this work with a Windows 8 app?

[BrewManNH]

any idea how to make this work with a Windows 8 app?

I doubt that after 6 years anyone in this thread would be able to answer that. Not to mention, Windows 8 wasn't even being developed that long ago.

Edited March 22, 2014 by BrewManNH