unit DataModuleUnit;

interface

uses
  SysUtils, Classes, DB, ADODB;

type
  TDataModule1 = class(TDataModule)
    ADOConnection1: TADOConnection;
    BookSource: TDataSource;
    BookTable: TADOTable;
    BookTableKey1: TAutoIncField;
    BookTableDSDesigner: TWideStringField;
    BookTableDSDesigner2: TWideStringField;
    BookTableemail: TWideStringField;
    BookTableDSDesigner4: TIntegerField;
    BookTableDSDesigner5: TDateTimeField;
    TownSource: TDataSource;
    TownTable: TADOTable;
    TownTableKey1: TAutoIncField;
    TownTableDSDesigner: TWideStringField;
    BookTableTown: TStringField;
    FindQuery: TADOQuery;
    FindSource: TDataSource;
    FindQueryDSDesigner: TWideStringField;
    FindQueryDSDesigner2: TWideStringField;
    FindQueryemail: TWideStringField;
    FindQueryDSDesigner4: TIntegerField;
    FindQueryDSDesigner5: TDateTimeField;
    FindQueryTown: TStringField;
    TelephonSource: TDataSource;
    TelephonTable: TADOTable;
    TelephonTableKey1: TAutoIncField;
    TelephonTableLinkKey: TIntegerField;
    TelephonTableDSDesigner: TWideStringField;
    TelephonTableDSDesigner2: TBooleanField;
    FindQueryKey1: TAutoIncField;
    FindQueryKey12: TAutoIncField;
    FindQueryLinkKey: TIntegerField;
    FindQueryDSDesigner3: TWideStringField;
    FindQueryDSDesigner6: TBooleanField;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  DataModule1: TDataModule1;

implementation

{$R *.dfm}

end.
