如何修改sendmessage的返回值?

[quwuzhong]

我的程序的文本框的信息总是被人用sendmessage函数的wm_gettext方法获得,有没有什么方法,使返回值为空,不做任何反应,先谢谢各位大哥了!实现立即给分!!!

[province_]

getwindowtext也是要发送GETTEXT消息的，并且只能在同一进程内，跨进程无效。

[quwuzhong]

怎么做呀，province_(雍昊) 大哥：
小弟太感动了，在我绝望的时候你伸出了友谊之手，希望能给个详细的解法，我对api调用不是很明白，谢谢！！！

[带着蜗牛去散步^]

province_(雍昊) (说截WM_GETTEXT不行
我就没试
呵呵
可以就简单了
直接拦截截WM_GETTEXT就ok了

[pigsanddogs]

getwindowtext 可以跨进程. 请做个例子确认.
spy++就是用getwindowtext的

摘自MSDN
If the target window is owned by the current process, GetWindowText causes a WM_GETTEXT message to be sent to the specified window or control. If the target window is owned by another process and has a caption, GetWindowText retrieves the window caption text. If the window does not have a caption, the return value is a null string. This behavior is by design. It allows applications to call GetWindowText without hanging if the process that owns the target window is hung. However, if the target window is hung and it belongs to the calling application, GetWindowText will hang the calling application.

To retrieve the text of a control in another process, send a WM_GETTEXT message directly instead of calling GetWindowText.

[pigsanddogs]

form


Option Explicit
Private Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" (ByVal hWnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long
Private Const GWL_WNDPROC = (-4)


Private Sub Form_Load()
old = SetWindowLong(Text1.hWnd, GWL_WNDPROC, AddressOf newfunc)
End Sub

Private Sub Form_Unload(Cancel As Integer)
Call SetWindowLong(Text1.hWnd, GWL_WNDPROC, old)
End Sub


module:

Option Explicit

Public old As Long
Private Declare Function CallWindowProc Lib "user32" Alias "CallWindowProcA" (ByVal lpPrevWndFunc As Long, ByVal hWnd As Long, ByVal Msg As Long, ByVal wParam As Long, ByVal lParam As Long) As Long

Public Function newfunc(ByVal hWnd As Long, ByVal umsg As Long, ByVal wParam As Long, ByVal lParam As Long) As Long
If umsg = &HD Then
Debug.Print hWnd, wParam, lParam
newfunc = 0
Exit Function
ElseIf umsg = 1997 Then
Debug.Print 1997
End If
newfunc = CallWindowProc(old, hWnd, umsg, wParam, lParam)
End Function

[pigsanddogs]

噢, 上面的1997是我测试用的你可以删除
GetWindowText是少数几个可以跨进程的函数之1
多个test可以分别
Private Sub Form_Load()
old = SetWindowLong(Text1.hWnd, GWL_WNDPROC, AddressOf newfunc)
old = SetWindowLong(Text2.hWnd, GWL_WNDPROC, AddressOf newfunc)
End Sub

Private Sub Form_Unload(Cancel As Integer)
Call SetWindowLong(Text1.hWnd, GWL_WNDPROC, old)
Call SetWindowLong(Text2.hWnd, GWL_WNDPROC, old)

End Sub

sendmessage是同步模式, 如果对方进程挂起,那么他会死锁
getwindowtext是为了解决这个问题设计的函数, 他是从系统中取到的
windows管理text分2中模式, 自动和系统.
只有系统模式才可以通过getwindowtext得到,否则需要用wm_gettext
一般系统的, 还有一些编译语言的, 都属于系统模式
推荐一个文章
http://blogs.msdn.com/oldnewthing/archive/2003/08/21/54675.aspx

[province_]

To retrieve the text of a control in another process, send a WM_GETTEXT message directly instead of calling GetWindowText.

不用再多说了，反正我们全是看MSDN的，跨进程取EDIT的内容上面有权威解释了。

[boywang]

用label控件代替textbox，再写个label的输入函数。

[leongwong]

关注！

[一笑拔剑]

用钩子hook一下
呵呵

[happy_sea]

API拦截，不过俺不会。。。 -_-!
一楼的朋友的方法也不错

[pigsanddogs]

To retrieve the text of a control in another process, send a WM_GETTEXT message directly instead of calling GetWindowText.

这只是ms的一种建议.
但为什么要这么做, 在msdn上并没有说清楚
参考上面那个文章
http://blogs.msdn.com/oldnewthing/archive/2003/08/21/54675.aspx
因为在非系统class模式下, 用GetWindowText是取不到数据的.
但vb的控件不是, ms的标准控件也不是. 所以没关系.

一般跨进程的sendmessage取的数据都是dword, char *都不能跨进程.
关于GetWindowText能跨进程, ms是这样解释的, 应该他使用的太频繁了.
所以就让他跨进程. (sysenter调用)
其他的取buf的message则需要dll inject来获取.
恩,dll inject,spy++也是这么做的.

[quwuzhong]

有没有人会用api拦截呀?
一楼的朋友方法虽然可以,但是我的程序文本框很多,而且对他的操作也很多,能不能不换控件,用api函数拦截一下呀?
各位朋友,希望不吝赐教呀,我相信csdn的朋友们一定不会见死不救的!
兄弟敬等佳音!!!

[quwuzhong]

我顶!!!!!

[quwuzhong]

我顶!!!

[province_]

WM_GETTEXT消息似乎拦截不了，存疑。

[quwuzhong]

啊,那我可惨了呀,不全栏住,变成返回值为空就行,有没有办法,帮忙呀!

[quwuzhong]

csdn的高手都哪去了,帮帮小弟呀!!!
难道真的没有高手了吗?

[mmcgzs]

让你的文本框 “聪明” 一点

http://blog.csdn.net/mmcgzs/archive/2004/02/04/20259.aspx

[quwuzhong]

谢谢楼上的各位朋友，问题已经解决，马上给分！！！