起步软件技术论坛-X3

 找回密码
 立即注册
搜索
查看: 166|回复: 7

【结】Borland.Delphi.Windows 和RunFunc的问题

[复制链接]
发表于 2009-8-5 16:38:16 | 显示全部楼层 |阅读模式
昨天 RunFunc 函数出现的问题 原来不是参数的问题

它错误提示 没有匹配的方法   是因为 我的函数库 uses 中
有一个  Borland.Delphi.Windows  调用   但是我的函数库中其它函数还是要用到Borland.Delphi.Windows的 ,不能删除  

请问怎么解决这个冲突
回复

使用道具 举报

发表于 2009-8-5 16:42:33 | 显示全部楼层
什么意思?跟uses中引用了 Borland.Delphi.Windows   有关系吗?
我在主调用功能中加上也没报什么错误呀。
回复 支持 反对

使用道具 举报

发表于 2009-8-5 16:43:18 | 显示全部楼层
把你这个单元的代码都贴出来看看。
回复 支持 反对

使用道具 举报

发表于 2009-8-5 16:45:42 | 显示全部楼层
没有太明白,怎么个冲突法,如果报错,请把错误信息贴出来看看
是不是说有个方法在Borland.Delphi.Windows  这个单元下也有,如果这样,可以把它写全了就可以了,例如加上 business.System之类的
回复 支持 反对

使用道具 举报

 楼主| 发表于 2009-8-5 16:53:49 | 显示全部楼层
unit RunFuncZYJ;

interface

uses
  Business.System, Business.Model,Borland.Delphi.Windows;

type
  TRunFuncZYJ = class(TBizLibrary)
  private
    {private declarations}
  public
    {public declarations}
    Static function ARunFunc(AContext: TContext;AFunURL,AParam : String): TFunc;
  end;

implementation


Static function TRunFuncZYJ.ARunFunc(AContext: TContext;AFunURL,AParam : String): TFunc;
begin
  Result := SystemCore.TSystemCore.FuncManager.RunFunc(Acontext,'', AFunURL,AParam , nil, False);
end;

end.


就用昨天给我的测试程序  ,Borland.Delphi.Windows去掉就编译通过
不然就报 没有匹配的方法
我的是3012的版本
回复 支持 反对

使用道具 举报

发表于 2009-8-5 16:58:44 | 显示全部楼层
把use中的 Business.Model 写到 Borland.Delphi.Windows 后面看看
回复 支持 反对

使用道具 举报

 楼主| 发表于 2009-8-5 17:08:23 | 显示全部楼层
OK
可以了  问一下 这是什么原因
回复 支持 反对

使用道具 举报

发表于 2009-8-5 17:16:48 | 显示全部楼层
Borland.Delphi.Windows  这个下面也有TContext,而代码需要的是Business.Model 下的TContext,编译的时候,是从use单元最后往前找的,所以就出错了
其实还可以在TContext前面加上Business.Model 单元,即写全了,也可以。

结贴了,有问题重新开贴吧
回复 支持 反对

使用道具 举报

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

本版积分规则

小黑屋|手机版|Justep Inc.

GMT+8, 2025-7-18 12:23 , Processed in 0.039914 second(s), 15 queries .

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

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