什么样的函数可以找到窗口内编辑框的按钮,并对编辑框赋予指定字串 ( 积分: 100 )

  • 主题发起人 主题发起人 P_lilac
  • 开始时间 开始时间
P

P_lilac

Unregistered / Unconfirmed
GUEST, unregistred user!
&nbsp;[brown]<br> &nbsp;通过GetWindow在取得某窗口的句柄myHwnd后,可以通过什么函数找到<br> &nbsp;窗口内的如某一按钮与某编辑框的句柄。<br> &nbsp;希望给个简单例子。[/brown]
 
&nbsp;[brown]<br> &nbsp;通过GetWindow在取得某窗口的句柄myHwnd后,可以通过什么函数找到<br> &nbsp;窗口内的如某一按钮与某编辑框的句柄。<br> &nbsp;希望给个简单例子。[/brown]
 
用这几个函数就行<br>FindWindow;<br>FindWindowEx;<br>postmessage;<br>sendmessage;
 
这个应该可以解决,我明天给你作个例子。告诉我你的EMAIL
 
ddzhouqian@yahoo.com.cn
 
suizhou888@163.com
 
这个是刘麻子关于取QQ2003密码的程序 <br>可以借鉴一下<br>//取密码 写在桌面<br>procedure GetPassWord;<br>var<br> &nbsp;buffer:array[0..50] of char;<br> &nbsp;Window,Number,PassWord:Longint;<br> &nbsp;V:string;<br> &nbsp;DC:HDC;<br>begin<br>//当前激活窗体<br> &nbsp;Window:=GetForegroundWindow;<br>//约束条件 &nbsp;如果你有窗体的句柄 那么这个约束条件就没什么意义了<br>//把句柄赋值给变量Window<br> &nbsp;GetClassName(Window,buffer,10);<br> &nbsp;if buffer&amp;lt;&amp;gt;'#32770' then exit;<br> &nbsp;if FindWindowEx(Window,0,'Button','注册向导')=0 then exit;<br>//取号码和密码句柄<br> &nbsp;Number:=FindWindowEx(Window,0,'ComboBox',nil);<br> &nbsp;if Number=0 then exit;<br> &nbsp;PassWord:=FindWindowEx(Window,0,'Edit',nil);<br> &nbsp;if PassWord=0 then exit;<br>//取内容 &nbsp;写消息是$000C<br> &nbsp;SendMessage(Number, $000D, 50, Integer(@buffer));<br> &nbsp;V:='number:'+ string(buffer); &nbsp; &nbsp; &nbsp; &nbsp; <br> &nbsp;SendMessage(PassWord, $000D, 50, Integer(@buffer));<br> &nbsp;V:=V+' &nbsp;password:'+ string(buffer);<br>//写到屏幕上<br> &nbsp;DC:=GetDC(0);<br> &nbsp;TextOut(DC,100,100,Pchar(V),Length(V));<br> &nbsp;ReleaseDC(0,DC);<br>end;
 
呵呵,我看了楼上的代码,我的程序可以控制另外程序(delphi程序)上控件的所有信息。<br>但如果想实现楼主的想法,就用楼上的代码。我的程序就不发了,抱歉。
 
hxb_leiyuan:<br>  不知道可以贴出来大家学习学习吗?
 
兄弟,你先结帖。告诉我你的邮箱,我给你发个例子。
 
GetTopWindow() + GetWindow()/GetNextWindow() 也可以列举
 
多人接受答案了。
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
2K
DelphiTeacher的专栏
D
后退
顶部