登陆窗体与主窗体

Question

现在想把登陆窗体和主窗体同时显示
登陆窗体在前，主窗体在后
如何实现

Answer 1

// Form1主窗体，Form2登陆窗体，在Form1的OnActivate事件中：
procedure TForm1.FormActivate(Sender: TObject);
begin
  if Form2.ShowModal <> mrOk then begin
    Application.Terminate;
    Exit;
  end;
  Form1.BringToFront;
end;

Answer 2

在项目文件名加：Application.CreateForm(TWelcome_f, Welcome_f);
  welcome_f.Show;
  Welcome_f.Update;
  sleep(1000);
  welcome_f.Hide
  Welcome_f.Free;
  Application.CreateForm(TMain_f,Main_f);

Answer 3

忘记了一句最后：
Main_f.show;