projectsystem.~dpr

来自「Delphi与sqlserver应用。适用于初学者」· ~DPR 代码 · 共 33 行

program ProjectSystem;

uses
  Windows,
  Controls,
  Forms,
  UnitSystem in 'UnitSystem.pas' {frmMain},
  UnitRegistration in '主要功能\UnitRegistration.pas' {frmRegistration},
  UnitEnquirie in '主要功能\UnitEnquirie.pas' {frmEnquirie},
  UnitReport in '主要功能\UnitReport.pas' {frmReport},
  UnitDictionary in '主要功能\UnitDictionary.pas' {frmDictionary},
  UnitLogin in 'UnitLogin.pas' {frmLogin},
  UnitKeep in '主要功能\UnitKeep.pas' {frmKeep},
  UnitData in 'UnitData.pas' {DataModule1: TDataModule};

{$R *.res}

begin

  Application.Initialize;
  Application.CreateForm(TfrmMain, frmMain);
  Application.CreateForm(TfrmRegistration, frmRegistration);
  Application.CreateForm(TfrmEnquirie, frmEnquirie);
  Application.CreateForm(TfrmReport, frmReport);
  Application.CreateForm(TfrmDictionary, frmDictionary);
  Application.CreateForm(TfrmKeep, frmKeep);
  Application.CreateForm(TDataModule1, DataModule1);
  frmLogin:=TfrmLogin.Create(Application);
  frmLogin.ShowModal;
  Application.Run;

end.