DELPHI盒子
!实时搜索: 盒子论坛 | 注册用户 | 修改信息 | 退出
检举帖 | 全文检索 | 关闭广告 | 捐赠
技术论坛
 用户名
 密  码
自动登陆(30天有效)
忘了密码
≡技术区≡
DELPHI技术
lazarus/fpc/Free Pascal
移动应用开发
Web应用开发
数据库专区
报表专区
网络通讯
开源项目
论坛精华贴
≡发布区≡
发布代码
发布控件
文档资料
经典工具
≡事务区≡
网站意见
盒子之家
招聘应聘
信息交换
论坛信息
最新加入: KfnqDuxw
今日帖子: 51
在线用户: 7
导航: 论坛 -> DELPHI技术 斑竹:liumazi,sephil  
作者:
男 msgsnd (会飞的鱼) ★☆☆☆☆ -
普通会员
2004/4/27 15:05:51
标题:
一个关于findwindow的问题 浏览:1060
加入我的收藏
楼主: 一个关于findwindow的问题
if findwindow('Tform_in','form_in')<>0 then
     begin
          showmessage('aaa!');
     end
 else
 begin
      if findwindow('Tform_buy','form_buy')<>0 then
      begin
           showmessage('bbb!');
      end;      
end;

我想使用findwindow函数判断 当form_in窗体存在是,执行showmessage('aaa!');

当form_buy窗体存在时执行showmessage('bbb!');

请问,上面代码有什么错误。

----------------------------------------------
世界上有千千万万条路,总有一条路是属于我自己的;
作者:
男 sephil (NAILY Soft) ★☆☆☆☆ -
盒子中级会员
2004/4/27 15:11:55
1楼: FindWindow第一个参数是窗口类名,第二个是窗口标题(可以不填)
if FindWindow('TForm1', 'Form1') > 0 then ....
----------------------------------------------
Copyright 2008 ? NAILY Soft

Click here to redirect to my home
Click here to redirect to my blog
作者:
男 msgsnd (会飞的鱼) ★☆☆☆☆ -
普通会员
2004/4/27 15:17:50
2楼: sephil 你好

我写的有什么问题吗,为什么在form_buy窗体存在的时候,而且form_in没有创建的情况下,它也执行 showmessage('aaa!');

什么原因

----------------------------------------------
世界上有千千万万条路,总有一条路是属于我自己的;
作者:
男 sephil (NAILY Soft) ★☆☆☆☆ -
盒子中级会员
2004/4/27 15:23:29
3楼: 你是在Delphi环境下运行的吧
Delphi在开着的时候你运行程序那么这个窗体有2份
一份是Delphi正在设计的,一份是你正在运行的程序的
嘿嘿
----------------------------------------------
Copyright 2008 ? NAILY Soft

Click here to redirect to my home
Click here to redirect to my blog
作者:
男 msgsnd (会飞的鱼) ★☆☆☆☆ -
普通会员
2004/4/27 16:09:07
4楼: 这个原因吗,我试试
----------------------------------------------
世界上有千千万万条路,总有一条路是属于我自己的;
作者:
男 msgsnd (会飞的鱼) ★☆☆☆☆ -
普通会员
2004/4/27 16:10:55
5楼: 是的,是这个原因,谢谢sephil
----------------------------------------------
世界上有千千万万条路,总有一条路是属于我自己的;
作者:
男 willing (willing) ★☆☆☆☆ -
禁用账号
2004/4/27 20:50:28
6楼: ……
被禁用帐号,帖子内容自动屏蔽!
……

----------------------------------------------
按此在新窗口浏览图片
信息
登陆以后才能回复
Copyright © 2CCC.Com 盒子论坛 v3.0.1 版权所有 页面执行93.75毫秒 RSS