Компьютерный форум OSzone.net  

Компьютерный форум OSzone.net (http://forum.oszone.net/index.php)
-   AutoIt (http://forum.oszone.net/forumdisplay.php?f=103)
-   -   [решено] Пауза скрипта до нажатия любой клавиши (http://forum.oszone.net/showthread.php?t=131767)

Dj Dynamite 12-02-2009 12:04 1036325

Пауза скрипта до нажатия любой клавиши
 
Какой функцией прописать что бы скрипт останавливался, и продолжал выполнение только после того, как я нажму любую кнопку на клавиатуре?

Creat0R 12-02-2009 13:31 1036378

Качаем _IsPressedEx UDF, и используем подобный скрипт:

Код:

#include <IsPressedEx_UDF.au3>

HotKeySet("{ESC}", "_Quit")

Global $iPaused = True
_PauseToggle()

$iDemo_Count = 0

While 1
    Sleep(1000)

    $iDemo_Count += 1
    ConsoleWrite(", " & $iDemo_Count)
WEnd

Func
_PauseToggle()
    If $iPaused Then
        ConsoleWrite("Скрипт остановлен... ")
    Else
        ConsoleWrite("Скрипт выполняется... ")
    EndIf

    Local
$hDllOpen = DllOpen("User32.dll")

    While $iPaused
        Sleep(10)

        If _IsPressedEx("[:ALPHA:]|[:ALLNUM:]", $hDllOpen) Then $iPaused = False
    WEnd


    ConsoleWrite(@CRLF & "Скрипт выполняется...")

    DllClose($hDllOpen)
EndFunc

Func
_Quit()
    Exit
EndFunc



Время: 15:33.

Время: 15:33.
© OSzone.net 2001-