datamodule.pas

来自「一个不错的图书管理系统」· PAS 代码 · 共 42 行

unit DataModule;

interface

uses
  SysUtils, Classes, DB, ADODB;

type
  TDataModule1 = class(TDataModule)
    ADOConnection: TADOConnection;
    AQ_Mange: TADOQuery;
    AQ_Back_Restore: TADOQuery;
    AT_Class: TADOTable;
    AT_Tank: TADOTable;
    AT_Borrow: TADOTable;
    AT_Return: TADOTable;
    AT_Count: TADOTable;
    DS_Manage: TDataSource;
    DS_Class: TDataSource;
    DS_Tank: TDataSource;
    DS_Borrow: TDataSource;
    DS_Return: TDataSource;
    DS_Count: TDataSource;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  DataModule1: TDataModule1;

implementation
 uses
 // Archives_Class,Archives_Tank,Archives_Manage,Borrow_Return,Archives_Config,
 IniFiles,Windows,Forms;


{$R *.dfm}

end.