有关程序框架

Question

在这个地方：
软件的Source部分，主窗体创建以前：  Application.Initialize;
  Application.Title := '营销核算会计化接口软件';
  //密码验证
  Passform := TPassform.Create(Application);
  if Passform.UserLogin('') then {就是这个地方了，呵呵}
  begin
    Application.CreateForm(TMainForm, MainForm);
    …………
    Application.Run;
  end;
  Passform.Free;

Answer 1

在这个地方：
软件的Source部分，主窗体创建以前：  Application.Initialize;
  Application.Title := 'myexe';
  //密码验证
  password := Tpassword.Create(Application);
  if password.UserLogin('') then {/add you code here}
  begin
    Application.CreateForm(TMainForm, MainForm);
    …………
    Application.Run;
  end;
  password.Free;

Answer 2

没有进入消息循环前passform能工作吗？