project1.dpr

健身会馆会员管理,实现了部分财务管理和,报表统计功能

program Project1;

uses
  Forms,
  Unit1 in 'Unit1.pas' {MainForm},
  shouzhi in 'shouzhi.pas' {shouzhifrm},
  load in 'load.pas' {loadfrm},
  chongzhi in 'chongzhi.pas' {chongzhifrm},
  huiyuanka in 'huiyuanka.pas' {huiyuankafrm},
  qitatixing in 'qitatixing.pas' {qitatixingfrm},
  huiyuantixing in 'huiyuantixing.pas' {huiyuantixingfrm},
  HardInfo in 'HardInfo.pas',
  ElAES in 'ElAES.pas',
  AES in 'AES.pas',
  zhuce in 'zhuce.pas' {zhucefrm},
  pho in 'pho.pas' {phofrm},
  zhaopian in 'zhaopian.pas' {zhaopianfrm},
  qianxiang in 'qianxiang.pas' {qianxiangfrm};

{$R *.res}

begin
Application.Initialize;
 Application.CreateForm(TMainForm, MainForm);
  Application.CreateForm(Tchongzhifrm, chongzhifrm);
  Application.CreateForm(Thuiyuankafrm, huiyuankafrm);
  Application.CreateForm(Tqitatixingfrm, qitatixingfrm);
  Application.CreateForm(Thuiyuantixingfrm, huiyuantixingfrm);
  Application.CreateForm(Tzhucefrm, zhucefrm);
  Application.CreateForm(Tphofrm, phofrm);
  Application.CreateForm(Tzhaopianfrm, zhaopianfrm);
  Application.CreateForm(Tqianxiangfrm, qianxiangfrm);
  loadfrm:=Tloadfrm.Create(application);
  loadfrm.Show ;
  while done=0 do
    application.ProcessMessages ();
  if quanxian<>0 then
   begin
  Application.CreateForm(Tshouzhifrm, shouzhifrm);
  Application.CreateForm(Tloadfrm, loadfrm);
  Application.Run;
  end;
end.