⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 xj.dpr

📁 系统管理程序的源码
💻 DPR
字号:
program xj;

uses
  Forms,
  logo0 in 'logo0.pas' {logo},
  start in 'start.pas' {password},
  mydata in 'mydata.pas' {data: TDataModule},
  w_main in 'w_main.pas' {main},
  add_cjgly in 'add_cjgly.pas' {tjcjgly},
  del_cjgly in 'del_cjgly.pas' {sccjgly},
  amend_cjglykl in 'amend_cjglykl.pas' {xgcjglykl},
  add_ptgly in 'add_ptgly.pas' {tjptgly},
  del_ptgly in 'del_ptgly.pas' {scptgly},
  amend_ptglykl in 'amend_ptglykl.pas' {xgptglykl},
  w_xsxxll in 'w_xsxxll.pas' {xsxxll},
  add_xsxx in 'add_xsxx.pas' {xsxxlr},
  W_xsxxcx in 'W_xsxxcx.pas' {xsxxcx},
  w_xsxxxg in 'w_xsxxxg.pas' {xsxxxg},
  w_xsydxx in 'w_xsydxx.pas' {xsydxx},
  w_xsydxxcx in 'w_xsydxxcx.pas' {xsydxxcx},
  w_xscjll in 'w_xscjll.pas' {xscjll},
  w_xscjlr in 'w_xscjlr.pas' {xscjlr},
  w_xscjcx in 'w_xscjcx.pas' {xscjcx},
  w_xscjxg in 'w_xscjxg.pas' {xscjxg},
  w_xsbkxx in 'w_xsbkxx.pas' {xsbkxx},
  w_xsbkxxcx in 'w_xsbkxxcx.pas' {xsbkxxcx},
  w_tjbjzrs in 'w_tjbjzrs.pas' {tjbjzrs},
  W_bjrsxx in 'W_bjrsxx.pas' {bjrsxx},
  W_grchhg in 'W_grchhg.pas' {tjgrcjhg},
  w_xsgrxjbb in 'w_xsgrxjbb.pas' {xsgrxjbb},
  w_grcjhgxx in 'w_grcjhgxx.pas' {grcjhgxx},
  w_tjbjcjhg in 'w_tjbjcjhg.pas' {tjbjcjhg},
  w_bjcjhgxx in 'w_bjcjhgxx.pas' {bjcjhgxx},
  w_bkxxtj in 'w_bkxxtj.pas' {bkxxtj},
  w_bkxx in 'w_bkxx.pas' {bkxx},
  w_grxjbb in 'w_grxjbb.pas' {frxjbb},
  w_bjxjbb in 'w_bjxjbb.pas' {bjxjbb},
  w_bjxsxjbb in 'w_bjxsxjbb.pas' {bjxsxjbb},
  w_grcjbb in 'w_grcjbb.pas' {grcjbb},
  w_xsgrcjbb in 'w_xsgrcjbb.pas' {xsgrcjbb},
  w_sjzd in 'w_sjzd.pas' {sjzd},
  w_sjbf in 'w_sjbf.pas' {sjbf},
  w_about in 'w_about.pas' {about},
  w_sjhf in 'w_sjhf.pas' {sjhf},
  grcjbbxj in 'grcjbbxj.pas' {grcjbbxz};

{$R *.res}

begin
  Application.Initialize;
  Application.Title := '学生学籍';
  Application.HelpFile := '.\help.hlp';
  Application.CreateForm(Tlogo, logo);
  Application.CreateForm(Tpassword, password);
  Application.CreateForm(Tdata, data);
  Application.CreateForm(Tmain, main);
  Application.CreateForm(Ttjcjgly, tjcjgly);
  Application.CreateForm(Tsccjgly, sccjgly);
  Application.CreateForm(Txgcjglykl, xgcjglykl);
  Application.CreateForm(Ttjptgly, tjptgly);
  Application.CreateForm(Tscptgly, scptgly);
  Application.CreateForm(Txgptglykl, xgptglykl);
  Application.CreateForm(Txsxxll, xsxxll);
  Application.CreateForm(Txsxxlr, xsxxlr);
  Application.CreateForm(Txsxxcx, xsxxcx);
  Application.CreateForm(Txsxxxg, xsxxxg);
  Application.CreateForm(Txsydxx, xsydxx);
  Application.CreateForm(Txsydxxcx, xsydxxcx);
  Application.CreateForm(Txscjll, xscjll);
  Application.CreateForm(Txscjlr, xscjlr);
  Application.CreateForm(Txscjcx, xscjcx);
  Application.CreateForm(Txscjxg, xscjxg);
  Application.CreateForm(Txsbkxx, xsbkxx);
  Application.CreateForm(Txsbkxxcx, xsbkxxcx);
  Application.CreateForm(Ttjbjzrs, tjbjzrs);
  Application.CreateForm(Tbjrsxx, bjrsxx);
  Application.CreateForm(Ttjgrcjhg, tjgrcjhg);
  Application.CreateForm(Txsgrxjbb, xsgrxjbb);
  Application.CreateForm(Tgrcjhgxx, grcjhgxx);
  Application.CreateForm(Ttjbjcjhg, tjbjcjhg);
  Application.CreateForm(Tbjcjhgxx, bjcjhgxx);
  Application.CreateForm(Tbkxxtj, bkxxtj);
  Application.CreateForm(Tbkxx, bkxx);
  Application.CreateForm(Tfrxjbb, frxjbb);
  Application.CreateForm(Tbjxjbb, bjxjbb);
  Application.CreateForm(Tbjxsxjbb, bjxsxjbb);
  Application.CreateForm(Tgrcjbb, grcjbb);
  Application.CreateForm(Txsgrcjbb, xsgrcjbb);
  Application.CreateForm(Tsjzd, sjzd);
  Application.CreateForm(Tsjbf, sjbf);
  Application.CreateForm(Tabout, about);
  Application.CreateForm(Tsjhf, sjhf);
  Application.CreateForm(Tgrcjbbxz, grcjbbxz);
  Application.Run;
end.

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -