自窗口?  MDIChild?
var
  i: integer;
begin
  for i := 0 to self.MDIChildCount - 1 do
       MDIChildren[i].close;
end;

解决方案 »

  1.   

    不对呀,在子窗口中可以直接调用主窗口的close关闭程序的,你一定是别的地方有问题,你可以先写一个最小的例子,
    子窗口可以调用主窗口的close。
      

  2.   

    应该不会啊,如果你要在主窗口的onclose时间中关闭MDI可以用下面的程序
    mainform.onclose;
    var
    i:integer;
    begin
            for i:=mainform.MDIChildCount-1 downto 0 do
                 mainform.MDIChildren[i].release;
    end;
      

  3.   

    netlib(河外孤星)老大:应该是“在主窗口中可以直接调用子窗口的close关闭程序的,”吧。
      

  4.   

    var
      i:integer;
    begin
     for i:=MDIChildCount-1 downto 0 do
        MDIChildren[i].Close;
    end;