#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
|