【结帖】[问题]代码添加流程环节执行者导致执行者重复

dragonsoft

因为使用流程环节中定义的执行者规则很慢，所以在OnCreateFlowOutTasks用代码自己添加执行者，结果发现在弹出的流转窗体中，下一个环节的执行者会重复出现，并且弹出流转窗体很慢，跟踪发现在进入OnCreateFlowOutTasks，系统已经自动根据执行者表达式把人取出来，在流程环节中把自动计算执行者打钩去掉也不行。怎么办？

jiahaiming

可以先执行一下FlowTask.Executors.clear;

lixy

lFlowTask := Command.FlowTasks.FindFlowTask(ANextProcUnit);
  if lFlowTask <> nil then
  begin
    lFlowTask.Executors.Clear;   //删除缺省执行者
    lOrgURL := TOrgURL.Create(ADept, ARole, APerson);
    lFlowTask.Executors.Add(lOrgURL);
  end;
默认执行者范围1<>1

atiger

楼主用的哪个版本？
你在OnCreateFlowOutTasks 代码添加没有重复？对了，你应该是先情况执行者吧，可以参考用“OnCreateFlowOutTasks”搜索看看如何写的，要不把你的代码贴出来看看吧。
另外，你说弹出的窗体很慢，请问慢倒啥程度，给个具体的时间，例如5S还是10S

dragonsoft

如果用Clear的话早就解决了，就是程序在进入OnCreateFlowOutTasks之前很慢，我测试的结果都在15s左右，好像就是系统自动获取执行者的样子。请问有什么办法禁止让系统自动获取执行者呢？流程里面把执行者规则的自动计算执行者不打钩也不行。
2936版本。

dragonsoft

顶一下哦，很急的，拜托了，不然流程一提交就非常慢了！

jiahaiming

楼主，检查一下系统主窗体。
在窗体的Create事件里，注释掉这两句：
TSystemCore.FlowManager.OnCreateFlowTasks := DoOnCreateFlowTasks;
  TSystemCore.FlowManager.AfterFlowCommand := DoAfterFlowCommand;

dragonsoft

找到问题了，先结贴吧，谢谢！