1.  Клавиши
2.  Мышь
			



 ничего сложного
  ничего сложного

Что такое хуки?Денис писал(а):хуки на mouse move и keypress + таймер...ничего сложного

<DllImport("kernel32.dll")> _
        Friend Shared Function GetTickCount() As Integer
        End Function
<DllImport("user32.dll", EntryPoint:="GetLastInputInfo")> _
        Friend Shared Function GetIdleTime(<MarshalAs(UnmanagedType.Struct)> ByRef plii As PLASTINPUTINFO) As Boolean
        End Function
<StructLayout(LayoutKind.Sequential)> _
        Friend Structure PLASTINPUTINFO
            Public cbSize As Integer
            Public dwTime As Integer
        End Structure
Friend Function SystemIdleTime() As Integer
        Dim Result As Integer
        Dim L As External32.user32.PLASTINPUTINFO
        L.cbSize = Marshal.SizeOf(L)
        External32.user32.GetIdleTime(L)
        Result = CInt(Fix(TimeSpan.FromMilliseconds(External32.kernel32.GetTickCount - L.dwTime).TotalSeconds))
        Return Result
    End Function
Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 5