起步软件技术论坛-X3

 找回密码
 立即注册
搜索
查看: 82|回复: 4

【搞定】调用业务模型下的功能报错***[请求]**

[复制链接]
发表于 2008-1-8 11:13:30 | 显示全部楼层 |阅读模式
(如题)我直接调用业务模型下的邮件功能的时候报错..是在触发该功能的时候报的错..(如图)

qq截图未命名.jpg

9.24 KB, 下载次数: 55

回复

使用道具 举报

 楼主| 发表于 2008-1-8 11:17:55 | 显示全部楼层
调用该功能的代码:procedure TYJXX.BizFormCreate(Sender: TObject);
var
  lFunc: TFunc;
  lTmpStr: string;
  lContext: TContext;
begin
    lTmpStr:='Biz:\COLLABORATION\JUSTEPMAIL.FUNC';
   lFunc:=SysTemCore.TSystemCore.FuncManager.FindRunning(lTmpStr);
  if Assigned(lFunc) then
  begin
   SystemCore.TSystemCore.FuncManager.ActivateFunc(lFunc);
   Exit;
  end;
  lContext := TContext.Create(Context.Owner, Context.Parent) ;
  lFunc:=SystemCore.TSystemCore.FuncManager.CreateFunc(lContext, lTmpStr);
  lFunc:=SystemCore.TSystemCore.FuncManager.RunFunc(Context, '', lTmpStr , '', nil, False);
  self.Free;
end;
如果去掉self.Free;就不报错...不过不能实现我的需求...(我的需求是我做了一个窗体来调用邮件功能,要实现的是被调用的功能(邮件功能),然后调用功能的窗体不显示)
回复 支持 反对

使用道具 举报

发表于 2008-1-8 11:34:42 | 显示全部楼层
不显示窗体,是功能的主窗体吗?如果是,把功能的主窗体取消不就可以了。
参考http://bbs.justep.com/forum.php?mod=viewthread&tid=19500

如果还有疑问请先他沟通一下
回复 支持 反对

使用道具 举报

 楼主| 发表于 2008-1-8 11:57:57 | 显示全部楼层
好.结帐!
回复 支持 反对

使用道具 举报

发表于 2008-1-8 12:50:48 | 显示全部楼层
ok
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

小黑屋|手机版|Justep Inc.

GMT+8, 2025-7-4 21:16 , Processed in 0.043150 second(s), 18 queries .

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表