【结贴】取得批任务GUID

lili7912

如何在做批任务处理时。通过代码可以得到批任务的GUID。还有就是它们之间的关系是怎样的？是怎样进行关联的。请麻烦告之。
谢谢！

zfang

参考代码

procedure TMAINFORM.FlowBroker1GetFlowOutTasks(Sender: TObject; Command: TGetTasksCommand);
var
  i: Integer;
  lTask: TTask;
begin
  //Command.UserModify :=False;
  for i:=Command.Selected.Count-1 downto 0 do
  begin
    lTask := Command.Selected as TTask;
    Dialogs.ShowMessage(lTask.GUID);
  end;
end;

lili7912

这个我试过了。不行

lili7912

得到的是全部的数据。不能得到批任务的GUID。得到的是每条记录的TIB_FLOWGUID.

zfang

抱歉，目前还没试出来 一个好方法。
明天继续。（如果没有好方法，那么还是按电话里沟通的那样，通过那个选择窗体中 进行获取并记录）

lili7912

怎么样？有没有办法得到批任务GUID

zfang

楼主，通过这样的方式去实现你的逻辑吧
procedure TMAINFORM.FlowBroker1AfterFlowOut(Sender: TObject; Command: TFlowOutCommand);
var
  i : Integer;
  lTask : TTask;
begin
  //批处理后，控制任务选择对话框中要流转的任务
  Dialogs.ShowMessage('after out');
  for i := 0 to Command.FlowControl.TaskCount - 1 do
  begin
    lTask := Command.FlowControl.TaskByIndex as TTask;
    if lTask.State = TTaskState.tsFinished then
      Dialogs.ShowMessage(lTask.FlowGUID);
  end;

lili7912

谢谢！解决了！结帖吧