plogin3.dpr

《Delphi通用模块及典型系统开发实例导航》配套光盘第一章（数据库存储）

program pLogin3;

uses
  Forms,
  uMain in 'uMain.pas' {MainForm},
  uLogin in 'uLogin.pas' {LoginDlg};

{$R *.res}

begin
  Application.Initialize;
  if TLoginDlg.Execute then
  begin
    Application.CreateForm(TMainForm, MainForm);
  Application.Run;
  end
  else
    Application.Terminate; 
end.