SOS 怎么做才能保证子窗体不关闭，

Question

就是说，在父窗体里 至少有一个字窗体不能关闭或者说特定的子窗体不被关闭保证他跟主窗体共存亡！

Answer 1

特定的子窗体不被关闭：
  在这个子窗体的CloseQuery里判断呗！
至少有一个字窗体：
  在每个子窗体的CloseQuery里判断呗！判断主窗体的MDIChildCount

Answer 2

murphy(豆豆) 说的有道理~~呵呵
可以写个功用过程
function LIMITClosechildfrm ：boolean；
begin
 result:=false;
 if mainfrm.MDIChildCount = 1 then
 result:=true;
end;
然后加到每个自窗体的closequery事件里去