ianalysis.~dpr

来自「关联规则算法的实现和表示Delphi源码」· ~DPR 代码 · 共 35 行

program iAnalysis;

uses
  Forms,
  UnitFrmMain in 'Source\UnitFrmMain.pas' {FrmMain},
  ADOMD_TLB in '..\..\..\delphi\Delphi7\Borland Delphi 7 Studio Enterprise\Imports\ADOMD_TLB.pas',
  UnitFrmYearAndCountry in 'Source\UnitFrmYearAndCountry.pas' {FrmYearAndCountry},
  UnitFrmMonthAndCountry in 'Source\UnitFrmMonthAndCountry.pas' {FrmMonthAndCountry},
  UnitFrmYearAndProduct in 'Source\UnitFrmYearAndProduct.pas' {FrmYearAndProduct},
  UnitFrmMonthAndProduct in 'Source\UnitFrmMonthAndProduct.pas' {FrmMonthAndProduct},
  UnitFrmCustomerAndCategory in 'Source\UnitFrmCustomerAndCategory.pas' {FrmCustomerAndCategory},
  UnitFrmCustomerAndProduct in 'Source\UnitFrmCustomerAndProduct.pas' {FrmCustomerAndProduct},
  UnitDM in 'Source\UnitDM.pas' {DM: TDataModule},
  UnitFrm3D in 'Source\UnitFrm3D.pas' {Frm3D},
  UnitFrm3DView in 'Source\UnitFrm3DView.pas' {Frm3DView},
  UnitFrmAssociation in 'Source\UnitFrmAssociation.pas' {FrmAssociation};

{$R *.res}

begin
  Application.Initialize;
  Application.CreateForm(TFrmMain, FrmMain);
  Application.CreateForm(TFrmYearAndCountry, FrmYearAndCountry);
  Application.CreateForm(TFrmMonthAndCountry, FrmMonthAndCountry);
  Application.CreateForm(TFrmYearAndProduct, FrmYearAndProduct);
  Application.CreateForm(TFrmMonthAndProduct, FrmMonthAndProduct);
  Application.CreateForm(TFrmCustomerAndCategory, FrmCustomerAndCategory);
  Application.CreateForm(TFrmCustomerAndProduct, FrmCustomerAndProduct);
  Application.CreateForm(TDM, DM);
  Application.CreateForm(TFrm3D, Frm3D);
  Application.CreateForm(TFrm3DView, Frm3DView);
  Application.CreateForm(TFrmAssociation, FrmAssociation);
  Application.Run;
end.