请问要怎样测试用户有没有在打字？

goodhermit95

请问什么API可以知道用户有没有在打字？(有没有 I )
打字不是有那个I这样的东西，怎样测试他有没有存在？
我不懂要怎样google!
应该说有没有focus textbox这样的东西

那个textbox不是在这个app里面，在另外一边
我想知道用户有没有在textbox打字，而且是游戏的textbox

weeming21

hook keyboard + hwnd 或许就是你要的

goodhermit95

回复 2# weeming21


    不是探测用户在打什么!是测试用户有没有focus住像textbox这样的东西!也就是会出现 I 这样的东西

weeming21

回复 3# goodhermit95

哦，那就更简单了，找出当前hwnd作对比就可以了

Super-Tomato

回复  weeming21


    不是探测用户在打什么!是测试用户有没有focus住像textbox这样的东西!也就是会出 ...
goodhermit95 发表于 2010-11-23 09:13 AM

你該把你的 application 類型描述清楚，是在做 socket 方面的聊天軟體還是 local 性质等

goodhermit95

他是一个你按a就会输入b的程序,但是在打字的时候会自动暂停，不然会混乱

Super-Tomato

他是一个你按a就会输入b的程序,但是在打字的时候会自动暂停，不然会混乱
goodhermit95 发表于 2010-11-23 08:51 PM

没停在輸入框打字，那怎么會讓按 a 變成 b 呢？
不管你要寫些甚么，你的問題點就是要取得另一個應用程式是否停留在輸入框
這样就麻煩你自己去 msdn 查询了解 GetGUIThreadInfo 這個 windows api 能够提供你些甚么資訊

goodhermit95

谢谢回答，我去试试看
不是a变b,而是输入a会直接输入b
没有打字的时候要有这样的效果，但是打字的时候就不可以了，因为你输入aaaaa就会变ababababab

Super-Tomato

谢谢回答，我去试试看
不是a变b,而是输入a会直接输入b
没有打字的时候要有这样的效果，但是打字的时候就不 ...
goodhermit95 发表于 2010-11-24 12:12 PM

在本身的程式中就直接监听欄位是否被 focus 就好啦

goodhermit95

我找了很多东西还是看不懂!
MSDN写得很简略
我上网找了这个

1. 
   
2. 
   
3. Public Class Form1
   
4. 
   
5. Private Declare Function GetForegroundWindow Lib "user32" () As Integer
   
6. Private Declare Function GetWindowThreadProcessId Lib "user32" (ByVal
   
7. hWnd As Integer, ByRef lpdwProcessId As Integer) As Integer
   
8. Private Declare Function SendMessage Lib "user32" Alias "SendMessageA"
   
9. (ByVal hWnd As Integer, ByVal wMsg As Integer, ByVal wParam As Integer,
   
10. ByVal lParam As Integer) As Integer
    
11. Private Declare Function GetGUIThreadInfo Lib "user32.dll" (ByVal
    
12. idThread As Integer, ByRef pgui As GUITHREADINFO) As Integer
    
13. Private Const WM_COPY As Integer = &H301
    
14. Private Structure RECT
    
15. Dim Left_Renamed As Integer
    
16. Dim Top As Integer
    
17. Dim Right_Renamed As Integer
    
18. Dim Bottom As Integer
    
19. End Structure
    
20. Private Structure GUITHREADINFO
    
21. Dim cbSize As Integer
    
22. Dim flags As Integer
    
23. Dim hwndActive As Integer
    
24. Dim hwndFocus As Integer
    
25. Dim hwndCapture As Integer
    
26. Dim hwndMenuOwner As Integer
    
27. Dim hwndMoveSize As Integer
    
28. Dim hwndCaret As Integer
    
29. Dim rcCaret As RECT
    
30. End Structure
    
31. 
    
32. Private Function GetFocusWindow() As Integer
    
33. Dim h As Integer
    
34. Dim ThreadID As Integer
    
35. Dim gui As GUITHREADINFO
    
36. Dim ret As Integer
    
37. 
    
38. h = GetForegroundWindow()
    
39. Console.WriteLine("GetFocusWindow: ForegroundWindow = " & Hex(h))
    
40. ThreadID = GetWindowThreadProcessId(h, 0)
    
41. gui.cbSize = Len(gui)
    
42. ret = GetGUIThreadInfo(ThreadID, gui)
    
43. If ret = 0 Then
    
44. Console.WriteLine("GetFocusWindow: GetGUIThreadInfo failed.
    
45. LastDllError = " & Err.LastDllError)
    
46. Exit Function
    
47. End If
    
48. Console.WriteLine("GetFocusWindow: hwndFocus = " &
    
49. Hex(gui.hwndFocus))
    
50. GetFocusWindow = gui.hwndFocus
    
51. End Function
    
52. 
    
53. Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As
    
54. System.EventArgs) Handles Timer1.Tick
    
55. Me.Text = Hex(GetFocusWindow())
    
56. SendCopyToWindow(GetFocusWindow())
    
57. TextBox1.Text = Clipboard.GetText
    
58. End Sub
    
59. 
    
60. Private Sub SendCopyToWindow(ByVal hWnd As Integer)
    
61. SendMessage(hWnd, WM_COPY, 0, 0)
    
62. End Sub
    
63. 
    
64. End Class
    
65. 
    

复制代码

GUITHREADINFO 是 GUI 的类型吗?
这个API他return boolean,true的话就是那个类型，false的话就不是？