Hola,
Te dejo este código, sacado de la ayuda de Delphi. Sirve para cerrar las ventajas hijas, pero podrás adaptarlo a tus necesidades:
Código PHP:
var
I: Integer;
begin
with Form1 do
for I := MDIChildCount-1 downto 0 do
MDIChildren[i].Close;
end;
Saludos,