【1000元RMB】请高手写一段代码(关于消息处理).(0分)

  • 主题发起人 主题发起人 m8858
  • 开始时间 开始时间
M

m8858

Unregistered / Unconfirmed
GUEST, unregistred user!
【1000元RMB】请[red]高手[/red]写一段代码<br>关于窗体的消息处理 对系统底层要有一定了解<br>例如<br>在目标窗体里建立一个隐形的EDIT 之后在目标窗体里输入字符后 会先输入到隐形的EDIT里之后再传给目标窗体 &nbsp;但焦点一直是在目标窗体里的,(以上是本人设想,能否实现就看各位高手了, &nbsp;谢谢)<br>联系QQ 1082 88538 &nbsp; 认证时请注明您的富翁ID &nbsp; 谢谢
 
可以说的详细一点吧
 
[:D]都没消息要求这样你的Q会爆的[:D]
 
我加你了QQ 87797301
 
顶一下~~~~~~~~~~
 
首先需要注入到目标进程<br>然后在找到目标的消息处理函数地址<br>换成自己的<br>自己的消息只读取不删除<br>然后传给原消息处理过程就行了
 
看我的网站 网站 http://bbs.8isp.cn/?u=233 上面有答案
 
to &nbsp;Mike1234567890,找不到目标窗体消息处理函数的地址呢?就是比如说目标窗体是经过处理的,应该怎么办呢?
 
看我的网站 网站 http://bbs.8isp.cn/?u=233 上面有答案
 
to 434673459, 大哥 你都玩死我了 &nbsp;我找了半天都没找到答案 <br><br><br>找了半天回来之后发现你是个做广告的,更是郁闷
 
你这样做的目的是什么要得到一个什么结果? <br>我的看法是这样的:<br>1、窗体有焦点,应该就是在窗体上捕获按键消息,这个应该不难<br>2、建立隐藏的Edit 并将这个按键消息转发给Edit 这个也难,sendmessage 就可以了。<br>3、再传给窗体,我就有些不理解了,有什么用呢? 是不是edit 这一部要对消息处理一下?
 
看来问题不简单,到目前为止还是没人能合作
 
呵呵,想做窃听程序呀[:D]
 
unit Unit1;<br><br>interface<br><br>uses<br> &nbsp;Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,<br> &nbsp;StdCtrls;<br><br>type<br> &nbsp;TForm1 = class(TForm)<br> &nbsp; &nbsp;Edit1: TEdit;<br> &nbsp; &nbsp;Edit2: TEdit;<br> &nbsp; &nbsp;procedure Edit1KeyPress(Sender: TObject; var Key: Char);<br> &nbsp; &nbsp;procedure FormShow(Sender: TObject);<br> &nbsp;private<br> &nbsp; &nbsp;{ Private declarations }<br> &nbsp;public<br> &nbsp; &nbsp;{ Public declarations }<br> &nbsp;end;<br><br>var<br> &nbsp;Form1: TForm1;<br><br>implementation<br><br>{$R *.DFM}<br><br>procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);<br>begin<br> &nbsp;if key &lt;&gt; #13 Then<br> &nbsp;begin<br> &nbsp;Edit2.Text := Edit2.Text + key;<br> &nbsp;key := #0;<br> &nbsp;end<br> &nbsp;else<br> &nbsp;Edit1.Text := Edit2.Text;<br>end;<br><br>procedure TForm1.FormShow(Sender: TObject);<br>begin<br> &nbsp;Edit1.SetFocus;<br>end;<br><br>end.
 
又是一个骗子!
 
楼上为什么说又?[:D]
 
如果是为了得到某个程序中的编辑框的输入内容,<br>这个基本上可以实现:)
 
to amli, 即使我们不合作,也请您及时更正你的话,谢谢<br><br>to CoolSlob,如果象你说的那么简单,还用花钱吗?
 

Similar threads

I
回复
0
查看
571
import
I
I
回复
0
查看
623
import
I
S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
后退
顶部