【结】FlowFinish事件没有触发？**

hero419

准备在流程结束的时候做一个query更新一下业务表数据，表示流程结束了，于是在结束前最后一步功能的窗体里做了个BeforeFlowFinish的事件，结果发现事件没有被触发。
1、这一步下面是XOR逻辑，可以选择结束流程，也可以选择其他的流转步骤。
2、我尝试了BeforeFlowFinish和AfterFlowFinish事件，均无法触发。
代码如下，谢谢。
procedure TMAINFORM.FlowBroker1BeforeFlowFinish(Sender: TObject; Command: TFlowFinishCommand);
var
  lQry: TQuery;
  lConn: TConnection;
begin
  Inherited;
  lQry := TQuery.Create(nil);
  lConn := TConnection.Create(nil);
  try
    lConn.ConnectionString := 'DATABASEURL=iz:\MASTERMIND\MASTERMIND.DATABASE';
    lConn.Transaction := FlowBroker1.FlowControl.FlowManager.Transaction;
    lQry.Connection := lConn;
    lQry.CommandText := 'Update HTFK set HTFK.SQJE=1 where HTFK.ID='''+DataSetBroker1.DataSet.FieldByName('ID').AsString+'''';;
    lQry.Execute;
  finally
    lQry.Free;
    lConn.Free;
  end;

lixy

不好意思。我这里没问题。
楼主检查一下事件是否挂上了， 代码是否写对功能。

hero419

挂上了，而且功能也没有错，我这个功能是继承的，要不要紧呢。
要不给我远程看看吧～～
.                                                                                                                                                                                           .
.                                                                                                                                                                                           .

hero419

流程图如附件所示。
1楼的过程是写在功能“策划部合同管理”的，不单单BeforeFlowFinish和AfterFlowFinish触发不了，就连BeforeFlowOut也触发不了。
于是我又将同样的BeforeFlowOut事件放到了“领导审批1”功能上，触发成功，所以我估计这个流程事件的触发和XOR逻辑有关。

.                                                                                                                                                                                .
.                                                                                                                                                                                .

lixy

我试试继承的。您稍等

hero419

QQ沟通了下，是继承的缘故，继承功能后，新建了一个窗体，没有将功能窗体指定到这个新窗体上，所以新窗体上的任何事件都无法触发。
问题解决了，结吧，谢谢。
.                                                                                                                                                                                           .
.                                                                                                                                                                                           .

lixy

谢谢 atiger

alang

1楼代码可以不写在功能里，写在流程模型这里
请参考 http://bbs.justep.com/forum.php?mod=viewthread&tid=19618 16楼