Что нового

[Элементы GUI] отправка нажатия клавиш в окне GUI

ZeVSalt

Я не лупоглазый, это прищур такой !
Сообщения
136
Репутация
0
Подскажите как сделать отправку нажатия в этом скрипте, я использую клик мышкой, для активации окна, но это не удобно, т.к. курсор должен находиться в окне, и если его там нет тогда скрипт нормально не работает.

Код:
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <IE.au3>
#include <GUIConstants.au3>


#Region ### START Koda GUI section ### Form=

$Form1 = GUICreate("Вход", 200, 150, 192, 124)
$Start1 = GUICtrlCreateButton("Start", 8, 105, 80, 25)
$Exit = GUICtrlCreateButton("Exit", 110, 105, 80, 25)
$Login1 = GUICtrlCreateInput("", 8, 10, 183, 21)
$Password1 = GUICtrlCreateInput("", 8, 50, 183, 21)
GUICtrlCreateLabel ("Введите пароль",  10, 80, 100)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###


While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit

        Case $Start1 ;при нажатии на кнопку Start
;~ -----------блок GUI------------------------------------------------------------------------
$oIE = _IECreateEmbedded()

GUICreate("Бот для игры Гнев Богов", 1000, 700, -10, -10) 
$nActiveX = GUICtrlCreateObj($oIE, 10, 10, 980, 600)
GUISetState()
$Exit = GUICtrlCreateButton ( "Выход",  200, 650, 500)

GUISetState(@SW_SHOW)
_IENavigate($oIE, 'http://gnevbogov.ru')
_IELoadWait ($oIE)

MouseClick("left"); здесь нажатие мышки, но это как то криво по моему мнению, должно быть что то другое, подскажите.

Sleep (3*1000)
Send("{TAB}")
Send("{TAB}")
Send("{TAB}")
Send("{TAB}")
Send("{TAB}")
Send("{TAB}")
$Log1 = GUICtrlRead($Login1)
Send($Log1)
Send("{TAB}")
$Pass1 = GUICtrlRead($Password1)  
Send($Pass1)
Send("{TAB}")
Send("{TAB}")
Send("{ENTER}")
Sleep(1500)
 
Верх