numbermangerp.~dpr

彩票销售系统

program NumberMangerP;

uses
  Forms,
  NumberManger in 'NumberManger.pas' {NumberMangerMain},
  login_text in 'login_text.pas' {login_txt},
  login_util in 'login_util.pas' {login_form},
  empinfset in 'empinfset.pas' {emp_set_form},
  baseinfmain in 'baseinfmain.pas' {baseinf_form},
  EmpWorkCollect in 'EmpWorkCollect.pas' {EmpWorkCollect_Form},
  EmpWorkList in 'EmpWorkList.pas' {EmpWorkList_Form},
  NumberSaleNew in 'NumberSaleNew.pas' {NumberSaleNew_form},
  OpenPrixRecord in 'OpenPrixRecord.pas' {OpenPrixRecord_form},
  emppay in 'emppay.pas' {emp_payForm},
  HardNumber in 'HardNumber.pas',
  Periodset in 'Periodset.pas' {PreadSetForm},
  usermanger in 'usermanger.pas' {UserMangerForm},
  CalmQuery in 'CalmQuery.pas' {CalmQueryForm},
  DangerDataList in 'DangerDataList.pas' {DangerDataListForm},
  OutMoney in 'OutMoney.pas' {OutMoney_from},
  OneSixPrint in 'OneSixPrint.pas' {OneSix_PrintForm},
  NumberSaleNewTwo in 'NumberSaleNewTwo.pas' {NumberSaleNewtwo_form};

{$R *.res}

begin
  Application.Initialize; 
  login_form:=tlogin_form.Create(application);
  login_form.ShowModal ;
  if login_form.ModalResult =1 then
  begin
    Application.Initialize;
    Application.CreateForm(TNumberMangerMain, NumberMangerMain);
  //Application.CreateForm(TNumberSaleNewtwo_form, NumberSaleNewtwo_form);
  //Application.CreateForm(TOneSix_PrintForm, OneSix_PrintForm);
  //Application.CreateForm(TOutMoney_from, OutMoney_from);
  //Application.CreateForm(TDangerDataListForm, DangerDataListForm);
  //Application.CreateForm(TCalmQueryForm, CalmQueryForm);
  //Application.CreateForm(TUserMangerForm, UserMangerForm);
  //Application.CreateForm(TUserManger, UserManger);
  // Application.CreateForm(TPreadSetForm, PreadSetForm);
  //Application.CreateForm(Temp_payForm, emp_payForm);
  Application.Run;
  end
  else
  begin
    application.Terminate ;
  end;
end.