datamoduel.~pas

来自「delphi制作的图书管理系统」· ~PAS 代码 · 共 42 行

unit DataModuel;

interface

uses
  SysUtils, Classes, DB, DBTables;

type
  TDM = class(TDataModule)
    TempDSource: TDataSource;
    TempTable: TTable;
    TempQry: TQuery;
    PurchaseQry: TQuery;
    AddPurhcaserDSource: TDataSource;
    AddPurhcaserTable: TTable;
    SaleDSource: TDataSource;
    SaleTable: TTable;
    BookInfoTable: TTable;
    BookInfoDSource: TDataSource;
    SaleManageDSource: TDataSource;
    SaleManageTable: TTable;
    SaleManageQry: TQuery;
    QryDepository: TQuery;
    DSourceDepository: TDataSource;
    PurchaseAccountDSource: TDataSource;
    PurchaseAccountQry: TQuery;
    TmpPurchaseTable: TTable;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  DM: TDM;

implementation

{$R *.dfm}

end.