delphi mdi子窗体显示和释放的问题

tryApplication.CreateForm(TFrm_Website,Frm_Website);Frm_Website.ShowModal;finallyFree... try Application.CreateForm(TFrm_Website,Frm_Website); Frm_Website.ShowModal; finally FreeAndNil(Frm_Website); end;我是这样调用的MDI子窗体,可是显示不出来,但是把FreeAndNil(Frm_Website);屏蔽掉就可以了,但是如果这样的话,岂不是不能释放MDI的子窗体了,但是如果在每个子窗体的close事件中加Action := caFree吧,窗体又太多,请教应该怎样正确合理的调用MDI子窗体。 展开
 我来答
匿名用户
2013-04-11
展开全部
调用的时候,假设MidForm是你的mid子窗体if not(CreateForm(MidForm))then
Application.CreateForm(TMidForm,MidForm);mid的关闭要这样直接在close事件里写MidForm.Destroy;就行了,这样可以反复调用,关掉也是可以重新打开~
sunshine_thq
2013-04-11 · 超过47用户采纳过TA的回答
知道小有建树答主
回答量:107
采纳率:0%
帮助的人:98.9万
展开全部
showModal方法是以模式显示窗体,MDI子窗体的显示方法一般采用show方法 。至于MDI子窗体的释放,一般都是在MDI子窗体的OnClose和OnDestroy事件分别执行Action := caFree 和 Frm_Website := nil 来进行释放。
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
帐号已注销
2013-04-11
知道答主
回答量:35
采纳率:0%
帮助的人:15.9万
展开全部
主窗体放个按钮写如下代码,同时每个子窗框的Close事件Action := caFree;
if self.MDIChildCount> 0 then self.ActiveMDIChild.Close;
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 更多回答(1)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式