Problema con pantalla de password (ventana modal)

[Durbed]

Despues de mirame varios hilos del foro no doy con la solucion al problema, el código que uso es el siguiente en el dpr:

 //Creo la ventana modal de la contraseña
   FLogin := TFLogin.Create(Application);
   Respuesta := FLogin.ShowModal;
   if Respuesta = mrOK then
 	begin
 	  Application.CreateForm(TForm1, Form1);
 	  Application.Run;
    end;

y en el boton Ok del form de la contraseña tengo esto:

 procedure TFLogin.BOKClick(Sender: TObject);
 begin
   //comparo el nombre de usuario y la contraseña
   ModalResult := mrok;
 end;
 
 procedure TFLogin.FormClose(Sender: TObject; var Action: TCloseAction);
 begin
   If ModalResult <> mrOk Then
 	close;
 	//ModalResult := mrAbort;
 end;

El problema que tengo, es que cuando le doy al Ok (se supone que los datos son correctos y debe iniciar la aplicacion), funciona bien, pero si cierro del aspa, me salen errores, aunque cierra la aplicacion.

Como lo puedo arreglar, para que no salgan esos errores, creo que tendria que liberar o cancelar la ejecucion, pero no encuentro el procedimiento adecuado que creo que seria algo como Application.Close;