czcjserver.dpr.~14~

来自「初中成绩录入系统网络版(firebird) firebird下的网络编程」· ~14~ 代码 · 共 39 行

program czcjServer;

uses
  Forms,
  unitMain in 'unitMain.pas' {fmMain},
  unitDatamodule in 'unitDatamodule.pas' {dm: TDataModule},
  SysDBAPSW in 'SysDBAPSW.pas' {fmSysDBAPSW},
  admin in 'admin.PAS',
  ChangePsw in 'ChangePsw.pas' {fmChangePsw},
  UnitStudentManager in 'UnitStudentManager.PAS',
  unitstudent in 'unitstudent.PAS',
  unitAchieve in 'unitAchieve.PAS',
  ABOUT in 'ABOUT.pas' {AboutBox},
  unitIncept in 'unitIncept.pas' {fmIncept},
  UnitClassRoom in 'UnitClassRoom.PAS',
  UnitSchoolManager in 'UnitSchoolManager.PAS',
  unitCollide in 'unitCollide.pas' {fmCollide},
  UnitBrowseAchieve in 'UnitBrowseAchieve.pas' {fmBrowseAchieve},
  UnitPrtSubject in 'UnitPrtSubject.pas' {fmPrtSubject},
  UnitProgress in 'UnitProgress.pas' {fmProgress},
  UnitPrtZkzh in 'UnitPrtZkzh.pas' {fmPrtZkzh},
  UnitPrtAch in 'UnitPrtAch.pas' {fmPrtAch},
  SchoolSetup in 'SchoolSetup.pas' {fmSchoolSetup},
  UnitDLSW in 'UnitDLSW.pas' {fmDLSW},
  unitZhaosheng in 'unitZhaosheng.pas' {fmZhaosheng},
  UnitGlobal in 'UnitGlobal.pas',
  unitSetupYear in 'unitSetupYear.pas' {fmSetupYear},
  interPret in 'interPret.PAS';

{$R *.res}

begin
  Application.Initialize;
  Application.Title := '成绩录入系统网络版(服务端)';
  Application.CreateForm(Tdm, dm);
  Application.CreateForm(TfmMain, fmMain);
  Application.Run;
end.