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

📄 mis2005.dpr

📁 远程抄表系统的客户端程序 安徽六安项目-客户端程序 0 开发环境 Delphi 7.0 所需控件 mxOutlookBar 数 据 库 Sybase 11.5 1 04-12-
💻 DPR
字号:
program Mis2005;

uses
  UnitDllExe in 'UnitDllExe.pas',
  Forms,
  UnitLogin in 'UnitLogin.pas'    {FormLogin},
  UnitSplash in 'UnitSplash.pas'  {FormSplash},
  UnitMain in 'UnitMain.pas'      {FormMain},
  UnitMyModule in 'UnitMyModule.pas'       {MyModule: TDataModule},
  UnitBasic1 in 'UnitBasic1.pas'           {FormBasic1},
  UnitBasic2 in 'UnitBasic2.pas'           {FormBasic2},
  UnitBasic3 in 'UnitBasic3.pas'           {FormBasic3},
  UnitBianTai in 'UnitBianTai.pas'         {FormBianTai},
  UnitLine in 'UnitLine.pas'               {FormLine},
  UnitBianTaiSeek in 'UnitBianTaiSeek.pas' {FormBianTaiSeek},
  UnitOrder0 in 'UnitOrder0.pas' {FormOrder0},
  UnitOrder1 in 'UnitOrder1.pas' {FormOrder1},
  UnitOrder2 in 'UnitOrder2.pas' {FormOrder2},
  UnitOrder3 in 'UnitOrder3.pas' {FormOrder3},
  UnitOrder4 in 'UnitOrder4.pas' {FormOrder4},
  UnitLineLost0 in 'UnitLineLost0.pas' {FormLineLost0},
  UnitLineLost1 in 'UnitLineLost1.pas' {FormLineLost1},
  UnitLineLost2 in 'UnitLineLost2.pas' {FormLineLost2},
  UnitLineLost3 in 'UnitLineLost3.pas' {FormLineLost3},
  UnitOrderMsg  in 'UnitOrderMsg.pas'  {FormOrderMsg},
  UnitOrderPara in 'UnitOrderPara.pas' {FormOrderPara},
  UnitAbout in 'UnitAbout.pas'         {FormAbout},
  UnitBasic0 in 'UnitBasic0.pas'       {FormBasic0},
  UnitBianDianZ in 'UnitBianDianZ.pas' {FormBianDianZ};

{$R *.res}

begin

  Application.Initialize;

  //闪屏窗口
  FormSplash:= TFormSplash.Create(Application);
  FormSplash.Show;
  FormSplash.Update;

  Application.CreateForm(TFormMain,    FormMain);
  Application.CreateForm(TMyModule,    MyModule);
  Application.CreateForm(TFormLogin,   FormLogin);
  Application.CreateForm(TFormBasic1,  FormBasic1);
  Application.CreateForm(TFormBasic2,  FormBasic2);
  Application.CreateForm(TFormBasic3,  FormBasic3);
  Application.CreateForm(TFormBianTai, FormBianTai);
  Application.CreateForm(TFormLine,    FormLine);
  Application.CreateForm(TFormBianTaiSeek, FormBianTaiSeek);
  Application.CreateForm(TFormOrder0, FormOrder0);
  Application.CreateForm(TFormOrder1, FormOrder1);
  Application.CreateForm(TFormOrder2, FormOrder2);
  Application.CreateForm(TFormOrder3, FormOrder3);
  Application.CreateForm(TFormOrder4, FormOrder4);
  Application.CreateForm(TFormLineLost0, FormLineLost0);
  Application.CreateForm(TFormLineLost1, FormLineLost1);
  Application.CreateForm(TFormLineLost2, FormLineLost2);
  Application.CreateForm(TFormLineLost3, FormLineLost3);
  Application.CreateForm(TFormOrderMsg,  FormOrderMsg);
  Application.CreateForm(TFormOrderPara, FormOrderPara);
  Application.CreateForm(TFormAbout,     FormAbout);
  Application.CreateForm(TFormBasic0,    FormBasic0);
  Application.CreateForm(TFormBianDianZ, FormBianDianZ);
  //Application.CreateForm(TFormSplash, FormSplash);
  Application.Handle := FormMain.Handle;
  //关闭闪屏界面
  FormSplash.Hide;
  FormSplash.Free;

  Application.Run;

end.

⌨️ 快捷键说明

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