<< Click to Display Table of Contents >> Navigation:  Demos > 15 > Delphi > DeleakerDemoProject > udmMain.pas

unit udmMain;

 

interface

 

uses

 System.SysUtils, System.Classes, Data.DB, Datasnap.DBClient;

 

type

 TdmMain = class(TDataModule)

 cdsBiolife: TClientDataSet;

 dsBiolife: TDataSource;

 private

 { Private declarations }

 public

 { Public declarations }

 end;

 

var

 dmMain: TdmMain;

 

implementation

 

{%CLASSGROUP 'Vcl.Controls.TControl'}

 

{$R *.dfm}

 

end.