这个问题可以解决 后面的问题是 我们版本的工作台是CustomDesktopFunc 在这个工作台功能上不存在Biz:\COLLABORATION\TASKCENTERINFO.INFO业务信息 如果手动增加一个信息代理 指向 任务/任务中心信息
然后用代码 if SysUtils.SameText(cTaskCenterURL, (lContext.Children.Owner as TInfo).BizClassURL.BizURL.URL) then
begin
lBizObject := lContext.Children.Owner;
//刷新数据集
if (lBizObject as TInfo).DataSetByID('TaskIndex').Active then
(lBizObject as TInfo).DataSetByID('TaskIndex').Refresh;
刷新的话 (lBizObject as TInfo).DataSetByID('TaskIndex')数据集始终是关闭状态的 刷新执行不到
如果再判断之前增加 (lBizObject as TInfo).DataSetByID('TaskIndex').Open 强制打开 会有很慢的反应 但是刷新还是没有执行成功 待办任务列表没有被刷新