userlogin.dpr

来自「登录用程序」· DPR 代码 · 共 16 行

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.