#include <SendMessage.au3>
#include <WindowsConstants.au3>
; Запуск блокнота
Run('notepad.exe')
; Ожидание 5 секунд до появление окна блокнота
$hCUI = WinWait("[CLASS:Notepad]", "", 5)
If Not $hCUI Then
MsgBox(4096, 'Сообщение', 'Окно не найдено, завершаем работу скрипта')
Exit
EndIf
ControlSend($hCUI, "", "Edit1", "Эта строка выслана в элемент Edit")
; Получает дескриптор элемента
$hCtrl = ControlGetHandle("Безымянный", "", "Edit1")
; Выделяет несколько слов
$iRand = Random(1, 6, 1)
Send('^+{LEFT ' & $iRand & '}')
; Копирует выделенный текст в буфер обмена
_SendMessage($hCtrl, $WM_COPY)
; Вырезает выделенный текст в буфер обмена
; _SendMessage($hCtrl, $WM_CUT)
; Удаляет выделенный текст
; _SendMessage($hCtrl, $WM_CLEAR)
Sleep(500)
Send('^{End}')
Send('{Enter}')
; Вставляет содержимое буфера обмена
_SendMessage($hCtrl, $WM_PASTE)
Send('{Enter}')
_SendMessage($hCtrl, $WM_PASTE)
; Закрывает блокнот.
WinClose($hCUI)