AHK: Время нажатия any key.

Спасибо!  Пока вот так для себя приспособил:

SetTimer, tim1, 100

KeyList := {}
hHookKeybd := DllCall("SetWindowsHookExW"
    , "Int", WH_KEYBOARD_LL := 13
    , "Ptr", RegisterCallback("LowLevelKeyboardProc", "Fast")
    , "Ptr", DllCall("GetModuleHandle", "UInt", 0, "Ptr")
    , "UInt", 0, "Ptr")

OnExit Esc
return




LowLevelKeyboardProc(nCode, wParam, lParam) {
    global KeyList 
    Critical
    if (wParam = 256) {
        time := NumGet(lParam+0, 12, "UInt")
        vk := NumGet(lParam+0, 0, "UInt")
        KeyList[time] := vk
    }
    return DllCall("CallNextHookEx", "Ptr",> 0, "Int", nCode, "UInt", wParam, "Ptr", lParam)
}

Esc::
    DllCall("UnhookWindowsHookEx", "Ptr", hHookKeybd)
    ExitApp

tim1:
    for key, value in KeyList
        o := key

    ToolTip, % ": " o

    return

Время последнего нажатия очень хорошо запоминается.
Но нужно ещё чуток доработать.  Есть две проблемы:
1. Не учитываются нажатия клавиш мыши
2. Не срабатывают некоторые сочетания клавиш, например #8

  Можно это исправить?

Я бы пошёл

Global Result, prRes
OnExit, Exit
hHookKeybd := DllCall("SetWindowsHookEx" , Int, WH_KEYBOARD_LL := 13 
            , UInt, RegisterCallback("LowLevelKeyboardProc", "Fast")
            , UInt, DllCall("GetModuleHandle", UInt, 0) , UInt, 0) 
Return

Exit: 
    DllCall("UnhookWindowsHookEx", UInt, hHookKeybd)
    ExitApp 

LowLevelKeyboardProc(nCode, wParam, lParam) {
    Critical 
    SetFormat, Integer, H 
    vkCode := "vk" SubStr( NumGet(lParam+0), 3) 
    D := ((NumGet(lParam+0, 8) & 1) <<8) | NumGet(lParam+0, 4) 
    scCode := "sc" SubStr((D = 0x136 ? 0x36 : D), 3) 
    Mode := (wParam = 0x100 || wParam = 0x104) ? " Down" : " Up" 
    KeyName := GetKeyName(vkCode scCode) 
    If (prRes <> KeyName Mode)
        Write(KeyName Mode)
    prRes := KeyName Mode
    Return DllCall("CallNextHookEx", UInt, 0, Int, nCode, UInt, wParam, UInt, lParam) 
} 

Write(Res) {
    Result .= Res "  -  " A_Hour ":" A_Min "." A_Sec "." A_MSec "`n"      
}

~LButton::
~RButton:: 
~XButton1::
~XButton2::
~MButton:: Write(SubStr(A_ThisHotkey,2) " Down")  

~WheelDown::
~WheelUp::
~WheelLeft::
~WheelRight:: 

~LButton Up::
~RButton Up::
~XButton1 Up::
~XButton2 Up::
~MButton Up:: Write(SubStr(A_ThisHotkey,2)) 

Space:: ToolTip % Result

без мышиного хука. И с псевдомассивом.

   Я имел ввиду, что некоторые хоткеи, в состав которых входят модификаторы, при использовании кода из второго сообщения, перестали работать.

  Код для мышки, как первый, так и второй работает прекрасно, но совместить их в одном скрипте с кодом для клавиатуры у меня не получается.  Они вообще совместимы? Или надо делать два отдельных скрипта на мышь и на клаву?

Описание проблемы.

Имеется две многооконные программы и скрипт с хоткеями.  Вторая программа иногда как-то странно  воздействует  на первую так, что у той неожиданно меняется активное окно, что категорически недопустимо.  И потому, что хоткей скрипта может неожиданно сработать в другое окно, которое только что активировалось, хотя предназначался в предыдущее, которое было активным долю секунды назад, и потому, что это просто сбивает с толку.

В нормальном режиме активность окон первой программы может сменяться
- самой первой программой, но по предсказуемым правилам
- хоткеем
- мышкой,
что проблемы не представляет.

Идея нового скрипта в том, чтобы постоянно отслеживать активность окон первой программы и при смене активного окна очень быстро проверить было ли это из-за воздействия пользователя(клавиши, мышка)  или смена произошла из-за глюка второй программы. Во втором случае нужно быстро вернуть активность тому окну, которое было активно до этого.

Это позволит уменьшить шанс отправки хоткеев в ошибочное окно до минимума или практически свести на нет.

