我建有N个窗体,如何改变窗体的焦点? ( 积分: 50 )

rt

rt

var<br>fwnd:HWND;<br>begin<br>fwnd:=FindWindow('应用程序的类名','应用程序的标题');<br>if fwnd=0 then exit;<br>SetForegroundWindow(fwnd);<br>end;

好,帮顶<br><br><br> <br> --------签名档---------------------------<br> <br> 比肩国内顶尖源码下载站点 &nbsp;-&gt; 源码我爱你<br> <br> http://www.source520.com &nbsp; &nbsp; &nbsp; &nbsp; <br> http://www.source520.net<br><br> 80G源码电子书免费免注册下载,大量精辟技术文档库随时更新<br> ******************************************************************<br> 附:为了站点持续发展,现有本站近年来收藏的大量大型商业源码低价出售,<br> &nbsp; &nbsp;详情请进入以下链接查看:<br> &nbsp; &nbsp;http://www.source520.com/building_delphi.htm<br> &nbsp; &nbsp;<br> &nbsp; 浏览商业代码请从如下URL进入查看实物:<br> &nbsp; 1.商业源码库1: &nbsp; ftp://source520see3:browse@61.152.199.245/<br> &nbsp; 2.商业源码库2: &nbsp; ftp://source520see2:browse@61.152.199.245/