Четверг, 28.11.2024, 04:31 | Приветствую Вас Гость

...

Код

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

Блокировка ввода текста

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
Local $state = 0

Local $hGUI = GUICreate("Блокировка ввода текста",700,300)
Local $myedit = GUICtrlCreateEdit ("Ввод будет доступен через 5 секунд", 0, 0,700,200) 
GUICtrlSetFont($myedit,25)
GUICtrlSetState($myedit,$GUI_DISABLE )


GUISetState(@SW_SHOW, $hGUI)
Local $hTimer = TimerInit()

While 1
$msg = GUIGetMsg()
if  $msg = $GUI_EVENT_CLOSE then
ExitLoop
endif


Local $iDiff = TimerDiff($hTimer)
if ($iDiff > 5000 and $state = 0) then
$state = 1
GUICtrlSetData($myedit,"")
GUICtrlSetState($myedit ,$GUI_ENABLE)
Endif


WEnd

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

Меню сайта

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

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

Мини-чат

Статистика


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

Форма входа

Друзья сайта

  • ЗОВ КОСМОСА

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

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

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

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