; Запуск блокнота
Run("notepad.exe")

; Ожидание 5 секунд до появление окна блокнота
$hWnd = WinWait("[CLASS:Notepad]", "", 5)
If Not $hWnd Then
	MsgBox(4096, 'Сообщение', 'Окно не найдено, завершаем работу скрипта')
	Exit
EndIf

; В параметре "title" используется дескриптор возвращённый функцией WinWait.
$sControl = ControlGetFocus($hWnd)

MsgBox(4096, 'Сообщение', "Элемент, имеющий фокус ввода с клавиатуры в блокноте: " & $sControl)

; Закрывает блокнот.
WinClose($hWnd)