pregunta sobre forms

[quake2420]

Hola amigos tengo la siguiente duda:
Tengo diseñados 2 forms, el cual uno es principal y el otro es el secundario, todo en forma modal no mdi.
Tengo diseñado un botón en el form principal que cuando sea pulsado me muestre el form secundario y me oculte el principal o me lo desactive.
De la forma que lo tengo diseñado me muestra las 2 ventanas, aqui os muestro el codigo:

procedure TForm1.Button1Click(Sender: TObject);
var
vform1:TForm1;
vform2:TForm2;
begin
form1:=TForm1.Create(self);
vform2:=TForm2.Create(self);
vform1.Hide;
vform1.close;
vform2.showmodal;

end;

Gracias por vuestra ayuda

Alberto