outlay.~dpr

来自「一个非常不错的经费报销管理软件」· ~DPR 代码 · 共 35 行

program Outlay;

uses
  Forms,
  Uni_login in 'Uni_login.pas' {Frm_login},
  Uni_DM in 'Uni_DM.pas' {DM: TDataModule},
  Uni_Main in 'Uni_Main.pas' {Frm_main},
  Uni_User in 'Uni_User.pas' {Frm_User},
  Uni_Branchs in 'Uni_Branchs.pas' {Frm_Branchs},
  Uni_Function in 'Uni_Function.pas' {Frm_Function},
  Uni_TieinSetup in 'Uni_TieinSetup.pas' {Frm_TieinSetup},
  Uni_Tiein_Branchs in 'Uni_Tiein_Branchs.pas' {Frm_Tiein_Branchs},
  Uni_Item in 'Uni_Item.pas' {Frm_Item},
  Uni_WorkStation in 'Uni_WorkStation.pas' {Frm_WorkStation},
  Uni_Tiein_Item in 'Uni_Tiein_Item.pas' {Frm_Tiein_Item},
  Uni_Plan in 'Uni_Plan.pas' {Frm_Plan},
  Uni_Backup in 'Uni_Backup.pas' {Frm_Backup},
  Uni_OutlayPayout in 'Uni_OutlayPayout.pas' {frm_OutlayPayout},
  Uni_Branchs_rep in 'Uni_Branchs_rep.pas' {Frm_Branchs_rep},
  Uni_PurviewSetup in 'Uni_PurviewSetup.pas' {Frm_PurviewSetup},
  Uni_PasswordChange in 'Uni_PasswordChange.pas' {Frm_PasswordChange};

{$R *.res}

begin
  Application.Initialize;

  Application.Title := '经费管理';
  Application.CreateForm(TDM, DM);
  Application.CreateForm(TFrm_PasswordChange, Frm_PasswordChange);
  Frm_login:=TFrm_login.Create(Application);
  Frm_login.ShowModal;
  Application.Run;
end.