scorems.dpr

来自「这是我做的一个大学院系成绩管理系统」· DPR 代码 · 共 53 行

program ScoreMS;

uses
  Forms,
  UnitLogin in 'UnitLogin.pas' {FMLogin},
  UnitDBConnect in 'UnitDBConnect.pas' {FMDBConnect},
  UnitDefine in 'UnitDefine.pas',
  UnitMain in 'UnitMain.pas' {FMain},
  UnitAbout in 'UnitAbout.pas' {FMAbout},
  UnitStat in 'UnitStat.pas' {FrmStat},
  UnitUsers in 'UnitUsers.pas' {FrmUsers: TFrame},
  UnitBackup in 'UnitBackup.pas' {FrmBackup: TFrame},
  UnitStuinfo in 'UnitStuinfo.pas' {FrmStuinfo: TFrame},
  UnitClass in 'UnitClass.pas' {FrmClass: TFrame},
  UnitIscore in 'UnitIscore.pas' {FrmIscore: TFrame},
  UnitMscore in 'UnitMscore.pas' {FrmMscore: TFrame},
  UnitSquery in 'UnitSquery.pas' {FrmSquery: TFrame},
  UnitCourse in 'UnitCourse.pas' {FrmCourse: TFrame},
  UnitStuRep in 'UnitStuRep.pas' {FMStuRep},
  UnitStuScoreRpt in 'UnitStuScoreRpt.pas' {FMStuScoreRpt},
  UnitHelp in 'UnitHelp.pas' {FMHelp},
  UnitStatRpt in 'UnitStatRpt.pas' {FMStatRpt},
  UnitStuInput in 'UnitStuInput.pas' {FMStuInput},
  UnitClassInput in 'UnitClassInput.pas' {FMClassInput},
  UnitCourseInput in 'UnitCourseInput.pas' {FMCourseInput},
  UnitIScoreInput in 'UnitIScoreInput.pas' {FMIScoreInput},
  UnitMScoreInput in 'UnitMScoreInput.pas' {FMScoreInput},
  UnitStatQuery in 'UnitStatQuery.pas' {FMStatQuery},
  UnitIScoreChart in 'UnitIScoreChart.pas' {FMIScoreChart};

{$R *.res}

begin
  Application.Initialize;
  Application.CreateForm(TFMLogin, FMLogin);
  Application.CreateForm(TFMDBConnect, FMDBConnect);
  Application.CreateForm(TFMain, FMain);
  Application.CreateForm(TFMAbout, FMAbout);
  Application.CreateForm(TFrmStat, FrmStat);
  Application.CreateForm(TFMStuRep, FMStuRep);
  Application.CreateForm(TFMStuScoreRpt, FMStuScoreRpt);
  Application.CreateForm(TFMHelp, FMHelp);
  Application.CreateForm(TFMStatRpt, FMStatRpt);
  Application.CreateForm(TFMStuInput, FMStuInput);
  Application.CreateForm(TFMClassInput, FMClassInput);
  Application.CreateForm(TFMCourseInput, FMCourseInput);
  Application.CreateForm(TFMIScoreInput, FMIScoreInput);
  Application.CreateForm(TFMScoreInput, FMScoreInput);
  Application.CreateForm(TFMStatQuery, FMStatQuery);
  Application.CreateForm(TFMIScoreChart, FMIScoreChart);
  Application.Run;
end.