[Ildar-tsr]

Код:

procedure TForm1.Button1Click(Sender: TObject);
begin
  Form2:= TForm2.Create(Application);
  Form2.Show;
  Self.Destroy;
end;
...
procedure TForm2.Button1Click(Sender: TObject);
begin
  Form1:= TForm1.Create(Application);
  Form1.Show;
  Self.Destroy;
end;

Но вообще так не делается. По крайней мере с главной формой.