📄 project1.dpr
字号:
program Project1;
uses
ExceptionLog,
Forms,
Unit1 in 'Unit1.pas' {MainForm},
About_frm in 'About_frm.pas' {About},
frm_klxg in 'frm_klxg.pas' {klxiugai},
U_xgkl in 'U_xgkl.pas' {qxfrm},
DataModule in 'DataModule.pas' {DM: TDataModule},
U_Common in 'U_Common.pas',
u_Logon in 'u_Logon.pas' {frmLogon},
Findfrm in 'Findfrm.pas' {Find},
uQuanXian in 'uQuanXian.pas' {frmQuanXian},
u_LuRu in 'u_LuRu.pas' {frmLuRu},
U_JBxxDelete in 'U_JBxxDelete.pas' {JiBenXinXi},
U_WeiHu in 'U_WeiHu.pas' {WeiHu},
U_XXxiugai in 'U_XXxiugai.pas' {Form2},
Windows,
DateUtils;
{$R *.res}
begin
Application.Initialize;
Application.Title := '人事工资管理信息系统';
Application.CreateForm(TMainForm, MainForm);
// Application.CreateForm(TForm2, Form2);
MainForm.E123456;
Application.ShowMainForm:=False; //
Application.CreateForm(TDM, DM); //
Application.CreateForm(TFind, Find);
frmLogon:=TfrmLogon.Create(Application); //
frmLogon.ShowModal; //
MainForm.ShowMainFromAll;
Application.CreateForm(TfrmQuanXian, frmQuanXian);
Application.CreateForm(TfrmLuRu, frmLuRu);
Application.CreateForm(TJiBenXinXi, JiBenXinXi);
Application.CreateForm(TWeiHu, WeiHu);
Application.ShowMainForm:=True;
//Application.CreateForm(TAbout, About);
//Application.CreateForm(Tklxiugai, klxiugai);
// Application.CreateForm(Tqxfrm, qxfrm);
Application.Run;
end.
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -