代码调用功能时错误，**

huixiangtao

你好请问为什么  SystemCore.TSystemCore.FuncManager.RunFunc('Biz:\BUSINESSFAQ\CTJDYCYWGN.Func', '');这句出错呢？我的x3是3002
信息[错误]Biz:\BUSINESSFAQ\YWGN\DMDYZDGNYWGN.FUNC.DIR\MAINFORM.FORM.PAS(39, 38): 没有匹配的方法

procedure TMAINFORM.btnRunFuncClick(Sender: TObject);
begin
  SystemCore.TSystemCore.FuncManager.RunFunc('Biz:\BUSINESSFAQ\CTJDYCYWGN.Func', '');
end;

lixy

{ 运行功能 }
    function RunFunc(AContext: TContext; const AUniqueID, AFuncURL, AParams: string; BeforeRunFunc: TFuncNotifyEvent; Modal: Boolean): TFunc; overload;
    procedure RunFunc(AContext: TContext; const AUniqueID, AFuncURL, AParams: string; UseUI: Boolean; BeforeRunFunc: TFuncNotifyEvent; Modal: Boolean); overload;

huixiangtao

调用功能和调用窗体的区别是什么呢？我指比如UPS巡检功能，我调用此功能,和调用UPS巡检功能上的主窗体，看上去效果是一样的呀。我开始还以为调用功能会新启动一个ups巡检的流程？(功能是流程的启动功能)
调用功能代码：
procedure TMZXJGZ.Button1Click(Sender: TObject);
var
  lBizClassURL:TBizClassURL;
  lFunc:TFunc;

begin
  lBizClassURL:=TBizClassURL.Create;
  try    lBizClassURL.BizURL.URL:='Biz:\SCGATXXGLPT\ZBXT\UPSXTYWGN.Func';
    lFunc:=Context.GetBizObject(lBizClassURL) as TFunc;
    lFunc.Run('');
   lFunc.MainForm.Show;
  finally
    lBizClassURL.Free;
  end;
end;
调用用窗体：
procedure TMZXJGZ.bt_UPSClick(Sender: TObject);
var
//tWindow:UPSXJGN.TUPSWINDOWS; //UPS
  lURL : TBizClassURL;
lForm:TForm;
begin
//  tWindow:=UPSXJGN.TUPSWINDOWS.Create(Self.Context);
//  tWindow.Show;
   lURL  := TBizClassURL.Create; //放在缓冲池中,不用free
   lURL.BizURL.URL := 'Biz:\SCGATXXGLPT\ZBXT\UPSXJGN.Func\UPSWindows.Form';
   lForm := Context.GetBizObject(lURL)  as TForm;
   lForm.ShowModal;

end;

lixy

调用窗体不会启动流程。

huixiangtao

我有一个周巡检主窗体，主窗体上有ups巡检按钮，我希望张三登录后单击按钮后，启动流程。但是使用上面调用功能代码，好象并没有启动流程(我指在张三的待办任务上没有见到)。启动流程的任务执行者是谁呀，好象在调用功能的代码上没有，我希望就是巡检人张三。请问还要做什么工作呢？
thanks

lixy

那在论坛里查找  代码启动流程的帖子。