mdi子窗体问题郁闷

jwt1982 2005-08-26 02:47:59
我为了让子窗体关闭,在close的时候使用.free方式释放。

但是我在打开的时候用了not Assigned 判断,不允许重复打开。

可是问题出来了,只要打开某个子窗体后,关闭,该子窗体就不再出来了。

请问大大门都是怎么解决的?
...全文
173 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
lierq 2005-08-26
  • 打赏
  • 举报
回复
嗯,判断存在,就是判断是否为nil
zhaozhen2004 2005-08-26
  • 打赏
  • 举报
回复
if form:=nil then //if not assigned(form) then
Form:=TForm.Create(Application.MainForm);
Form.Show;

在close中:action:=cafree;
在destory中:form:=nil;
konhon 2005-08-26
  • 打赏
  • 举报
回复
子窗体关闭

OnClose事件

Action:=caFree;
Form:=nil;

打開:
if not Assigned(Form) then
Form:=TForm.Create(Application.MainForm);
Form.Show;

5,388

社区成员

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

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