Program doesn't activate visually

[zeruqman]

I use basic

AutoItSetOption ("CaretCoordMode", 0)
WinActivate("Program")

thing to activate program what I'm running.

Program pops to top, but in the taskbar program isn't activated. Now when I try to send mouse click to it, coordinates doesn't mach with AUInfo coordinates.

I tried also

ControlClick ( "Program", "", (my program ID here), "left", 1 )

but nothing happens.

Basically what I want to do with that program is press couple buttons. Is there better method to do it, or how I can make method above to work?

[water]

ControlClick is the way to go. But from your posting I get the impression that you misinterpret the required parameters. The syntax is:

ControlClick ( "title", "text", controlID [, button [, clicks [, x [, y ]]]]  )

Title: The title of the window. For notepad this is "Untitled - Notepad"

Text: An (optional) text on the window

ControlId: The Id returned by the GUICtrlCreate.. function.

Edited October 13, 2009 by water

[zeruqman]

ControlClick is the way to go. But from your posting I get the impression that you misinterpret the required parameters. The syntax is:

ControlClick ( "title", "text", controlID [, button [, clicks [, x [, y ]]]]  )

Title: The title of the window. For notepad this is "Untitled - Notepad"

Text: An (optional) text on the window

ControlId: The Id returned by the GUICtrlCreate.. function.

For example (I took the ID from AUInfo->Control->ID):

ControlClick ( "Calculator", "", 125)

works fine. Number 1 is pressed in windows calculator.

Now when I change "title" -field to program what I want to control and change "controlID" to button what I'd like to be pressed (took that also from AUInfo), it does nothing. I tried also WinActivate and Sleep(1000) before ControlClick line, and it doesn't help.

Why it doesn't work?

Edited October 13, 2009 by zeruqman

[water]

Can you post a Screenshot of your program (or at least the Window title) and a screenshot of AutoIts Window Info tool (Summary Tab) when you move the mouse over the button you want to click?

[zeruqman]

Ok, here is AUInfo (I greyed out program name):

http://img230.imageshack.us/img230/6398/screenshottn.jpg

Edited October 13, 2009 by zeruqman

[water]

So as the Winow Info Tool can see the button I would use:

ControlClick ("Insert here the window title for your program", "", 1065)

[zeruqman]

That's exactly what I have done, and nothing happens.

Edited October 13, 2009 by zeruqman

[water]

Please run the following code from ScITe and post the console output:

$RC = WinActivate("Insert here the window title for your program")
ConsoleWrite("WinActivate: " & $RC & "-" & @error & @CRLF)
$RC = WinWaitActive("Insert here the window title for your program")
ConsoleWrite("WinWaitActive: " & $RC & "-" & @error & @CRLF)
$RC = ControlClick ("Insert here the window title for your program", "", 1065)
ConsoleWrite("ControlClick: " & $RC & "-" & @error & @CRLF)

[zeruqman]

Please run the following code from ScITe and post the console output:

$RC = WinActivate("Insert here the window title for your program")
ConsoleWrite("WinActivate: " & $RC & "-" & @error & @CRLF)
$RC = WinWaitActive("Insert here the window title for your program")
ConsoleWrite("WinWaitActive: " & $RC & "-" & @error & @CRLF)
$RC = ControlClick ("Insert here the window title for your program", "", 1065)
ConsoleWrite("ControlClick: " & $RC & "-" & @error & @CRLF)

Here's the output:

>"...AutoIt3Wrapper.exe" /run /prod /ErrorStdOut /in "...New AutoIt v3 Script.au3" /autoit3dir "...AutoIt3" /UserParams    
+>15:46:40 Starting AutoIt3Wrapper v.1.10.1.14    Environment(Language:0409  Keyboard:0000040B  OS:WIN_XP/Service Pack 3  CPU:X86  ANSI)
>Running AU3Check (1.54.14.0)  from:...AutoIt3
+>15:46:40 AU3Check ended.rc:0
>Running:(3.3.0.0):...autoit3.exe "...New AutoIt v3 Script.au3"    
WinActivate: 1-0
WinWaitActive: 1-0
ControlClick: 0-0
+>15:46:40 AutoIT3.exe ended.rc:0
+>15:46:42 AutoIt3Wrapper Finished
>Exit code: 0    Time: 2.408

Edited October 13, 2009 by zeruqman

[water]

Very strange. Could you please try the following code and post the results?

$RC = WinActivate("Insert here the window title for your program") 
ConsoleWrite("WinActivate: " & $RC & "-" & @error & @CRLF) 
$RC = WinWaitActive("Insert here the window title for your program") 
ConsoleWrite("WinWaitActive: " & $RC & "-" & @error & @CRLF) 
$RC = ControlClick ("Insert here the window title for your program", "", "[CLASSNN:Button16]") 
ConsoleWrite("ControlClick: " & $RC & "-" & @error & @CRLF)

