pregunta sobre forms

[__cadetill]

Y cual es la duda o lo que quieres conseguir?

Aunque el código debería ser algo así:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var
  vform2: TForm2;
begin
  vform2 := TForm2.Create(self);
  Form1.Hide;
  vform2.showmodal;
  Form1.Show;
  FreeAndNil(vform2);
end;

Más o menos, y sin coltrol de errores, eso te lo dejo a ti