24 lines
219 B
ObjectPascal
24 lines
219 B
ObjectPascal
unit dataMod;
|
|
|
|
interface
|
|
|
|
uses
|
|
System.SysUtils, System.Classes;
|
|
|
|
type
|
|
Tdm = class(TDataModule)
|
|
private
|
|
public
|
|
end;
|
|
|
|
var
|
|
dm: Tdm;
|
|
|
|
implementation
|
|
|
|
{%CLASSGROUP 'Vcl.Controls.TControl'}
|
|
|
|
{$R *.dfm}
|
|
|
|
end.
|