Что нового
Автор:
Фильтры

[Окна, Диалоги] Автоматическое нажатие клавиши при определенном состоянии окна

E

elviruses

Новичок
Сообщения
3
Репутация
0
Версия AutoIt: 3.7.3

Описание:

Здравствуйте всем... Собственно сразу к делу.

Первая задача: Если окно Блокнота развернуто на весь экран, скрипт должен проверять существует ли в этот момент окно Paint, если существует, то ничего не делает, если нет то нажимает клавишу PAUSE на клавиатуре.

И вторая задача: Если окно Блокнота свернуто, то скрипт проверяет существует ли окно Paint, если существует, то нажимает клавишу PAUSE.

Вот до чего я дошел (это не работает):
Код: 
While WinActivate("Безымянный — Блокнот")
   $iState = WinGetState("Безымянный — Блокнот")
   If BitAND($iState, 32) Then
	  if WinActivate("Безымянный - Paint") Then
		 ContinueLoop
	  Else
		Send("{PAUSE}")
	  EndIf
   Else
	  ContinueLoop
   EndIf
WEnd


Я уже устал, не могу никак сделать... Помогите плиз...
 
G

gunter123

Продвинутый
Сообщения
159
Репутация
69
Здравствуйте. Попробуйте вот так:
Код: 
While Sleep(100)
   If Not WinGetHandle("[REGEXPTITLE:Блокнот]") Then ContinueLoop
   $iState = WinGetState("[REGEXPTITLE:Блокнот]")
   If BitAND($iState, 32) Then
      If WinGetHandle("[REGEXPTITLE:Paint]") Then
         ContinueLoop
      Else
        Send("{PAUSE}")
      EndIf
   ElseIf BitAND($iState, 16) AND WinGetHandle("[REGEXPTITLE:Paint]") Then
	  Send("{PAUSE}")
   EndIf
WEnd
 
Автор
E

elviruses

Новичок
Сообщения
3
Репутация
0
Извините что так долго, код скрипта gunter123 зациклил его так что пока не откроешь блокнот кнопка PAUSE будет нажимается бесконечно, поэтому я сделал чуток по другому, вот код:

Код: 
While Sleep(100)
   If Not WinGetHandle("[CLASS:Notepad]") Then ContinueLoop
   $iState = WinGetState("[CLASS:Notepad]")
   If BitAND($iState, 32) Then
      If WinGetHandle("[CLASS:MSPaintApp]") Then
         ContinueLoop
      Else
        Send("{PAUSE}")
      EndIf
   ElseIf BitAND($iState, 16) AND WinGetHandle("[CLASS:MSPaintApp]") Then
      WinClose("[CLASS:MSPaintApp]")
   EndIf
WEnd
 
Вам необходимо войти или зарегистрироваться, чтобы здесь отвечать.
Автор темы Похожие темы Форум Ответы Дата
Xabib2302 [Окна, Диалоги] Как добавить иконку в заголовок MsgBox и в панель задач после запуска скрипта Общие вопросы по AutoIt 3
N [Окна, Диалоги] Изменение Label в окне Общие вопросы по AutoIt 2
Э [Окна, Диалоги] UDF с оформленными MsgBox под ситуации Общие вопросы по AutoIt 7
A [Окна, Диалоги] автоматическое скрытие выбранных расширений при добавлении torrent-файла Стол заказов 36
K [Окна, Диалоги] Автоматическое нажатие на кнопки Общие вопросы по AutoIt 13
Похожие темы
[Окна, Диалоги] Как добавить иконку в заголовок MsgBox и в панель задач после запуска скрипта
[Окна, Диалоги] Изменение Label в окне
[Окна, Диалоги] UDF с оформленными MsgBox под ситуации
[Окна, Диалоги] автоматическое скрытие выбранных расширений при добавлении torrent-файла
[Окна, Диалоги] Автоматическое нажатие на кнопки
Верх