Is my understanging correct that this button has no text in it (according to the screenshot) or have you removed the button text from the screenshot?

[zeruqman]

That's correct the button has no text in it (it has text, but I suppose it is image though).

Here's the results:

...AutoIt3Wrapper.exe" /run /prod /ErrorStdOut /in "...New AutoIt v3 Script.au3" /autoit3dir "...AutoIt3" /UserParams    
+>20:21:22 Starting AutoIt3Wrapper v.1.10.1.14    Environment(Language:0409  Keyboard:0000040B  OS:WIN_XP/Service Pack 3  CPU:X86  ANSI)
>Running AU3Check (1.54.14.0)  from:...AutoIt3
+>20:21:22 AU3Check ended.rc:0
>Running:(3.3.0.0):...autoit3.exe "...New AutoIt v3 Script.au3"    
WinActivate: 1-0
WinWaitActive: 1-0
ControlClick: 0-0
+>20:21:23 AutoIT3.exe ended.rc:0
+>20:21:24 AutoIt3Wrapper Finished
>Exit code: 0    Time: 3.668

Only thing what comes to my mind is that program detects when mouse is over this button, and does something when pressed. When mouse button isn't above it and pressed, it does nothing (wonder though what would be the point). I put MouseMove to top of button and then executed the code you gave me, but ControlClick is still giving 0-0. But I'm so novice in programming that these are just random guesses.

Edited October 13, 2009 by zeruqman

[water]

That's correct the button has no text in it (it has text, but I suppose it is image though).

Pffft, now I'm running out of ideas!

Whatever we do, we can't click this button with ControlClick.

Another idea would be to calculate the position of the button on the screen and use Mouseclick. You could use WinGetPos to get the X and Y position of the window, add the offset of the button (see your screenshot) and use this coordinates as input to Mouseclick.

[zeruqman]

I ran the following script:

$place= WinGetPos("Program")
MsgBox(0, "Window x,y:", $place[0] & "," & $place[1])
Sleep (100)
WinActivate("Program")
sleep (100)
MouseMove ($place[0], $place[1])

$pos = MouseGetPos()
MsgBox(0, "Mouse x,y:", $pos[0] & "," & $pos[1])

(this should just tell where is the top left corner of the program, then move mouse to there, and tell the mouse coordinates)

Output gave me same positions two times, they were something like: X:560 Y:240. The programs' top left corner was somewhere else, the coordinates were quite far away from programs' window.

Now, when I add line:

WinMove("Holdem Indicator", "", 0, 0, 200, 200)

(or without ,200, 200 -part, same result occurs)

in front of my code, the message box gives X:0 Y:0 and the window hasn't changed its' place (or size, and the window isn't 200x200 large by default).

I think that I cannot get window position right, so I can't determine where is programs' buttons at to be clicked with MouseClick.

Ideas?

Edited October 13, 2009 by zeruqman

[water]

Please see this test program:

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

Global $sLicenseText = "This is your License Text Line 1" & @CRLF & _
        "This is your License Text Line 2" & @CRLF & _
        "This is your License Text Line 3"

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("User License Agreement", 633, 454, 265, 118)
$Edit1 = GUICtrlCreateEdit("", 8, 8, 617, 401, BitOR($ES_READONLY, $WS_VSCROLL, $WS_HSCROLL))
GUICtrlSetData(-1, $sLicenseText)
$Accept = GUICtrlCreateButton("Accept", 8, 416, 129, 25, 0)
$Decline = GUICtrlCreateButton("Decline", 488, 416, 137, 25, 0)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

Sleep(5000)

AutoItSetOption("MouseCoordMode",0)
MouseClick("left",76, 450)

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE, $Decline
            MsgBox(0, "", "Decline selected")
            Exit
        Case $Accept
            MsgBox(0, "", "Accept selected")
            ExitLoop
    EndSwitch
WEnd

The mouse is moved relative to the window position. So calculate the x and y-coords for the Mouseclick by moving the mouse to the middle of the button, get the mouse position using the Windowinfo Tool and substract the x- and y-coords of the window.

[zeruqman]

Hi,

I found another macro scripting language which finds this programs' position right without tricks. Thanks for your help anyways : )

Edited October 14, 2009 by zeruqman

[celestialspring]

Hi,

I found another macro scripting language which finds this programs' position right without tricks. Thanks for your help anyway : )

Would you mind sharing the name of the language because I'll be interested in knowing that.

Thanks

[zeruqman]

Autohotkey (or it is basically the same, but in this case it works better)

Edited October 14, 2009 by zeruqman

[Bert]

He could try winlist, then try winhandle using the array ID to hook into the window.