patrolmanmng.~dpr

delphi6.0电子寻更源程序,用来计算保安有无查抄

program PatrolmanMng;

uses
  Forms,
  windows,
  pentime in 'pentime.pas' {timeForm},
  lsxx_pas in 'lsxx_pas.pas' {lsxx_form},
  setcomm in 'setcomm.pas' {setcommForm},
  reports_DEL in 'reports_DEL.pas' {lsreportForm1},
  Splash in 'Splash.pas' {SplashForm},
  ql_data in 'ql_data.pas' {clearForm},
  xjyhsd in 'xjyhsd.pas' {xjyhsdform},
  fullreport in 'fullreport.pas' {RsltFullRep: TQuickRep},
  TerrRep in 'TerrRep.pas' {rsltTerrRep: TQuickRep},
  SerrRep in 'SerrRep.pas' {rsltSerrRep: TQuickRep},
  about in 'about.pas' {Aboutform},
  Recethr in 'Recethr.pas',
  Gvas in 'Gvas.pas',
  ReceFormM in 'ReceFormM.pas' {ReceForm},
  TestPen in 'TestPen.pas' {TestPenFORM},
  menu in 'menu.pas' {mainform},
  StatuSFM in 'StatuSFM.pas' {keysetform},
  setmode in 'setmode.pas' {setmodeForm},
  initframe in 'initframe.pas' {initframeForm},
  user_pas in 'user_pas.pas' {user},
  dm_user_pas in 'dm_user_pas.pas' {dm_user: TDataModule},
  password_unit in 'password_unit.pas' {password},
  pass_pas in 'pass_pas.pas' {pass},
  fpxl_pas in 'fpxl_pas.pas' {fpxl},
  dm_fpxl_pas in 'dm_fpxl_pas.pas' {dm_fpxl: TDataModule},
  point_pas in 'point_pas.pas' {point},
  dm_point_pas in 'dm_point_pas.pas' {dm_point: TDataModule},
  dm_worker_pas in 'dm_worker_pas.pas' {dm_worker: TDataModule},
  clsss_pas in 'clsss_pas.pas' {class_form},
  dm_class_pas in 'dm_class_pas.pas' {dm_class_form: TDataModule},
  xjysxx_report_pas in 'xjysxx_report_pas.pas' {xjysxx_report},
  dm_xjysxx_view_pas in 'dm_xjysxx_view_pas.pas' {dm_xjysxx_view: TDataModule},
  dm_yxxx_pas in 'dm_yxxx_pas.pas' {dm_yxxx_form: TDataModule},
  yxxx_pas in 'yxxx_pas.pas' {yxxx_form},
  yxxx_report_pas in 'yxxx_report_pas.pas' {yxxx_report},
  ldxx_report_pas in 'ldxx_report_pas.pas' {ldxx_report},
  lxxx_report_pas in 'lxxx_report_pas.pas' {lxxx_report},
  sjyc_report_pas in 'sjyc_report_pas.pas' {sjyc_report},
  wzxx_report_pas in 'wzxx_report_pas.pas' {wzxx_report},
  penmode_pas in 'penmode_pas.pas' {penmode},
  dm_sjbf_pas in 'dm_sjbf_pas.pas' {dm_sjbf: TDataModule},
  setmod in 'setmod.pas' {SETMODForm},
  datamodal in 'datamodal.pas' {DataModule1: TDataModule},
  xjysxx_pas in 'xjysxx_pas.pas' {sjysxx},
  information in 'information.pas' {informationForm},
  lssjll in 'lssjll.pas' {lssjllDlgform},
  yxxx_view_pas in 'yxxx_view_pas.pas' {yxxx_view},
  dm_yxxx_view_pas in 'dm_yxxx_view_pas.pas' {dm_yxxx_view: TDataModule},
  choose_pas in 'choose_pas.pas' {choose_day},
  show_thread in 'show_thread.pas',
  thread_yxxx_view in 'thread_yxxx_view.pas',
  reports2 in 'reports2.pas' {lsreportForm},
  add_point_pas in 'add_point_pas.pas' {add_point},
  point_print_pas in 'point_print_pas.pas' {point_print},
  add_worker_pas in 'add_worker_pas.pas' {add_worker},
  worker_print_pas in 'worker_print_pas.pas' {worker_print},
  add_class_pas in 'add_class_pas.pas' {add_class},
  class_print_pas in 'class_print_pas.pas' {class_print},
  click_time_pas in 'click_time_pas.pas' {click_time},
  add_user_pas in 'add_user_pas.pas' {add_user},
  settest in 'settest.pas' {settestform},
  regedit_pas in 'regedit_pas.pas',
  worker_pas in 'worker_pas.pas' {worker},
  add_pen_unit in 'add_pen_unit.pas' {add_penform},
  add_pencode_unit in 'add_pencode_unit.pas' {add_pencodeform},
  dm_pen_unit in 'dm_pen_unit.pas' {dm_penform: TDataModule},
  edit_pen_unit in 'edit_pen_unit.pas' {edit_penform},
  Async32 in 'Async32.pas';

{$R *.RES}

begin
  Application.Initialize;
  Application.Title := '巡更管理系统';
  Application.HelpFile :='\xxcl.hlp';
  Application.CreateForm(Tmainform, mainform);
  Application.CreateForm(Tdm_user, dm_user);
  Application.CreateForm(Tpassword, password);
  Application.CreateForm(Tpenmode, penmode);
  Application.CreateForm(TDataModule1, DataModule1);
  while password.tag=0 do
     password.showmodal;
   Application.Run;
end.