得到程序句柄后，如何得到窗体中某广本框内的文字(50分)

如题!另 广本框的句柄如何得到？

您想做什麽？

我想得到另一个指定程序中的密码啊什么的

查看带"*"的密码<br>procedure TForm1.TimerTimer(Sender: TObject);<br>var<br>&nbsp; Pos: TPoint;<br>&nbsp; Handle: HWND;<br>&nbsp; Buf: array[0..1024] of Char;<br>&nbsp; passmark:Integer;<br>begin<br>&nbsp; GetCursorPos(Pos);<br>&nbsp; Handle := WindowFromPoint(Pos);<br>&nbsp; GetClassName(Handle, Buf, 1024);<br>&nbsp; passmark:=sendmessage(Handle,em_getpasswordchar,0,0);<br>&nbsp; if passmark&lt;&gt;0 then<br>&nbsp; &nbsp; begin<br>&nbsp; &nbsp; &nbsp; postmessage(Handle,em_setpasswordchar,0,0);<br>&nbsp; &nbsp; &nbsp; SendMessage(Handle, WM_GETTEXT, 1024, Integer(@Buf));<br>&nbsp; &nbsp; &nbsp; postmessage(Handle,em_setpasswordchar,wparam(ord('*')),0);<br>&nbsp; &nbsp; end<br>&nbsp; else<br>&nbsp; &nbsp; SendMessage(Handle, WM_GETTEXT, 1024, Integer(@buf));<br>&nbsp; TextEdit.Text := Buf;<br>end;

楼上的，你给的代码需要指上去才能取得，有没有不要鼠标指上去就能取得　的方法?

getfocus() &nbsp;<br>获得焦点所在的句柄