MDI界面中怎么把子窗口关掉?(5分)

  • 主题发起人 主题发起人 云飘飘
  • 开始时间 开始时间

云飘飘

Unregistered / Unconfirmed
GUEST, unregistred user!
一般是父窗体关掉的同时,子窗体才一并关掉
那么我想关掉打开的几个子窗体,再重新打开新的子窗体,我该怎么关掉呢
 
在子窗体的OnClose事件中添加如下代码:
begin
窗体名(如Form1):=nil;
Action:=caFree;
end;
 
关闭所有的MDI子窗口
for i:=MDIChildCount-1do
wn to 0do
begin
mdichildren.close;
end;

在每个mdi子窗口的onClose事件中
加上Action:=caFree;
意思是释放关闭,默认最小化
 
close是关不掉的
waterxbottle的方法是正确的
不知道还有没有别的什么方法没?:)
 
不会吧: CLOSE都关不掉。
 
子窗体用CLOSE是关不掉的,你可以在它的CLOSE里面写下
Action:=vaFree;
只能释放掉!!!!!!
 
在子窗体的OnClose事件中添加如下代码:
begin
Action:=caFree;
end;

窗体名(如Form1):=nil;一句不要也是可以的
 
在TForm的OnClose事件中写Action:=caFree;
 
谢谢各位 ,分值少了点,请多多包涵:)
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
I
回复
0
查看
542
import
I
后退
顶部