ccgl.~dpr

来自「一个初级的条码应用管理系统,应用于DT9」· ~DPR 代码 · 共 49 行

~DPR
49
字号
program ccgl;

uses
  Forms,
  login in 'login.pas' {Formlogin},
  main in 'main.pas' {Formmain},
  supply in 'supply.pas' {Formsupply},
  pandian in 'pandian.pas' {Formpandian},
  kcyj in 'kcyj.pas' {Formkcyj},
  kehu in 'kehu.pas' {Formkehu},
  xitong in 'xitong.pas' {Formxitong},
  datamodel in 'datamodel.pas' {DataModule1: TDataModule},
  Ruku in 'Ruku.pas' {FormRuku},
  chuku in 'chuku.pas' {Formchuku},
  quhuo in 'quhuo.pas' {Formquhuo},
  Unit1 in 'Unit1.pas' {splash},
  report in 'report.pas' {Formreport},
  report2 in 'report2.pas' {Formreport2};

{$R *.res}

begin
  Application.Initialize;
  splash:=Tsplash.Create(application);
  splash.Show;
  splash.Refresh;

  Application.Title := '仓库管理系统';
  Application.CreateForm(TFormlogin, Formlogin);
  Application.CreateForm(TFormmain, Formmain);
  Application.CreateForm(TFormsupply, Formsupply);
  Application.CreateForm(TFormpandian, Formpandian);
  Application.CreateForm(TFormkcyj, Formkcyj);
  Application.CreateForm(TFormkehu, Formkehu);
  Application.CreateForm(TFormxitong, Formxitong);
  Application.CreateForm(TDataModule1, DataModule1);
  Application.CreateForm(TFormRuku, FormRuku);
  Application.CreateForm(TFormchuku, Formchuku);
  //Application.CreateForm(Tsplash, splash);

  splash.Close;
  splash.Free;
  splash:= nil;



  Application.Run;
end.

⌨️ 快捷键说明

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