studentsinformation.dpr
来自「有不足之处请指出」· DPR 代码 · 共 37 行
DPR
37 行
program studentsinformation;
uses
Forms,
mainmenu in 'mainmenu.pas' {mainmenuform},
luru_unit in 'luru_unit.pas' {luruform},
shunxudayin in 'shunxudayin.pas' {shunxudayinForm},
tongjidayin in 'tongjidayin.pas' {tongjidayinForm},
tianjiabanji in 'tianjiabanji.pas' {tianjiabanjiForm},
shanchubanji in 'shanchubanji.pas' {shanchubanjiForm},
xiugaibanji in 'xiugaibanji.pas' {xiugaibanjiForm},
Logonstudent in 'Logonstudent.pas' {LogonForm},
AboutSoft in 'AboutSoft.pas' {AboutForm},
xitongweihu in 'xitongweihu.pas' {xitongweihuForm},
chazhaoyuxiugai in 'chazhaoyuxiugai.pas' {chazhaoyuxiugaiForm},
shezhixianshixianmu in 'shezhixianshixianmu.pas' {shezhixianshixianmuForm},
xujiguanli in 'xujiguanli.pas' {xuejiguanliForm},
denglu in 'denglu.pas' {dengluForm};
{$R *.res}
begin
logonForm:=TlogonForm.Create(application);
LogonForm.Show ;
LogonForm.Update ;
Application.Initialize ;
Application.Title := '学生档案管理系统';
Application.CreateForm(Tmainmenuform, mainmenuform);
Application.CreateForm(TLogonForm, LogonForm);
Application.CreateForm(TshezhixianshixianmuForm, shezhixianshixianmuForm);
Application.CreateForm(TdengluForm, dengluForm);
LogonForm.Hide;
logonForm.Close;
logonForm.Free ;
Application.Run;
end.
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?