|

楼主 |
发表于 2008-7-26 11:44:57
|
显示全部楼层
lFlowTask.Executors.Add(TOrgURL.Create(sDeptId,'',sUserId)); if(lFlowTask <> nil)then
begin
lFlowTask.Executors.Clear();
oDataSet := TSQLDataSet(DataSource1.DataSet);
oDataSet.First();
while not oDataSet.Eof do
begin
sUserId := oDataSet.FieldByName('PFRBH').AsString;
sDeptId := oDataSet.FieldByName('PFRBMBH').AsString;
lFlowTask.Executors.Add(TOrgURL.Create(sDeptId,'',sUserId));
oDataSet.Next();
end;
end;
报错了
|
|