...
private CurrForm: TForm;
...
uses Frm1, Frm2, Frm3;

procedure ...button1.Click(..)
begin
 if CurrForm <> nil then CurrForm.Hide;
 if Form1 <> nil then Form1 := TForm1.Create(Self);
 Form1.ManualDock(panForm);  -- это главная вещь, дочит форму куда надо
 
 Form1.Align := alClient;
 Form1.Visible := True;
 CurrForm := Form1;
end;

 --и так для всех кнопок. Только формы сделай не MDIChild и убери Visible
 

procedure ...button1.Click(..)
begin
 if CurrForm <> nil then CurrForm.Hide;
 if Form1 = nil then begin
  Form1 := TForm1.Create(Self);
  Form1.ManualDock(panForm);  -- это главная вещь, дочит форму куда надо
 
  Form1.Align := alClient;
 end;
 Form1.Visible := True;
 CurrForm := Form1;
end;