[Creat0R]

Используй _IsPressedEx:

Код:

#include <IsPressedEx.au3>

If _IsPressedEx("[:ALLKEYS:]") Then
    _NextStep()
EndIf

[TERMINAL]

Creat0R, а как сделать чтобы через ToolTip нажатые клавиши выводились ? (неполучается...)

[madmasles]

а как сделать чтобы через ToolTip нажатые клавиши выводились »

Попробуйте так:

Код:

#include <IsPressedEx.au3>
#include <WinAPIEx.au3>;http://autoit-script.ru/index.php/topic,47.0.html

Opt('MustDeclareVars', 1)

HotKeySet('{Esc}', '_Quit')

Global $fTimeOld, $fTime, $sPressed, $iRet, $iTime

AdlibRegister('_Show', 1000)
$iTime = TimerInit()
While 1
    $iRet = _IsPressedEx('[:ALLKEYS:]')
    If $iRet Then
        $fTime = Not $fTime
        If StringInStr(__KeyGetType($iRet, 0), 'mouse') Then
            $sPressed = 'Mouse (' & __KeyGetType($iRet, 0) & ')'
        Else
            $sPressed = 'Key (' & __KeyGetType($iRet, 0) & ')'
        EndIf
    EndIf
    If $fTimeOld <> $fTime Then
        $fTimeOld = $fTime
        $iTime = TimerInit()
    EndIf
    Sleep(10)
WEnd

Func _Show()
    If $sPressed Then
        ToolTip('Прошло после последнего нажатия: ' & _WinAPI_StrFromTimeInterval(TimerDiff($iTime)) & @LF & 'Нажимали: ' & _
                $sPressed & @LF & @LF & 'Совсем ничего не делали: ' & _WinAPI_StrFromTimeInterval(_WinAPI_GetIdleTime()), 0, 0)
    Else
        ToolTip('Ничего не нажимали: ' & _WinAPI_StrFromTimeInterval(TimerDiff($iTime)) & @LF & @LF & _
                'Совсем ничего не делали: ' & _WinAPI_StrFromTimeInterval(_WinAPI_GetIdleTime()), 0, 0)
    EndIf
EndFunc   ;==>_Show

Func _Quit()
    Exit
EndFunc   ;==>_Quit

[TERMINAL]

madmasles, Немогу побороть в твоём скрипте ошибку Duplicate function name.:Func _Show() :

>"C:\Program Files\AutoIt3\SciTE\AutoIt3Wrapper\AutoIt3Wrapper.exe" /run /prod /ErrorStdOut /in "C:\tets.au3" /autoit3dir "C:\Program Files\AutoIt3" /UserParams +>08:50:22 Starting AutoIt3Wrapper v.2.0.1.24 Environment(Language:0419 Keyboard:00000409 OS:WIN_XP/Service Pack 3 CPU:X64 OS:X86) >Running AU3Check (1.54.19.0) from:C:\Program Files\AutoIt3 C:\tets.au3(29,13) : ERROR: _Show() already defined. Func _Show() ~~~~~~~~~~~~^ C:\tets.au3(39,13) : ERROR: _Quit() already defined. Func _Quit() ~~~~~~~~~~~~^ C:\tets.au3 - 2 error(s), 0 warning(s) !>08:50:23 AU3Check ended.rc:2 >Running3.3.6.1):C:\Program Files\AutoIt3\autoit3.exe "C:\tets.au3" C:\tets.au3 (29) : ==> Duplicate function name.: Func _Show() ->08:50:25 AutoIT3.exe ended.rc:1 >Exit code: 1 Time: 4.273

всё, СУПЕР, списибо-порешал ошибку, но вопрос теперь другой, а возможно ли чтобы показывало польшие и маленькие буквы-на данный момент только большие выводятся и нет различия между русскими и английскими буквами?

[madmasles]

TERMINAL,
А зачем Вам клавиатурный шпион?

[TERMINAL]

madmasles, )) у меня уже есть один и довольно неплохой, но этот вариант мне кажется намного лучше в работе...
Клавиатурный шпион ставлю к себе в терминальную сессию...при входе в терминал у меня есть 3 секунды чтобы набрать на клавиатуре пароль-если пароль не верен или ввобще не вводился-отсылается мне письмо на почту о несанкционированном входе в терминальную сессию. Тоесть получается двойная защита, при входе на сервак и на самом сервере.

[madmasles]

TERMINAL,
*click*

[TERMINAL]

madmasles, страница ошибку выдаёт...

[madmasles]

страница ошибку выдаёт »