Cuando creo los formularios dinamicamente no me los muestra

[Lizette]

Hola, saludos, tengo el siguiente problema, estoy creando formularios dinamicamente, cuando cierro el formulario frmConsultar previemente creado, utilizo close(); y crea y manda llamar el siguiente formulario.. el caso es que cuando lo ejecuto, me cierra frmConsultar, pero no me muestra el frmBuscar, no sé cual sea el problema. Le calé paso a paso, y si lo cierra, si me crea y me manda llamar frmBuscar, pero cuando termina de ejecutar ese procedimiento desaparece y no se visualiza nada.

El codigo que utilizo es el siguiente:

Código Delphi [-]
procedure TfrmConsultar.BitCancelarClick(Sender: TObject);
begin
if(BitEliminar.Visible=False)and (BitEditar.Visible=False)then
begin
 if(MessageDlg('¿Desea continuar consultando pacientes?', mtConfirmation, [mbYes,mbNo], 1)=mrYes) then
  begin
   close();
   frmBuscarPaciente:=TfrmBuscarPaciente.Create(self);
   frmBuscarPaciente.Show;
  end
 else
  begin
   close();
   frmMenu.Show;
  end;
 end;

Y en el evento o close:

Código Delphi [-]
procedure TfrmConsultarPaciente.FormClose(Sender: TObject;
  var Action: TCloseAction);
begin
Action:=caFree;
end;

Gracias por sus aportaciones.