Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  

Показать сообщение отдельно

Аватара для FlatX007

Ветеран


Сообщения: 553
Благодарности: 87

Профиль | Отправить PM | Цитировать


Малец не правильно написал код ...

Функцию _Timetosleep он продолжит, те глобальная переменная $i будет приращиваться (Остановится на 5 ... после паузы 3 минуты будет 6,7,8 ...)

Код: Выделить весь код
#include <WindowsConstants.au3>

Global $i = 0, $begin = 0, $fTimerOff = False
Global $iTimeSleep = 3 * 60 ; 3 Минуты

AdlibRegister('_Timetosleep', 180000)
AdlibRegister('_TrackingTimer', 500)

$Form1 = GUICreate("", 243, 58, 348, 246, BitOR($WS_CAPTION, $WS_POPUP, $WS_BORDER, $WS_CLIPSIBLINGS))
$Button1 = GUICtrlCreateButton("Х", 8, 8, 227, 41, 0)
GUISetState()

Do
Until GUIGetMsg() = $Button1

Func _Timetosleep()

    $i += 1
    ConsoleWrite('> ' & $i & @CRLF)
    If $i = 5 Then
        $begin = TimerInit()
        AdlibUnRegister('_Timetosleep')
    EndIf

EndFunc   ;==>_Timetosleep

Func _TrackingTimer()

    If $begin > 0 And Round(TimerDiff($begin) / 1000) > $iTimeSleep And Not $fTimerOff Then
        AdlibRegister('_Timetosleep', 180000)
        $fTimerOff = True
    EndIf

EndFunc   ;==>_TrackingTimer
Это сообщение посчитали полезным следующие участники:

Отправлено: 00:01, 26-07-2011 | #4