Автоустановка программы.Блокировка движения мыши

[puz27]

Здравствуйте!!!
Ребята помогите разобраться...Заранее спасибо.
В общем суть такова...
Есть установщик программы...Необходимо установить его автоматом...В общем в процессе установки нужно нажать только одну кнопку... Скрипт написал, кнопка нажимается...все ок.(ну тут примитивно)
Использовал

MouseClick

Проблема в том,что при установке программы, если пользователь активен,то он двигает мышкой, ну и соответсвенно может сбить установку.Вопрос...Возможно ли как то заблокировать движение мыши или как в таком случае делают знающие люди для реализации автоустановщика?
СПАСИБО!!!

 

[InnI]

puz27 [?]

заблокировать движение мыши

BlockInput()

нажать только одну кнопку

Если AutoIt Window Info видит эту кнопку, то можно попробовать

ControlClick()

 

[puz27]

ControlClick()

ВидеK и такие решения, но в чем отличиие от

MouseClick

Спасибо....Щас попробую....

 

[InnI]

puz27 [?]

в чем отличиие

Курсор мыши не перемещается.

 

[CreatoR]

InnI [?]

Курсор мыши не перемещается.

Не только в этом.
Насколько мне известно, MouseClick имитирует нажатие кнопки мышки, а ControlClick посылает сообщение WM_COMMAND родительскому окну.

 

[puz27]

Спасибо...Завтра на работе попробую...отпишусь...


Добавлено:

Сообщение автоматически объединено: 13 Авг 2014

Здравствуйте... Не могу разобраться...
Посмотрел :

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

Правильно ли я понимаю, что если скрипт будет выглядеть как

Run('PROG.exe')
WinWaitActive("Инсталлятор рабочего места ","Требуется задать пар") 
ControlClick ("Инсталлятор рабочего места ","Требуется задать пар", 1181456)

Ничего не выйдет.
Читаю справку, везде обязательно добавляются дополнительные переменные.Вот я и не могу понять...
Спасибо!


Добавлено:

Сообщение автоматически объединено: 13 Авг 2014

Вот как я понял так уже более правильно быть должно... но все равно не нажимает...

Run('PROG.exe')

    If WinWaitActive("[TITLE:Инсталлятор рабочего места]", "", 5) Then
    _WinWaitActivate("Инсталлятор рабочего места кассира","Требуется задать пар")
    ControlClick("Инсталлятор рабочего места ","Требуется задать пар",'Далее >','btnNext')
      EndIf


Func _WinWaitActivate($title,$text,$timeout=0)
    WinWait($title,$text,$timeout)
    If Not WinActive($title,$text) Then WinActivate($title,$text)
    WinWaitActive($title,$text,$timeout)
EndFunc

 

[InnI]

puz27
Запустите Au3Info, перетащите мишень на кнопку и покажите информацию с вкладки Summary.

 

[puz27]

>>>> Window <<<<
Title:	Инсталлятор рабочего места 
Class:	WindowsForms10.Window.8.app.0.378734a
Position:	175, 175
Size:	616, 521
Style:	0x16CA0000
ExStyle:	0x00050100
Handle:	0x00210972

>>>> Control <<<<
Class:	WindowsForms10.BUTTON.app.0.378734a
Instance:	13
ClassnameNN:	WindowsForms10.BUTTON.app.0.378734a13
Name:	btnNext
Advanced (Class):	[NAME:btnNext]
ID:	1901828
Text:	Далее >
Position:	442, 457
Size:	75, 23
ControlClick Coords:	64, 16
Style:	0x5601000B
ExStyle:	0x00000000
Handle:	0x001D0504

>>>> Mouse <<<<
Position:	506, 473
Cursor ID:	0
Color:	0xD4D4D4

>>>> StatusBar <<<<

>>>> ToolsBar <<<<
...

 

[InnI]

Run("PROG.exe")
WinWait("Инсталлятор рабочего места")
Sleep(100)
ControlClick("Инсталлятор рабочего места", "", "[NAME:btnNext]")

 

[puz27]

Да!Спасибо!Еще немного подправил и все запустилось...
Спасибо...
Но вот беда... если во время установки программы я что то делаю то (происходят движения мышью), то установка не происходит..
Как и в первом случае...

Тут написали использовать

BlockInput()

Но в справке написано что данная директива не влияет на

MouseMove

Соответственно, мышь двигается и установка не заканчивается...

 

[InnI]

puz27 [?]

данная директива не влияет на

Верно. Скрипт может двигать мышь, а пользователь - нет. И для функции BlockInput() нужны права администратора.

мышь двигается и установка не заканчивается

Я не пойму - вы перешли на ControlClick() или нет? Если перешли, то мышь вам не помеха и проблема где-то в другом месте. Например, в ожидании активности окна.

 

[puz27]

Спасибо...
Да, я перешел на

ControlClick

Щас буду смотреть...

BlockInput(1)
Run("PROG.exe")
WinWait("Инсталлятор рабочего места ","Требуется задать пар")
Sleep(100)
ControlClick("Инсталлятор рабочего места ", "Требуется задать пар", "[NAME:btnNext]")
WinWait("Инсталлятор рабочего места кассира","Завершение установки")
Sleep(1000)
ControlClick("Инсталлятор рабочего места кассира", "Завершение установки", "[NAME:btnFinish]")
BlockInput(0)

 

[InnI]

На Win7 и выше при включённом UAC, возможно, потребуется

#RequireAdmin

 

[puz27]

InnI, спасибо...
Попробовал.. Установка полностью блокируется...В принципе подходит)))Щас еще потестю, отпишусь...
Спасибо!


Добавлено:

Сообщение автоматически объединено: 13 Авг 2014

ДАА!!
Все заработало!!!
Спасибо!Щас буду разворачивать!Ура!Спасибо всем!!! :laugh: