【结帖】代码执行流转到后续环节**

欧诺万德

procedure TMainForm.FlowDDLRCreateFlowOutFlowTasks(…;…);
var
  lFlowTask:TFlowTask;
  lOrgURL: TOrgURL;
begin
  lFlowTask := Command.FlowTasks.FindFlowTask(ANextProcUnit);//根据任务环节查找任务
  if lFlowTask <> nil then
  begin
    lFlowTask.Executors.Clear;   //删除缺省执行者
    lOrgURL := TOrgURL.Create('XSB','XSY',ZXX' ); //部门、岗位、人员创建组织单元
    lFlowTask.Executors.Add(lOrgURL);//添加执行者
  end;
end;
用这个好象行，但会弹出流转框，流转框怎么不显示呀

zfang

屏蔽流转对话框用
Command.UserModify := False;

zfang

或者
http://bbs.justep.com/forum.php? ... A%B6%D4%BB%B0%BF%F2
2楼

欧诺万德

搞定了

zfang

好，谢谢反馈，结贴！