smis.dpr

大学生综合素质及诚信管理系统可以满足管理人员和高级管理员两方面管理学生综合素质及诚信信息的需要。设计充分利用Delphi7、MS SQL Server2000数据库技术的强大力量

program smis;

uses
  Forms,
  u_pass in 'u_pass.pas' {f_pass},
  u_newstu in 'u_newstu.pas' {f_newstu},
  u_change in 'u_change.pas' {f_change},
  u_reward in 'u_reward.pas' {f_reward},
  u_punish in 'u_punish.pas' {f_punish},
  U_adduser in 'U_adduser.pas' {F_user},
  U_chaxun in 'U_chaxun.pas' {f_chaxun},
  U_chaxunxianshi in 'U_chaxunxianshi.pas' {f_chaxunxianshi},
  u_main in 'u_main.pas' {f_main},
  u_addscore in 'u_addscore.pas' {f_addscore},
  u_chscore in 'u_chscore.pas' {f_chscore},
  u_qscore in 'u_qscore.pas' {f_qscore},
  u_pinfo in 'u_pinfo.pas' {f_pinfo},
  u_print in 'u_print.pas' {f_print};

{$R *.res}

begin
  Application.Initialize;
  Application.Title := '学生信息管理系统';

  Application.CreateForm(Tf_pass, f_pass);
  Application.CreateForm(Tf_newstu, f_newstu);
  Application.CreateForm(Tf_change, f_change);
  Application.CreateForm(Tf_reward, f_reward);
  Application.CreateForm(Tf_punish, f_punish);
  Application.CreateForm(Tf_user, f_user);
  Application.CreateForm(Tf_chaxun, f_chaxun);
  Application.CreateForm(Tf_chaxunxianshi, f_chaxunxianshi);
  Application.CreateForm(Tf_main, f_main);
  Application.CreateForm(Tf_addscore, f_addscore);
  Application.CreateForm(Tf_chscore, f_chscore);
  Application.CreateForm(Tf_qscore, f_qscore);
  Application.CreateForm(Tf_pinfo, f_pinfo);
  Application.CreateForm(Tf_print, f_print);
  Application.Run;
end.