Пятница, 04.07.2025, 06:44 | Приветствую Вас Гость

...

Код

Главная » Статьи » Autoit

Для чего такое может понадобиться?

#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

GUICreate("")
Local $idMyedit = GUICtrlCreateEdit("Для чего такое может понадобиться?" & @CRLF, 0, 0, 200, 200, $ES_AUTOVSCROLL + $WS_VSCROLL)
Local $idButton_Notepad = GUICtrlCreateButton("Run Notepad", 120, 220, 85, 25)
GUISetState(@SW_SHOW)

While 1
Switch GUIGetMsg()
Case $idButton_Notepad
$iPID = Run("notepad.exe", "", @SW_SHOWMAXIMIZED)
WinWait("[CLASS:Notepad]", "", 10)
Local $text = GUICtrlRead($idMyedit)

for $i = 0 to StringLen($text)
Sleep(100)
Send(StringMid($text,$i,1))
next
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd

Категория: Autoit | Добавил: moskov (11.10.2023)
Просмотров: 75 | Рейтинг: 0.0/0
Добавлять комментарии могут только зарегистрированные пользователи.
[ Регистрация | Вход ]

Меню сайта

Категории раздела

PHP [41]
C++ [71]
Autoit [129]
Processing [105]
Basic4GL [7]
Fasm [2]
PABC [7]
Js [241]
Gentee [1]
Python [220]
Java android [3]
Small Basic [9]

Мини-чат

Статистика


Онлайн всего: 1
Гостей: 1
Пользователей: 0

Форма входа

Друзья сайта

  • ЗОВ КОСМОСА

  • Хулиган Вселенной

  • Тюремная поэзия

  • Религиозная поэзия

  • Сайт клана ЛеГиоН
  • Поиск