data.~pas

四川大学图书管理系统！sql+c++实现

unit Data;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, DB, ADODB, StdCtrls;

type
  TDataModule = class(TForm)
    LoginSelect: TADOQuery;
    LoginData: TDataSource;
    GroupBox1: TGroupBox;
    BookManage1: TADOQuery;
    BookManage1DS: TDataSource;
    GroupBox2: TGroupBox;
    GroupBox3: TGroupBox;
    GroupBox4: TGroupBox;
    GroupBox5: TGroupBox;
    GroupBox6: TGroupBox;
    GroupBox7: TGroupBox;
    Main: TADOQuery;
    MainDS: TDataSource;
    ManManageDS: TDataSource;
    ManManage: TADOQuery;
    BorrowManage: TADOQuery;
    UserDefine: TADOQuery;
    InfoQuery: TADOQuery;
    BorrowManageDS: TDataSource;
    UserDefineDS: TDataSource;
    InforQueryDS: TDataSource;
    BookManage2: TADOQuery;
    BookManage2DS: TDataSource;
    NewBook: TADOTable;
    LibBook: TADOTable;
    OldBook: TADOTable;
    NewBookDS: TDataSource;
    LibBookDS: TDataSource;
    OldBookDS: TDataSource;
    ManInit: TADOQuery;
    Borrow: TGroupBox;
    BorrowABCD: TADOQuery;
    BorrowABCDDS: TDataSource;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  DataModule: TDataModule;

implementation

{$R *.dfm}

end.