解决办法,如下例:
var
lIndex: Integer;
lOperatorFuncItem: TOperatorFuncItem;
begin
if TSystemCore.Operator.FuncItems.Find('fds', lIndex) then
begin
lOperatorFuncItem := TSystemCore.Operator.FuncItems[lIndex];
if lOperatorFuncItem.ProcURL.URL <> '' then
Dialogs.ShowMessage('是流程的入口功能')
else
Dialogs.ShowMessage('是一般功能');
end
else
Dialogs.ShowMessage('是流程中的环节');