euro2000.dpr

基于OOP设计的一套较好的ERP系统

program euro2000;

uses
  Forms,
  classes,
  dbtables,
  Umenu in 'Umenu.pas' {menu_form},
  ana_mod in 'ana_mod.pas' {ModuloDatiAnagrafiche: TDataModule},
  ana_imballi_u in 'ana_imballi_u.pas' {ana_imballi},
  ana_catmer in 'ana_catmer.pas' {ana_catmer_form},
  ana_marche_u in 'ana_marche_u.pas' {Ana_marche_form},
  ana_tipart_u in 'ana_tipart_u.pas' {ana_tipart_form},
  ana_banche_u in 'ana_banche_u.pas' {ana_banche_form},
  ana_iva_u in 'ana_iva_u.pas' {Ana_iva_form},
  ana_dep_u in 'ana_dep_u.pas' {Ana_dep_form},
  ana_grusog_u in 'ana_grusog_u.pas' {Ana_gru_sog_form},
  ana_modpag_u in 'ana_modpag_u.pas' {Ana_modpag_form},
  ana_tipidoc_u in 'ana_tipidoc_u.pas' {Ana_tipidoc_form},
  ana_numera_u in 'ana_numera_u.pas' {ana_numeratori_form},
  ana_causali_u in 'ana_causali_u.pas' {Ana_causali_form},
  ricerca_u in 'ricerca_u.pas' {lookup_form},
  defaults_u in 'defaults_u.pas' {Defaults_form},
  ana_conti_u in 'ana_conti_u.pas' {ana_conti_form},
  ana_sog_u in 'ana_sog_u.pas' {Ana_Soggetti_form},
  ana_tipisog_u in 'ana_tipisog_u.pas' {Ana_tipisog_form},
  ana_zone_u in 'ana_zone_u.pas' {ana_zone_form},
  ana_agenti_u in 'ana_agenti_u.pas' {Ana_agenti_form},
  ana_listini_u in 'ana_listini_u.pas' {Ana_listini_form},
  ana_articoli_u in 'ana_articoli_u.pas' {Ana_articoli_form},
  ana_varianti_u in 'ana_varianti_u.pas' {Ana_varianti_form},
  ana_stagio in 'ana_stagio.pas' {ana_stagio_form},
  Doc_mod in 'Doc_mod.pas' {ModuloDatiDocumenti: TDataModule},
  ana_vettori_u in 'ana_vettori_u.pas' {ana_vettori_form},
  doc_wiz_u in 'doc_wiz_u.pas' {Doc_wiz_form},
  Ucalend in 'Ucalend.pas' {Calendario_form},
  ana_catmer_dett_u in 'ana_catmer_dett_u.pas' {Ana_catmer_dett_form},
  ana_ubicazioni_u in 'ana_ubicazioni_u.pas' {Ana_ubicazioni_form},
  rica_art_u_fornit in 'rica_art_u_fornit.pas' {Ricerca_articoli},
  etichette_u in 'etichette_u.pas' {Stampa_etichette},
  giacenza_u in 'giacenza_u.pas' {Giacenza_form},
  Ucerca in 'Ucerca.pas' {Cerca_form},
  Uelenco in 'Uelenco.pas' {elenco_form},
  uloader in 'uloader.pas' {Loader},
  scheda_sog in 'scheda_sog.pas' {Scheda_soggetto},
  scade_mod in 'scade_mod.pas' {ModuloDatiScadenziario: TDataModule},
  U_scadenziario_form in 'U_scadenziario_form.pas' {Scadenziario_form},
  u_doc_manager in 'u_doc_manager.pas' {Doc_manager},
  u_griglia_varianti in 'u_griglia_varianti.pas' {Griglia_varianti},
  U_importQDZ in 'U_importQDZ.pas' {Quick_Wiz},
  selezionadir in '..\librerie\selezionadir.pas' {Seleziona_directory},
  RibaWizard_u in 'RibaWizard_u.pas' {RibaWizard_Form},
  DiscoRb_u in 'DiscoRb_u.pas' {DiscoRb_Form},
  Intesta_u in 'Intesta_u.pas' {Intesta_form},
  StoricoRb_u in 'StoricoRb_u.pas' {StoricoRb_Form},
  stp_Riba_u in 'stp_Riba_u.pas' {StpRiba_Form},
  menu_tools in 'menu_tools.pas' {MenuConfig},
  statistiche_u in 'statistiche_u.pas' {Statistiche},
  display_processo in '..\librerie\display_processo.pas' {ProcDisplay},
  registra in 'registra.pas' {Registra_Dlg},
  about in 'about.pas' {AboutBox},
  gestModExt in 'gestModExt.pas',
  pagamenti_u in 'pagamenti_u.pas' {Pagamenti_form},
  pnota_u in 'pnota_u.pas' {Primanota},
  nuovo_articolo_u in 'nuovo_articolo_u.pas' {Nuovo_articolo_form},
  nuovo_soggetto_u in 'nuovo_soggetto_u.pas' {Nuovo_soggetto_form},
  u_request in 'u_request.pas' {Request_form},
  seleziona_Documenti_u in 'seleziona_Documenti_u.pas' {Seleziona_doc_form},
  intestazione_u in 'intestazione_u.pas' {Intestazione_form},
  u_editdescrizione in 'u_editdescrizione.pas' {EditDescrizione_form},
  ana_cat_rit_u in 'ana_cat_rit_u.pas' {ana_catrit_form},
  u_ritenute in 'u_ritenute.pas' {Ritenute_form},
  importart in 'importart.pas' {Import_Articoli},
  u_StoricoPrezzi in 'u_StoricoPrezzi.pas' {StoriaPrezzi_form},
  u_tabIVA in 'u_tabIVA.pas' {TabelleIVA_form},
  Enquiry_Pnota_U in 'Enquiry_Pnota_U.pas' {EnquiryPnota_form},
  Prezzi_fornitore in 'Prezzi_fornitore.pas' {Prezzi_fornitore_form},
  Ric_banche in 'Ric_banche.pas' {Banche_LookUp},
  impostazioniDoc in 'impostazioniDoc.pas' {ImpostazioniDocumento_form},
  Uelbanca in 'Uelbanca.pas' {ElBnc_Form},
  OkCancl1 in '..\..\PROGRAMMI\BORLAND\DELPHI4\OBJREPOS\OKCANCL1.pas' {OKBottomDlg},
  plugIn_u in 'plugIn_u.pas' {PlugIn_Form},
  plug_doc_gen in 'plug_doc_gen.pas' {Documenti_Generati_form},
  note_scadenziario in 'note_scadenziario.pas' {note_scade_form},
  note_articoli_u in 'note_articoli_u.pas' {Articoli_note_form},
  mail_doc_impostazioni_u in 'mail_doc_impostazioni_u.pas' {Mail_doc_impostazioni_form},
  mail_doc_invia_U in 'mail_doc_invia_U.pas' {Mail_doc_invia_form},
  ana_compat_u in 'ana_compat_u.pas' {ana_compat_form},
  associa_U in 'associa_U.pas' {Associa_articoli_form},
  id_form_U in 'id_form_U.pas' {Imposta_ID_Form},
  U_gobbo in 'U_gobbo.pas' {Tips_form};

