//商場管理系統單機版Ver 2.0  源程序
//本版本開始設計于2002年5月初
//作者：肖揚
//本系統除了第三方控件或源程序外，所有代碼均為作者本人獨立完成
//如果你引用了本程序中的源代碼，希望你能保留本信息
//如果你對本程序有何建議，請與作者聯系
//聯系方法：thinknet@china.com
//特別感謝：《Delphi 之葵花寶典2.7》、大富翁論壇，以及本程序中曾經（或正在）引用
//    或借鑒過的源程序代碼的作者，對未保留原作者信息的源程序的作者表示歉意！
//如果本程序中的源代碼侵犯了您的權益，請與作者聯系，將立即刪除

//本系統中的源程序只供您研究、開發個人軟件或免費軟件,
//任何商業使用均需經本系統作者同意！！！

//為了改善界面，本系統中使用到的第三方控件有：
//1、平面控件集 flatstyle
//2、XPMenu Ver1.5 (高版本不適用）
//3、圓形按鈕DsFancyButton
//向以上控件的作者表示謝意！！！

//對zypNeoForm的作者趙亦平表示感謝！！！

//如何進行有效的打印窗體設計與管理一直是本作者未解決的難題，
//本系統采用一張報表一個窗體的設計方法，結果生成了眾多的打印窗體
//如果你有好的建議或方法，希望賜教，不勝感謝

program THINKSHOP;

