[[maeyanes]]

Esto que te voy a poner no lo he probado, pero debería funcionar...

Código Delphi [-]
procedure TMDIForm.Button1OnClick(Sender: TObject);
begin
  ActiveMDIChild.Close; // Cerrar la ventana MDI Activa (la que tiene el foco)
  FNewMDIChild := TMDIChildForm.Create(Application) // Crea una nueva forma MDI
end;

Saludos...