请问建立MDI窗体后要怎样它的子窗体打开,而且能后关闭,而且只能显示一个相同的子窗体

bridge_cn 2001-07-05 09:28:45
...全文
89 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
WuHeHai 2001-07-05
  • 打赏
  • 举报
回复
注意新建子窗体时,可以遍历一下MDIChildren数组,看一下类型是否跟你要创建的窗体类型有相同。若有相同,则显示,否则新建一个子窗体。
DreamTiger 2001-07-05
  • 打赏
  • 举报
回复
只显示一个相同的子窗体:
最简单的方法:
以子窗体Form1:TForm1;为例:
使用时:
if not Assigned(Form1) then
Form1 := TForm1.Create(Self);
Form1.Show;

在TForm1的OnClose中:
Form1 := nil;
Action := caFree;

比较复杂但是比较正规的方法就先不写了,我觉得这样就够了。
Firing_Sky 2001-07-05
  • 打赏
  • 举报
回复
在工程文件里把诸如
CreateForm(tMDIChildfoem,Application)都去掉
在调用的时候用 tMDIChildfoem.Create来创建
Muf 2001-07-05
  • 打赏
  • 举报
回复
语病太多,看不懂。

5,939

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