{
MDIChildCount, MDIChildren, Close example
The following code closes all the MDI children of Form1.
}
var
  I: Integer;
begin
  with Form1 do
    for I := MDIChildCount-1 downto 0 do
      MDIChildren[I].Close;
end; 