Поэтому я пытаюсь написать скрипт, который запоминает время нажатий и кликов, и сравнивает время смены активности окна с последним действием пользователя. Если действий пользователя во время смены окна не было - возвращаем активность окну, имя которого было сохранено перед этим, поскольку смена была спровоцирована глюком второй программы.

Может просто использовать A_TimeIdle или A_TimeIdlePhysical

loop        
    ToolTip % A_TimeIdle

  Именно так я и написал. Речь идёт именно о времени:

    Подавляющая часть элементов управления окна не опознаётся как контролы.  Но не только в этом проблема.  Попробую уточнить описание. У первой программы несколько одинаковых окон.  Время от времени в активном окне мне нужно произвести ряд кликов и изменить текст котрола.  Я создал несколько разных горячих клавиш, которые отправляют разные наборы кликов и текста.

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

Поэтому активация окна сама по себе ничего не даст. Нужно запоминать какое окно было активным, и если произошла неожиданная смена(не  от действия пользователя), срочно вернуть активность тому окну, которое было активным до этого, чтобы успеть активировать его за доли секунды, чтобы не произошло ложной отправки в неверное окно.

Я? Вы слишком хорошо обо мне думаете. Я пытаюсь ГОТОВЫЙ РАБОТАЮЩИЙ непонятный мне код приспособить под собственные нужды.  Если бы я так хорошо знал что там можно убрать, не нарушив его работы в нужной мне части, то наверное и темы бы не было.

Кстати в названии темы тоже только время. Извините, если ввёл в заблуждение.  Это не нарочно.

Для отправки команды именно окну есть в ControlSend параметр ahk_parent
А для отправки именн в то окно используется хендл который был получен при старте хоткея.
ControlSend работает не вовсех приложениях, но в каждом случае это нужно сначала проверить...

Честно говоря, я наделся на какой-то очень простой выход.  Наверное самым простым для меня решением будет в новом скрипте создать те же хоткеи, что и в рабочем, добавить туда клики мышки,  дать им возможность отправлять самих себя и вести учёт нажатий с помощью A_ThisHotkey.
  Наверное самый тупой способ, но если он будет работать, и хоткеи старого скрипта не будут сбоить, то наверное для меня это будет выходом из ситуации.

Даже и в мыслях не было такой глупости. Вы вообще откуда это взяли???

А вы поняли те варианты которые вам были предложены?  Простейший вариант без различных хуков в 18 сообщении, вы не посчитали нужным удостоить своего драгоценного внимания и как-то прокомментировать.

   Помоему вместо того чтобы вникать в написанное выше или конструктивно критиковать его же, вы ищете какой-то потаённый смысл и делаете выводы даже необъясняя из чего они произрастают...
Все необходимые методы решения вам предложены, но вы их попросту игнорируете.

Значит надо понять что это. А чтобы понять что это, надо задать вопрос "что это?"
Потому что тот кто про это написал, не может знать что вы незнаете что это.
Сомневаюсь что вы увидите\дождётесь полностью понятное для вас решение без лишних вопросов, ведь если оно есть вы бы самостоятельно до него дошли.

Уважаемый господин Pokerist, у меня нет никакого желания\мотивов обсуждать вашу персону лично, ибо как вы догадываетесь я с вами лично незнаком. Я лишь высказываю вам предположение о том, что ваш способ познания нового путём игнорирования этого самого нового не совсем продуктивен. И лично у меня такой стиль общения вызывает ощущение что тема заведена не для решения вопроса, а просто пообщатся с другими участниками форума. Но для этого на форуме есть раздел OFF:

Добавьте в начало этого скрипта что-нибудь вроде

Settimer,tim1, 100


Sleep, 5000





tim1:
Settimer, tim1, Off
WinGet, bloknot, IDLast, ahk_exe notepad.exe
Random, t_pausa, 50, 200
Sleep, % t_pausa
WinActivate,  ahk_id %bloknot%
Settimer, tim1, On
return

   И попробуйте отправить хоткей в то окно блокнота, которое вы выбрали.  Можно конечно увеличить максимум паузы до минуты для большего приближения к условиям задачи, но тогда надо будет сделать пару тысяч попыток, чтобы точно убедиться, что этот вариант не подходит.

Мне кажется, что Вы не внимательно читали моё описание и пропустили некоторые детали. Я выделил в цитате это место.

  А Вы, как я понял, пытаетесь не допустить отправки хоткеев в окна других программ.

Зачем вставлять в код подпрограмму периодичеки активирующую окно целевой программы бывшее активным раньше всех других?
Код в 26 посте запоминает окно при нажатии хоткея, и работает только с этим окном.
Код запоминающий последнее нажатие кнопки приведён в 12 посте. В нём же решён сабж "Время нажатия любой кнопки".

Чего вам ещё нехватает для решения задачи?