远程数据模板中动态创建的Provider无法访问的问题

2007-03-02 09:44:39 207 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

chinazxy2008 墨衍会员 · AI 创作全网分发关注 + 加入社区

【用户画像】用户画像简介、用户画像的架构、搭建用户画像管理平台数据仓库是大数据体系的基石，用户画像是建立在数仓之上的一种应用，类似的应用还有商业智能，推荐系统等。用户画像，英文: User Profile，( 也有少数称： User Portrait 或User Persona)。一句话概念就是将用户信息标签化（Tag或者Label），以用户为中心，将各种各样的标签对应到其身上，一般表现为《人 – 标签 – 标签值》。阅读详情

全局区声明临时变量
public
testPro : TDataSetProvider;
testQr : TQuery;
动态创建Provider并注册:

function TTest.sFunIniProvider(Name: string): Boolean;
begin
if FindComponent('dsp'+Name) = nil then
begin
if FindComponent('qr'+Name) = nil then
begin
try
testQr := TQuery.Create(Self);
except
result := false;
Exit;
End;
testQr.Name := 'qr'+Name;
testQr.DatabaseName := 'hnjtBase';
testQr.SQL.Text := Uppercase('select * from zxy_TestM');
end;
try
testPro := TDataSetProvider.Create(Self);
except
result := false;
Exit;
End;
testPro.Name := 'dsptestM';
testPro.DataSet := testQr;
sTableName := 'zxy_testM';
sTableField := 'No';
testPro.BeforeGetRecords := dspBeforeGetRecords;
testPro.Exported := true;
testPro.Constraints := true;
Self.RegisterProvider(testPro);
end;

Result := True;
end;

但客户端引用时不存在动态创建的Provider,报错：Provider not exported

在创建方法中写入输出所有对象代码时能输出动态创建的Provider.

但在退出创建方法后,在其它地方测试时没有动态创建的Provider.只有表态创建的那些对象.

请各位高手指教

...全文