userlogin.dpr

登录用程序

program UserLogin;

uses
  Forms,
  u_frmMain in 'u_frmMain.pas' {frmMain},
  u_frmLogin in 'u_frmLogin.pas' {frmLogin};

{$R *.RES}

begin
  Application.Initialize;
  Application.CreateForm(TfrmMain, frmMain);
  frmLogin:=TfrmLogin.Create(Application);  //动态建立登录对话框
  Application.Run;
end.