Курсовая работа: База данных предприятия

SysUtils, Classes, DB, ADODB;

type

TDataModule2 = class(TDataModule)

ADOConnection1: TADOConnection;

BookTable: TADOTable;

DataSource1: TDataSource;

BookTableDSDesigner: TAutoIncField;

BookTableDSDesigner2: TWideStringField;

BookTableDSDesigner3: TWideStringField;

BookTableDSDesigner4: TWideStringField;

BookTableDSDesigner5: TWideStringField;

BookTableDSDesigner6: TWideStringField;

BookTableDSDesigner7: TWideStringField;

BookTableDSDesigner8: TWideStringField;

BookTableDSDesigner9: TWideStringField;

BookTableDSDesigner10: TDateTimeField;

BookTableDSDesigner11: TBooleanField;

TownSourse: TDataSource;

TownTable: TADOTable;

TownTableKey1: TAutoIncField;

TownTableDSDesigner: TWideStringField;

BookTableDSDesigner12: TWideStringField;

FindQuery: TADOQuery;

FindSource: TDataSource;

FindQueryDSDesigner: TAutoIncField;

FindQueryDSDesigner2: TWideStringField;

FindQueryDSDesigner3: TWideStringField;

FindQueryDSDesigner4: TWideStringField;

FindQueryDSDesigner5: TWideStringField;