pro13_1.dpr

来自「SQL2000跟课件学习的源代码 分享共同学习」· DPR 代码 · 共 20 行

program Pro13_1;        // 应用程序首部

uses
  Forms,
  UnitSearch in 'UnitSearch.pas' {FormSearch},
  UnitStudent in 'UnitStudent.pas' {FormStudent},
  UnitDM in 'UnitDM.pas' {DM_Data: TDataModule};

{$R *.res} // 包含应用程序所使用的资源文件

begin
  Application.Initialize;   // 应用程序环境初始化
  Application.Title := '学校教务管理系统';
  Application.CreateForm(TFormStudent, FormStudent);
  Application.CreateForm(TFormSearch, FormSearch);
  Application.CreateForm(TDM_Data, DM_Data);
  // 建立程序主窗口
  Application.Run;  // 进入运行状态
end.