[[Lepe]]

Hay muchas formas, yo lo hago en Projects--> view Source;

Código Delphi [-]
uses
  Forms,
  Controls,
  MOVE in 'MOVE.pas' {Form1},
  Unit2 in 'Unit2.pas' {Form2};

{$R *.res}
  var login:TForm2;
begin
  Application.Initialize;
  // crear datamodules necesarios para poder acceder a las consultas
  login := TForm2.Create(nil);

  if login.ShowModal = mrok then
  begin
    Application.CreateForm(TForm1, Form1);

    Application.Run;
  end
  else
    Application.Terminate;
end.

en la ventana de login, en el evento OnClose, debes poner Action := caFree; para que se libere al cerrarlo.

La ventana login tendrá 2 botones, uno para comprobar el nombre y contraseña y el otro para salir.

Si el usuario y contraseña existe, en la ventana de login pones
login.ModalResult := mrOk y si no, lo pones a mrCancel.

Un saludo