Files
lazarus-ccr/components/tvplanit/examples/fulldemo/bufdsdatamodule.pas
2018-06-09 09:22:33 +00:00

32 lines
330 B
ObjectPascal

unit bufdsdatamodule;
{$mode objfpc}{$H+}
interface
uses
Classes, SysUtils, FileUtil, VpBufDS;
type
{ TDemoDM }
TDemoDM = class(TDataModule)
Datastore: TVpBufDSDataStore;
private
public
// constructor Create(AOwner: TComponent); override;
end;
var
DemoDM: TDemoDM;
implementation
{$R *.lfm}
end.