{$R *.RES}
begin
  Application.Initialize;

  Loader := Tloader.Create(Application);
  Loader.Show;
  Loader.Update;
  If Loader.Tag < 0 then
   begin
    loader.Close ;
    loader.free ;
    halt ;
   end ;

  Application.Title := 'MOSAICO';
  Loader.Status.Caption := 'Inizializzazione motore Anagrafiche...' ;
  Loader.Status.Update ;
  Application.CreateForm(TModuloDatiAnagrafiche, ModuloDatiAnagrafiche);
  Loader.Status.Caption := 'Inizializzazione motore documenti...' ;
  Loader.Status.Update ;
  Application.CreateForm(TModuloDatiDocumenti, ModuloDatiDocumenti);
  Loader.Status.Caption := 'Inizializzazione motore scadenziario...' ;
  Loader.Status.Update ;
  Application.CreateForm(TModuloDatiScadenziario, ModuloDatiScadenziario);
  Loader.Status.Caption := 'Inizializzazione moduli di supporto...' ;
  Loader.Status.Update ;
  Application.CreateForm(Tmenu_form, menu_form);
  Application.CreateForm(Tlookup_form, lookup_form);
  Application.CreateForm(TCalendario_form, Calendario_form);
  Application.CreateForm(TCerca_form, Cerca_form);
  Application.CreateForm(Telenco_form, elenco_form);
  Loader.Status.Caption := 'Inizializzazione articoli...' ;
  Loader.Status.Update ;
  Application.CreateForm(TRicerca_articoli, Ricerca_articoli);  
  Loader.Status.Caption := 'Pronto !' ;
  Loader.Status.Update ;
  Loader.Hide ;
  Loader.Free ;
  Application.Run;

end.