dmdefault.dpr

来自「Delphi三层原代码掩饰及补丁」· DPR 代码 · 共 29 行

library dmDefault;

uses
  SysUtils,
  Classes,
  swModuleIndex in '..\Common\swModuleIndex.pas',
  dmBaseModule in '..\Common\dmBaseModule.pas',
  dmBaseModuleImp in 'dmBaseModuleImp.pas',
  dmDefaultModule in 'dmDefaultModule.pas';

{$R *.res}

function CreateDataModule(const BaseService: IBaseService): IBaseDataModule; stdcall;
begin
  Result := TdmDefault.Create(BaseService);
end;

function CreateDataModuleInfo: IDataModuleInfo; stdcall;
begin
  Result := TdmDefaultInfo.Create;
end;

exports
  CreateDataModule, CreateDataModuleInfo;

begin
end.