Нажатие на кнопку, меняющую свой id.

[MrGep]

Версия AutoIt: 3.

Описание: Доброе время суток, уважаемые) Имеется программа, в которой есть две кнопки

-

Необходимо нажать кнопку "Фарм!" в свернутой программе, но кнопка с каждой перезагрузкой меняет свой id.

Вот summary от Window Info

Спойлер

>>>> Window <<<<
Title: 4
Class: TForm1
Position: -8, -8
Size: 1382, 744
Style: 0x17CF0000
ExStyle: 0x00010100
Handle: 0x002605F4

>>>> Control <<<<
Class:
Instance:
ClassnameNN:
Name:
Advanced (Class): [CLASS:; INSTANCE:]
ID: 40308028
Text: Фарм!
Position: 712, 10
Size: 73, 25
ControlClick Coords: 41, 17
Style: 0x54010001
ExStyle: 0x00000000
Handle: 0x02670D3C

>>>> Mouse <<<<
Position: 753, 69
Cursor ID: 0
Color: 0xF0F0F0

>>>> StatusBar <<<<

>>>> ToolsBar <<<<

>>>> Visible Text <<<<
Стоп
Фарм!



>>>> Hidden Text <<<<
mmo2

Примечания:

 

[Viktor1703]

Можно перебрать коллекцию элементов окна и вернуть текст с элемента, если у этого элемент текст == "Фарм!", то возвращаем найденный id.

 

[MrGep]

А можно точнее?) Я хотел так сделать, но моих знаний не хватило для считывания текста с элементов(

 

[Viktor1703]

Примерно так:

#include <WinAPIEx.au3>
#include <APIConstants.au3>

$hForm = GUICreate('', 300, 200)
$iButton = GUICtrlCreateButton('Фарм!', 20, 20, 80, 20)
GUISetState()

$aTest = ControlGetInfo($hForm, 'Фарм!')

MsgBox(0, '', 'hWnd:' & @TAB & $aTest[0] & @CRLF & _
              'Id:' & @TAB & $aTest[1] & @CRLF & _
              'Class:' & @TAB & $aTest[2])

While 1
    Switch GUIGetMsg()
        Case -3
            Exit
    EndSwitch
WEnd

Func ControlGetInfo($hWnd, $sText)
    Local $iRet[3] = [0, 0, 0]
    Local $iEnum = _WinAPI_EnumChildWindows($hWnd)
    For $i = 1 To Ubound($iEnum) -1
        If ControlGetText($iEnum[$i][0], '', '') == $sText Then
            $iRet[0] = $iEnum[$i][0]
            $iRet[1] = _WinAPI_GetDlgCtrlID($iEnum[$i][0])
            $iRet[2] = _WinAPI_GetClassName($iEnum[$i][0])
        EndIf   
    Next  
	Return $iRet
EndFunc

 

[WSWR]

А такой код не пойдет? :whistle:

$sText="моя прога" ;заголовок окна программы
ControlClick($sText,"","Фарм!")

 

[Viktor1703]

Подойдёт, но в таком виде

ControlClick(WinGetHandle('моя прога'), 'Фарм!', '')

Попробуйте, может получится.

 

[MrGep]

Спасибо всем за помощь, остановился на варианте, предложенном WSWR )