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

[复制链接]

goodhermit95

2010-11-22 09:54 AM

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

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

weeming21

2010-11-22 01:58 PM

hook keyboard + hwnd 或许就是你要的

goodhermit95

2010-11-23 09:13 AM

回复 2# weeming21

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

weeming21

2010-11-23 11:43 AM

回复 3# goodhermit95

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

Super-Tomato

2010-11-23 01:58 PM

回复 weeming21

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

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

goodhermit95

2010-11-23 08:51 PM

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

Super-Tomato

2010-11-23 10:35 PM

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

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

goodhermit95

2010-11-24 12:12 PM

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

Super-Tomato

2010-11-24 12:31 PM

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

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

goodhermit95

2010-11-25 12:10 PM

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

Public Class Form1
Private Declare Function GetForegroundWindow Lib "user32" () As Integer
Private Declare Function GetWindowThreadProcessId Lib "user32" (ByVal
hWnd As Integer, ByRef lpdwProcessId As Integer) As Integer
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA"
(ByVal hWnd As Integer, ByVal wMsg As Integer, ByVal wParam As Integer,
ByVal lParam As Integer) As Integer
Private Declare Function GetGUIThreadInfo Lib "user32.dll" (ByVal
idThread As Integer, ByRef pgui As GUITHREADINFO) As Integer
Private Const WM_COPY As Integer = &H301
Private Structure RECT
Dim Left_Renamed As Integer
Dim Top As Integer
Dim Right_Renamed As Integer
Dim Bottom As Integer
End Structure
Private Structure GUITHREADINFO
Dim cbSize As Integer
Dim flags As Integer
Dim hwndActive As Integer
Dim hwndFocus As Integer
Dim hwndCapture As Integer
Dim hwndMenuOwner As Integer
Dim hwndMoveSize As Integer
Dim hwndCaret As Integer
Dim rcCaret As RECT
End Structure
Private Function GetFocusWindow() As Integer
Dim h As Integer
Dim ThreadID As Integer
Dim gui As GUITHREADINFO
Dim ret As Integer
h = GetForegroundWindow()
Console.WriteLine("GetFocusWindow: ForegroundWindow = " & Hex(h))
ThreadID = GetWindowThreadProcessId(h, 0)
gui.cbSize = Len(gui)
ret = GetGUIThreadInfo(ThreadID, gui)
If ret = 0 Then
Console.WriteLine("GetFocusWindow: GetGUIThreadInfo failed.
LastDllError = " & Err.LastDllError)
Exit Function
End If
Console.WriteLine("GetFocusWindow: hwndFocus = " &
Hex(gui.hwndFocus))
GetFocusWindow = gui.hwndFocus
End Function
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Timer1.Tick
Me.Text = Hex(GetFocusWindow())
SendCopyToWindow(GetFocusWindow())
TextBox1.Text = Clipboard.GetText
End Sub
Private Sub SendCopyToWindow(ByVal hWnd As Integer)
SendMessage(hWnd, WM_COPY, 0, 0)
End Sub
End Class

复制代码

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

12 / 2 页下一页

返回列表

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

浏览过的版块