Вторник, 14.05.2024, 02:22 | Приветствую Вас Гость

...

Код

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

Выключение ос по таймеру

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

Local $hGUI = GUICreate("Выключение ос по таймеру", 500, 200)
Local $idinput = GUICtrlCreateInput("1000", 0, 0, 500, 25)
Local $idbutton1 = GUICtrlCreateButton("Включить таймер", 20, 50, 185, 25)

GUISetState(@SW_SHOW, $hGUI)
Local $hTimer = TimerInit()
Local $state = 0
While 1
$msg = GUIGetMsg()
if  $msg = $GUI_EVENT_CLOSE then
ExitLoop
endif
if $msg = $idbutton1 Then
$state = 1
$hTimer = TimerInit()
EndIf


if $state = 1 then
Local $iDiff = TimerDiff($hTimer)
if ($iDiff >Number (GUICtrlRead($idinput)) ) then
Shutdown(1)
Endif
EndIf


WEnd

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

Меню сайта

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

PHP [41]
C++ [68]
Autoit [97]
Processing [101]
Basic4GL [7]
Fasm [2]
PABC [7]
Js [221]
Gentee [1]
Python [140]
Java android [3]
Small Basic [9]

Мини-чат

Статистика


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

Форма входа

Друзья сайта

  • ЗОВ КОСМОСА

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

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

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

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