AHK: Поиск окна и клик по нему

F11::
  WinActivate, Калькулятор
  WinGetPos, X, Y, Width, Height
  MouseMove 37, 195 
  Click
Return

Вопросы:
1) Строка Click 37, 195 должна была переместить курсор и кликнуть, но чё-то не проканало (мышь не двигалась), пришлось добавлять MouseMove
2) Как и где объявить переменные и константы, примеры пожалуйста в студию ?
3) В Delphi есть функция GetClientRect - Считывает кооpдинаты пользователя окна.
http://platonov-andrei.narod.ru/Delphi/ … ntRect.htm
Есть ли подобная в AHK ? Мне нужно получить размеры клиентской области, независимо от стиля окон

Пример клиентской области окна:

Пример скрипта с определением переменных Констант как класса нет

Докумантация (engl) по структуре скрипта

По всем окнам из какого множества? Всем существующим в системе в данный момент, или только по окнам с заголовком «Program Manager»?

    hwnd := id%A_Index%
    WinActivate, ahk_id %this_id% 

Где в переменную this_id записывается значение? Каков, по-вашему, смысл процитированного фрагмента кода?

Спасиб большое !
Подскажите, где ошибка ?

;--------------------------------------------------------------------------------------------------
; Set
;--------------------------------------------------------------------------------------------------
title := "Калькулятор" 
Width := 212
Height := 264
x := 25
y := 140

myFunc:
myFunc(title,Width,Height,x,y)
return

;--------------------------------------------------------------------------------------------------
; myFunc
;--------------------------------------------------------------------------------------------------
myFunc(title,Width,Height,x,y)
{
    WinGet, id, list, title
    Loop, %id%
    {      
        GetClientSize(id%A_Index%, rcRealWidth, rcRealHeight)
        If (rcRealWidth = Width && rcRealHeight = Height)
        { 
            WinActivate, % "ahk_id " id%A_Index%
            CoordMode, Mouse, Client     
            Click x, y
        }
    }
    return
}

 
GetClientSize(hwnd, ByRef RealWidth, ByRef RealHeight) 
{
    VarSetCapacity(rcClient, 16, 0)      
    DllCall("user32\GetClientRect","uint", hwnd ,"uint",&rcClient)   
    RealWidth := NumGet(rcClient, 8), RealHeight := NumGet(rcClient, 12)
} 

и - WinGet, id, list, %title%

А кто говорил про знаки процента в выражении?

If (rcRealWidth = %Width% && rcRealHeight = %Height%)

If (rcRealWidth = Width && rcRealHeight = Height)

а почему у меня не получается развернуть окно (WinRestore), когда оно свёрнуто ?

WinRestore, % "ahk_id " id%A_Index%
WinActivate, % "ahk_id " id%A_Index%
CoordMode, Mouse, Client     
Click %x%, %y%

если я сверну окно,

то всё ппц, WinActivate не развёрнёт его, он же тока меняет z-посл.

понял я прикол
у свёрнутого окна другие Width и Height

У свёрнутого окна? У меня нулевые показывает.

Никак не мог. Видимо, запускаете на АНК х64, а код написан под 32-битный. Попробуйте этот вариант:

WinGet, id, list, Калькулятор
Loop, %id%
{      
    GetClientSize(id%A_Index%, rcRealWidth, rcRealHeight)
    
     MsgBox, rcRealWidth = %rcRealWidth%
     MsgBox, rcRealHeight = %rcRealHeight%
    
    
    If (rcRealWidth = 212 && rcRealHeight = 264)
    { 
        WinActivate, % "ahk_id " id%A_Index%
        CoordMode, Mouse, Client     
        Click  25, 140
    }
}
return
 
GetClientSize(hwnd, ByRef RealWidth, ByRef RealHeight) 
{
    VarSetCapacity(rcClient, 16, 0)      
    DllCall("user32\GetClientRect","ptr", hwnd ,"ptr",&rcClient)   
    RealWidth := NumGet(rcClient, 8, "int"), RealHeight := NumGet(rcClient, 12, "int")
}

Запускаться будет на том, который у вас установлен. Эти изменения (ещё в NumGet 3-й параметр) делают код универсальным, т.е. пригодным для 32 и 64 бит.

Дело в том, что некоторые типы данных имеют разный размер в зависимости от битности процесса. Это нужно учитывать, чтобы код работал правильно при обеих.

YMP
Ничего непонимая, попытался сделать по аналогии:

GetClientPos(hwnd, ByRef x, ByRef y) {
    WinGetPos, , , , Window_Height, ahk_id %hwnd%
    VarSetCapacity(rcClient, 16, 0)
    DllCall("user32\GetClientRect","ptr", hwnd ,"ptr",&rcClient)  
    rcClient_b := NumGet(rcClient, 12, "int")
    VarSetCapacity(pwi, 68, 0)
    DllCall("GetWindowInfo", "ptr", hwnd, "ptr", &pwi)
    x := NumGet(pwi, 48, "int")
    by := NumGet(pwi, 52, "int")
    y := Window_Height - by - rcClient_b
} 

Вроде работает... Ошибки есть?

Когда я хоть что-то пойму в винапи...

?=  VarSetCapacity(pwi, 60, 0)
Но что за цифры 60. И 68 тоже.

