Problema con pantalla de password (ventana modal)

[Durbed]

Sigue sin funcionar bien, a ver que es lo que pasa. Este es el código que tengo en el .dpr:

 Var
   Respuesta: Integer;
 
 begin
   Application.Initialize;
   Application.CreateForm(TDMAgenda, DMAgenda);
   Application.CreateForm(TDMHacienda, DMHacienda);
   Application.CreateForm(TForm1, Form1);
   Application.CreateForm(TFLogin, FLogin);
   Application.CreateForm(TFAgenda_MDIChild, FAgenda_MDIChild);
   //Creo la ventana modal de la contraseña
   Respuesta := FLogin.ShowModal;
   if Respuesta = mrOK then
 	begin
 	  FLogin.Destroy;
 	  Application.CreateForm(TForm1, Form1);
 	  Application.Run;
 	end
   else
 	Application.Terminate;
 end.

Y el error es una violacion de acceso de memoria, que se produce despues de ejecutar Application.Terminate; En el Formulario del Login no hago nada aun, es decir que si das al OK pongo mrOK, si das a la X pongo mrAbort.

Un saludo y gracias.