Имя пользователя:
Пароль:
 

Показать сообщение отдельно

Ветеран


Сообщения: 27449
Благодарности: 8088

Профиль | Отправить PM | Цитировать


Я бы предпочёл так:
Код: Выделить весь код
AutoItSetOption("MustDeclareVars", 1)

; Получаем список окон скриптов AutoIt
Local $arrWinList = WinList("[CLASS:AutoIt v3;TITLE:AutoIt v3]")
Local $i, $strHwnd

; Перебираем их все
For $i = 1 to $arrWinList[0][0]
	; Строим хэндл очередного окна
	$strHwnd = "[HANDLE:" & Hex($arrWinList[$i][1]) & "]"
	
	; Если это окно не текущего процесса…
	If WinGetProcess($strHwnd) <> @AutoItPID Then
		; Пробуем закрыть его
		WinClose($strHwnd)
	EndIf
Next

Отправлено: 19:05, 31-10-2009 | #4