如果我不用下面这段代码,就没有问题
procedure TBudget_Clear_Tb.FlowBroker1CreateFlowOutFlowTasks(Sender: TObject; Command: TFlowOutCommand);
var
lFlowTask:TFlowTask;
i:integer;
begin
for i:=0 to Command.FlowTasks.Count-1 do
begin
lFlowTask := Command.FlowTasks as TFlowTask;
lFlowTask.Subject :='预算申请-'+dsbClean.DataSet.FieldByName('CLEANER_NAME').AsString;
end;
end;
但是用了就会出现上面的情况,为什么