uses
  Forms,
  FRMMAIN in 'FRMMAIN.pas' {Frm_main},
  NEOFORM in 'NEOFORM.pas' {zypNeoForm},
  FRMABOUT in 'FRMABOUT.pas' {Frm_about},
  FRMBASS in 'FRMBASS.pas' {Frm_bass},
  FRMBASSMESSAGE in 'FRMBASSMESSAGE.pas' {Frm_bassmessage},
  BASSMESSAGE_USER in 'BASSMESSAGE_USER.pas' {Frm_bassmessage_user},
  FACE in 'FACE.pas' {Frm_face},
  FRMBASSDIALOGS in 'FRMBASSDIALOGS.pas' {Frm_bassDialogs},
  LOGO in 'LOGO.pas' {Frm_Logo},
  MYSELF in 'MYSELF.pas',
  EDIT_USER in 'EDIT_USER.pas' {Frm_edit_user},
  SETUP in 'SETUP.pas' {Frm_setup},
  FRMRIGHTSMANAGE in 'FRMRIGHTSMANAGE.pas' {Frm_rightsmanage},
  BASSMESSAGE_YWY in 'BASSMESSAGE_YWY.pas' {Frm_bassmessage_ywy},
  EDIT_YWY in 'EDIT_YWY.pas' {Frm_edit_ywy},
  BASSMESSAGE_DEPOT in 'BASSMESSAGE_DEPOT.pas' {Frm_bassmessage_depot},
  EDIT_DEPOT in 'EDIT_DEPOT.pas' {Frm_edit_depot},
  BASSMESSAGE_GOODS in 'BASSMESSAGE_GOODS.pas' {Frm_bassmessage_goods},
  EDIT_GOODS in 'EDIT_GOODS.pas' {Frm_edit_goods},
  SELECT_TEMPLET in 'SELECT_TEMPLET.pas' {Frm_select_templet},
  SELECT_GOODS in 'SELECT_GOODS.pas' {Frm_select_goods},
  MAIN_DATAINPUT in 'MAIN_DATAINPUT.pas' {Frm_main_input},
  MAIN_DEPOTGOODS in 'MAIN_DEPOTGOODS.pas' {Frm_main_depotgoods},
  MAIN_DAYSELL in 'MAIN_DAYSELL.pas' {Frm_main_daysell},
  MAIN_SCJH in 'MAIN_SCJH.pas' {Frm_main_scjh},
  MAIN_SCJHTH in 'MAIN_SCJHTH.pas' {Frm_main_scjhth},
  MAIN_SCXSTH in 'MAIN_SCXSTH.pas' {Frm_main_scxsth},
  MAIN_DEPOTJH in 'MAIN_DEPOTJH.pas' {Frm_main_depotjh},
  MAIN_DEPOTTH in 'MAIN_DEPOTTH.pas' {Frm_main_depotth},
  MAIN_QUERY in 'MAIN_QUERY.pas' {Frm_main_query},
  MAIN_QUERY_YWYXSTJ in 'MAIN_QUERY_YWYXSTJ.pas' {Frm_main_query_ywyxstj},
  PRINT_TEMP in 'PRINT_TEMP.pas' {Frm_Print_temp},
  PRINT_YWYXSTJ in 'PRINT_YWYXSTJ.pas' {Frm_print_ywyxstj},
  CHART_BASS in 'CHART_BASS.pas' {Frm_chart_bass},
  MAIN_QUERY_YWYXSMX in 'MAIN_QUERY_YWYXSMX.pas' {Frm_main_query_ywyxsmx},
  PRINT_YWYXSMX in 'PRINT_YWYXSMX.pas' {Frm_print_ywyxsmx},
  MAIN_QUERY_SCXSTJ in 'MAIN_QUERY_SCXSTJ.pas' {Frm_main_query_scxstj},
  PRINT_SCXSTJ in 'PRINT_SCXSTJ.pas' {Frm_print_scxstj},
  MAIN_QUERY_SCXSMX in 'MAIN_QUERY_SCXSMX.pas' {Frm_main_query_scxsmx},
  PRINT_SCXSMX in 'PRINT_SCXSMX.pas' {Frm_print_scxsmx},
  MAIN_QUERY_SPXSTJ in 'MAIN_QUERY_SPXSTJ.pas' {Frm_main_query_spxstj},
  PRINT_SPXSTJ in 'PRINT_SPXSTJ.pas' {Frm_print_spxstj},
  MAIN_QUERY_SPXSMX in 'MAIN_QUERY_SPXSMX.pas' {Frm_main_query_spxsmx},
  PRINT_SPXSMX in 'PRINT_SPXSMX.pas' {Frm_print_spxsmx},
  MAIN_QUERY_CKJHTJ in 'MAIN_QUERY_CKJHTJ.pas' {Frm_main_query_ckjhtj},
  PRINT_CKJHTJ in 'PRINT_CKJHTJ.pas' {Frm_print_ckjhtj},
  MAIN_QUERY_CKJHMX in 'MAIN_QUERY_CKJHMX.pas' {Frm_main_query_ckjhmx},
  PRINT_CKJHMX in 'PRINT_CKJHMX.pas' {Frm_print_ckjhmx},
  MAIN_QUERY_SCJHTJ in 'MAIN_QUERY_SCJHTJ.pas' {Frm_main_query_scjhtj},
  PRINT_SCJHTJ in 'PRINT_SCJHTJ.pas' {Frm_print_scjhtj},
  MAIN_QUERY_SCJHMX in 'MAIN_QUERY_SCJHMX.pas' {Frm_main_query_scjhmx},
  PRINT_SCJHMX in 'PRINT_SCJHMX.pas' {Frm_print_scjhmx},
  MAIN_QUERY_KCSPTJ in 'MAIN_QUERY_KCSPTJ.pas' {Frm_main_query_kcsptj},
  PRINT_LSKCCX in 'PRINT_LSKCCX.pas' {Frm_print_lskccx},
  MAIN_QUERY_LSKCCX in 'MAIN_QUERY_LSKCCX.pas' {Frm_main_query_lskccx},
  PROGRASS in 'PROGRASS.pas' {Frm_prograss},
  PRINT_KCSPTJ in 'PRINT_KCSPTJ.pas' {Frm_print_kcsptj},
  MAIN_QUERY_SPJXCMX in 'MAIN_QUERY_SPJXCMX.pas' {Frm_main_query_spjxcmx},
  PRINT_SPJXCMX in 'PRINT_SPJXCMX.pas' {Frm_print_spjxcmx},
  MAIN_QUERY_SPFB in 'MAIN_QUERY_SPFB.pas' {Frm_main_query_spfb},
  PRINT_SPFB in 'PRINT_SPFB.pas' {Frm_print_spfb},
  MAIN_QUERY_YWYGZ in 'MAIN_QUERY_YWYGZ.pas' {Frm_main_query_ywygz},
  FRMBACKUP in 'FRMBACKUP.pas' {Frm_backup},
  SELECT_DIR in 'SELECT_DIR.pas' {Frm_select_dir},
  FRMCHECKOUT in 'FRMCHECKOUT.pas' {Frm_checkout},
  FRMMESSAGE in 'FRMMESSAGE.pas' {Frm_message},
  CHART_YWYXS in 'CHART_YWYXS.pas' {Frm_chart_ywyxs},
  CHART_SCXS in 'CHART_SCXS.pas' {Frm_chart_scxs};

{$R *.res}

begin
  Application.Initialize;
  //顯示FLASH封面
  Frm_face:=TFrm_face.Create(Application);
  Frm_face.AlphaBlend :=false;
  Frm_face.Show;
  Frm_face.Update;
  application.ProcessMessages ;
  //創建主窗口
  Application.Title := '商場管理系統【單機版】';
  Application.CreateForm(TFrm_main, Frm_main);
  frm_main.Show ;
  frm_main.update;
  Frm_face.AlphaBlend :=true;
  Frm_face.Update ;
  //創建登錄窗口
  Application.CreateForm(TFrm_logo, Frm_logo);
  while frm_face.AlphaBlendValue >15 do
  begin
     frm_face.AlphaBlendValue := frm_face.AlphaBlendValue-10;
  end;
  //關閉FLASH
  frm_face.Close ;
  frm_face.Free ;
//  frm_face.Destroy ;
  //顯示登錄窗口
  Frm_logo.showmodal;
  frm_logo.free  ;
  Application.Run;
end.