Это не понял совсем.

Размер структуры. Вот её определение:

typedef struct {
    DWORD cbSize;
    RECT rcWindow;
    RECT rcClient;
    DWORD dwStyle;
    DWORD dwExStyle;
    DWORD dwWindowStatus;
    UINT cxWindowBorders;
    UINT cyWindowBorders;
    ATOM atomWindowType;
    WORD wCreatorVersion;
} WINDOWINFO, *PWINDOWINFO, *LPWINDOWINFO;

DWORD = UINT = 4 байта. RECT = 4  LONG'a = 16 байт. ATOM = WORD = 2 байта.

Первый член структуры — cbSize, её размер в байтах. После создания структуры полагается его писать в неё. Это не для всех структур требуется, нужно смотреть описание.

NumPut(60, pwi, 0, "UInt")

Ну как куда, сразу после создания структуры, т.е. VarSetCapacity(pwi, 60, 0).

Если работает, то можно.

Ищу окно калькулятор и когда доходит прогон до окна редактора, то выпадает ошибка
чё-то не догоняю в чём дело

#Persistent
SetTimer, myFunc, 1000
return

myFunc: 
{
    SetTimer, myFunc, Off ; здесь таймер выключает себя сам.
    
    WinGet, id, list
    Loop, %id%
    {
        this_id := id%A_Index%
        ;WinActivate, ahk_id %this_id%
        WinGetClass, this_class, ahk_id %this_id%
        WinGetTitle, this_title, ahk_id %this_id%
        MsgBox, Обход всех окон`n`n %a_index% из %id% `n ahk_id %this_id% `n ahk_class %this_class% `n %this_title%        
        
        CheckTitle(%this_title%)  
    }
    
    SetTimer, myFunc, On ; здесь таймер включает себя сам.    
}
return

CheckTitle(title)
{
    
}
return

YMP, спасиб

А где её цель? У меня ваш код двигает мышь влево.

так?

Click %x%, %y%

и

MouseMove %xpos%, %ypos% 

Просьба в следующий раз говорить точнее, какая именно команда не работает.

CoordMode поменялся.

Нет, устанавливается режим Screen, а изначально Window.

Для MouseMove не обязательно. А вообще надо смотреть в описании команды. Если там сказано, что параметр может быть выражением, то проценты необязательны.
http://www.script-coding.com/AutoHotkey/MouseMove.html

Видимо какая то бредовая функция. Зачем GetClientRect, если в GetWindowInfo есть все данные?

1::
GetClientPos(WinExist("A"), top, left, w, h) 
ToolTip % " top " top
        . "`n left " left
        . "`n w " w
        . "`n h " h
        
GetClientPos(hwnd, ByRef top, ByRef left, ByRef w, ByRef h)   { 
    VarSetCapacity(pwi, 60, 0), NumPut(60, pwi, 0, "UInt")
    DllCall("GetWindowInfo", "ptr", hwnd, "Uint", &pwi) 
    top:=NumGet(pwi,24,"int")-NumGet(pwi,8,"int")
    left:=NumGet(pwi,52,"int")
    w:=NumGet(pwi,28,"int")-NumGet(pwi,20,"int") 
    h:=NumGet(pwi,32,"int")-NumGet(pwi,24,"int")
}

Подниму вопрос , так это выглядит (попытка постом выше) :
https://youtu.be/n6eGEr0Wefw
Кликнуть нужно в это окно :

Надеюсь кто-то подскажет как сюда правильно кликнуть скрытым курсором ?
СПАСИБО!

Нет-нет  это WSH кнопка которая запускает AHK скрипт(отсюда: \4Icar_13_7_MPS_UNI\foobar2000\Emul\click.exe) . Её основная задача показать  играющий трек в плейлисте (последующие нажатия масштабируют окна - уже своими силами),
но тк фокус на кнопках в  момент нажатия - нужен "помощник" .
Кликнуть нужно по плейлисту (списку треков)
Закинул сборку письмом   - при запуске сборки  - это окно справа . Уменьшить ширину строк (ctrl+колесо) списка

Пока Вы писали - я уже подредактировал пост выше и сделал скрин (по окну справа - если нажимать прицел окно разворачивается,
но его основные параметры :http://forum.script-coding.com/viewtopi … 17#p108017 не меняются) :

Кнопка , что на Вашем скрине  - запускает  скрипт AHK .
Его задача верно - найти окно НЕ в фокусе и кликнуть (те сделать активным, но по ClassnameNN  - или по Handle-у как-то ) .
Advanced (Class) у окон общий ..
Задача вроде-бы простая - а не выходит корректно .
.....
Забыл сказать  - сам Фубар меняет свой размер и положение на экране ..

Попробую ещё-раз.
Если я WSH кнопкой вызываю показ трека  - команда не работает так-как нет фокуса на плейлисте .
Это ОКНО справа на скрине .
Задача простая  :
Навести фокус на определённое окно - всё  (в нашем случае плейлист).
Знаний плеера не нужно . 
Как это сделать по ClassnameNN или хендлу ? .
Я недавно знакомый  с AHK  нашел решение через клик , но кликает , как на видео  (только в части экрана)
У WinActivate ( "title" [, "text" ] ) нет вызова окна  по ClassNN ..