
(*
 Delphi Object and Component Reference
# {bmc bm18.BMP} {bmc bm9.BMP} MDIChildCount, MDIChildren, Close example
The following code closes all the MDI children of Form1.
*) 
void __fastcall TForm1::Button1Click(TObject *Sender)
{
  for(int i = MDIChildCount-1; I >= 0; i--)
    MDIChildren[i]->Close();
} 
