Курсовой проект по РПП / UnitDM

unit UnitDM;

interface

uses
SysUtils, Classes, DB, ADODB;

type
TDM = class(TDataModule)
ADOConnection1: TADOConnection;
ADOTable1: TADOTable;
DataSource1: TDataSource;
ADOTable1DSDesigner: TWideStringField;
ADOTable1DSDesigner2: TWideStringField;
ADOTable1DSDesigner3: TWideStringField;
ADOTable1DSDesigner4: TWideStringField;
ADOTable1DSDesigner5: TWideStringField;
ADOTable1DSDesigner6: TWideStringField;
ADOTable1DSDesigner7: TIntegerField;
ADOTable1DSDesigner8: TBCDField;
QueryMagazin: TADOQuery;
DataSource2: TDataSource;
QueryOtbor: TADOQuery;
DataSource3: TDataSource;
TableLang: TADOTable;
DataSource4: TDataSource;
private
{ Private declarations }
public
{ Public declarations }
end;

var
DM: TDM;

implementation

{$R *.dfm}

end.