DELPHI盒子
!实时搜索: 盒子论坛 | 注册用户 | 修改信息 | 退出
检举帖 | 全文检索 | 关闭广告 | 捐赠
技术论坛
 用户名
 密  码
自动登陆(30天有效)
忘了密码
≡技术区≡
DELPHI技术
lazarus/fpc/Free Pascal
移动应用开发
Web应用开发
数据库专区
报表专区
网络通讯
开源项目
论坛精华贴
≡发布区≡
发布代码
发布控件
文档资料
经典工具
≡事务区≡
网站意见
盒子之家
招聘应聘
信息交换
论坛信息
最新加入: hfh9801
今日帖子: 7
在线用户: 36
导航: 论坛 -> DELPHI技术 斑竹:liumazi,sephil  
作者:
男 power_source (power) ★☆☆☆☆ -
盒子活跃会员
2004/3/16 9:34:24
标题:
各路英雄快来帮忙! 浏览:932
加入我的收藏
楼主: 在程序的主窗口中怎叛断当前哪个子窗口被激活(也就是获得焦点)?(我用的不是多文档窗体)
因为我想得到当前被激活(获得焦点)窗口的caption属性 
能否给个例程?

----------------------------------------------
我真的不会!
作者:
男 endo (燕子帝国) ★☆☆☆☆ -
盒子活跃会员
2004/3/16 10:25:04
1楼: 给每一个窗体设定一个值,写一个函数判断当前打开的是哪个窗口。
以前有看过,现在有些忘了,只记得大概方法:
例如设窗体值为:Form1的Value的值为1
Function IsFormExist(FormValue,i:Integer):Integer;
begin
  For i:=0 To FormCount Do
  Begin
    //呵呵,不好意思,真的想不起来!反正大概方法就是这样的
  End;
  Result:=i;
End;
----------------------------------------------
『惠安人才网』 www.harcw.net
作者:
男 power_source (power) ★☆☆☆☆ -
盒子活跃会员
2004/3/16 10:28:58
2楼: 谢谢1楼的大哥,还有哪位大哥会呀,给点意见!
----------------------------------------------
我真的不会!
作者:
男 xjr888 (arming) ★☆☆☆☆ -
盒子活跃会员
2004/3/16 11:06:19
3楼: 可以在 激活窗口 的 OnActive 事件中 改变主窗体的 Caption
----------------------------------------------
-
作者:
男 power_source (power) ★☆☆☆☆ -
盒子活跃会员
2004/3/16 11:33:02
4楼: 我的意思是在主窗体的状态栏动态显示当前正在操作的界面!怎样实现?
----------------------------------------------
我真的不会!
作者:
男 cyh9519 (智商65) ★☆☆☆☆ -
普通会员
2004/3/16 11:37:10
5楼: procedure TForm2.FormActivate(Sender: TObject);
begin
  frmMain.StatusBar1.Panels[0].Text:=Form2.Caption
end;
----------------------------------------------
-
作者:
男 whbchy (whb) ★☆☆☆☆ -
普通会员
2004/3/16 11:47:35
6楼: 我也是新手。
active属性不可以么?
听说可以用api遍历所有窗口getwindow.
然后取得窗口标题getwindowtext.
自己研究用吧。。我也只是听说而已。
----------------------------------------------
wang
信息
登陆以后才能回复
Copyright © 2CCC.Com 盒子论坛 v3.0.1 版权所有 页面执行70.3125毫秒 RSS