datamodule.~pas

来自「delphi下 数据库图书馆管理系统的实现」· ~PAS 代码 · 共 51 行

unit DataModule;

interface

uses
  SysUtils, Classes, DB, DBTables;

type
  TDataModule1 = class(TDataModule)
    Table2: TTable;
    DataSource2: TDataSource;
    Table1: TTable;
    DataSource1: TDataSource;
    DataSource3: TDataSource;
    Table3: TTable;
    DataSource4: TDataSource;
    DataSource5: TDataSource;
    DataSource6: TDataSource;
    Table4: TTable;
    Table5: TTable;
    Table6: TTable;
    DataSource7: TDataSource;
    DataSource8: TDataSource;
    DataSource9: TDataSource;
    Table7: TTable;
    
    Table9: TTable;
    Query1: TQuery;
    Query1kcmc: TStringField;
    DataSource10: TDataSource;
    Query2: TQuery;
    DataSource11: TDataSource;
    DataSource12: TDataSource;
    Query3: TQuery;
    Database1: TDatabase;
    Table8: TTable;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  DataModule1: TDataModule1;

implementation

{$R *.dfm}

end.