Добавил:
masterdos
Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз:
Предмет:
Файл:
unit Unit2;
interface
uses
SysUtils, Classes, DB, DBTables;
type
TDataModule2 = class(TDataModule)
Table1: TTable;
DataSource1: TDataSource;
private
{ Private declarations }
public
{ Public declarations }
end;
var
DataModule2: TDataModule2;
implementation
uses Unit1;
{$R *.dfm}
end.
interface
uses
SysUtils, Classes, DB, DBTables;
type
TDataModule2 = class(TDataModule)
Table1: TTable;
DataSource1: TDataSource;
private
{ Private declarations }
public
{ Public declarations }
end;
var
DataModule2: TDataModule2;
implementation
uses Unit1;
{$R *.dfm}
end.